Hop til indhold
Stavox

Expression2 Bus stop sted [V.1]


Glymse

Recommended Posts

Haiiiiii, Stavox.

Jeg vil gerne dele min Bus stop sted e2 ud til jer.

Billeder: http://steamcommunity.com/profiles/76561198154198893/screenshot/852723208122574491

Koden kan findes herunder

Quote

@name Bus stoppested [v.1] af GlymseDK
@inputs EGP:wirelink User:entity
@outputs 
@persist [Rute1,Rute2,Rute3,Rute4,Rute5,Navn]:string Settings Side Billetpris:number Ejer:string
@trigger all

if (ops()>300){exit()}

if (chatClk(owner())){
    A = lastSaid():explode(" ")
    if (A[1,string]=="!help"){
        printColor(
        vec(250,255,255),"\n\n_____________________________________________________\n",
        vec(0,255,0),"Bus stoppested e2 af GlymseDK [v.1]\n",
        vec(255,0,0),"Commands:\n",
        vec(0,0,255),"!billetpris <antal> : S"+ae()+"t prisen p"+aa()+" hvad en billet koster.\n",
        vec(250,255,255),"\n\n_____________________________________________________\n")
    }
    elseif(A[1,string]=="!billetpris"){
        Billetpris = A[2,string]:toNumber()
        if (Side==3){
            EGP:egpSetText(29,"Prisen for en billet er "+Billetpris+"KR")
        }
    }
    exit()
}
if(first() | duped() | dupefinished()){
    ##############################
    Settings
    #lav dine ruter
    Rute1 = "Lav din rute 1 her"
    Rute2 = "Lav din rute 2 her"
    Rute3 = "Lav din rute 3 her"
    Rute4 = "Lav din rute 4 her"
    Rute5 = "Lav din rute 5 her"
    #lav dit bus navn om til noget andet
    Navn = "BUS-SERVICE"
    ##############################
    runOnChat(1)
    Ejer = owner():name()
    printColor(
    vec(250,255,255),"\n\n_____________________________________________________\n",
    vec(0,255,0),"Bus stoppested e2 af GlymseDK [v.1]\n",
    vec(255,0,0),"Ved brug af denne e2, acceptere du Terms Of Service\n",
    vec(5,255,0),"https://pastebin.com/KEd7At7s\n",
    vec(255,0,0),"Du kan finde e2 her https://stavox.com/forums/topic/11314-expression2-bus-stop-sted-v1/\n",
    vec(255,255,0),"Skriv !help for alle tilg"+ae()+"ngelige commands\n",
    vec(250,255,255),"_____________________________________________________") 
    function string returnTime(){
        TempSeconds = time("sec")
        TempMinutes = time("min")
        TempHours = time("hour")+2
        return format("%s:%s:%s",(TempHours<10 ? "0"+TempHours : (TempHours>23 ? "0"+(TempHours-24) : TempHours:toString())),
                                 (TempMinutes<10 ? "0"+TempMinutes : TempMinutes:toString()),
                                 (TempSeconds<10 ? "0"+TempSeconds : TempSeconds:toString()))
    }       
    
    function number wirelink:egpButton(Idx:number,Ply:entity){
        TL = This:egpPos(Idx) - This:egpSize(Idx) / 2 * (0 ? 0 : 1)
        BR = This:egpPos(Idx) + This:egpSize(Idx) / (0 ? 1 : 2)
        Cur = This:egpCursor(Ply) 
        return inrange(Cur, TL, BR)
    }
    function void start(){
        EGP:egpClear()
        EGP:egpBox(1,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(1,vec(30,30,30))
        EGP:egpMaterial(1,"console/background04")
        EGP:egpBox(3,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(3,vec4(120,120,120,10))
        EGP:egpText(2,"",vec2(170,100))  
        EGP:egpSize(2,35) 
        EGP:egpColor(2,vec(255,255,251)) 
        EGP:egpFont(2,"Courier New")
        EGP:egpText(4,""+Navn+"",vec2(95,19))  
        EGP:egpSize(4,55) 
        EGP:egpColor(4,vec(255,255,251)) 
        EGP:egpFont(4,"Courier New")
        EGP:egpBox(7,vec2(256,236),vec2(270,91)) 
        EGP:egpColor(7,vec4(200,70,70,150))
        EGP:egpBox(8,vec2(256,346),vec2(270,91)) 
        EGP:egpColor(8,vec4(200,70,70,150))
        EGP:egpBoxOutline(27,vec2(256,236),vec2(270,91)) 
        EGP:egpSize(27,3) 
        EGP:egpColor(27,vec4(30,30,30,255))
        EGP:egpBoxOutline(28,vec2(256,346),vec2(270,91)) 
        EGP:egpSize(28,3) 
        EGP:egpColor(28,vec4(30,30,30,255))
        EGP:egpText(5,"BUS-RUTE",vec2(190,218))  
        EGP:egpSize(5,30) 
        EGP:egpColor(5,vec(251,251,251)) 
        EGP:egpFont(5,"Arial")
        EGP:egpText(6,"INFORMATION",vec2(170,328))  
        EGP:egpSize(6,30) 
        EGP:egpColor(6,vec(251,251,251)) 
        EGP:egpFont(6,"Arial")
        EGP:egpText(9,"Lavet af GlymseDK | Kan findes p"+aa()+" Stavox.com ",vec2(120,490))  
        EGP:egpSize(9,15) 
        EGP:egpColor(9,vec(251,251,251)) 
        EGP:egpFont(9,"Arial")
        Side = 1
    }
    function void rute(){          
        EGP:egpClear()
        EGP:egpBox(10,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(10,vec(30,30,30))
        EGP:egpMaterial(10,"console/background04")
        EGP:egpBox(12,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(12,vec4(120,120,120,10))

        EGP:egpText(13,"BUS-RUTE",vec2(140,19))  
        EGP:egpSize(13,55) 
        EGP:egpColor(13,vec(255,255,251)) 
        EGP:egpFont(13,"Courier New")
        #Ruter#
        EGP:egpText(17,Rute1,vec2(46,118))
        EGP:egpSize(17,30) 
        EGP:egpColor(17,vec(255,255,251)) 
        EGP:egpFont(17,"Courier New")
        EGP:egpText(18,Rute2,vec2(46,158))
        EGP:egpSize(18,30) 
        EGP:egpColor(18,vec(255,255,251)) 
        EGP:egpFont(18,"Courier New")
        EGP:egpText(19,Rute3,vec2(46,198))
        EGP:egpSize(19,30) 
        EGP:egpColor(19,vec(255,255,251)) 
        EGP:egpFont(19,"Courier New")
        EGP:egpText(20,Rute4,vec2(46,238))
        EGP:egpSize(20,30) 
        EGP:egpColor(20,vec(255,255,241)) 
        EGP:egpFont(20,"Courier New")
        EGP:egpText(21,Rute5,vec2(46,278))
        EGP:egpSize(21,30) 
        EGP:egpColor(21,vec(255,255,251)) 
        EGP:egpFont(21,"Courier New")
        EGP:egpText(24,"- TILBAGE -",vec2(150,475))  
        EGP:egpSize(24,35) 
        EGP:egpColor(24,vec(255,255,251)) 
        EGP:egpFont(24,"Courier New")
        EGP:egpBox(22,vec2(300,510),vec2(600,71)) 
        EGP:egpColor(22,vec4(255,70,70,100))
        Side = 2
    }
    function void info(){
        EGP:egpClear()

        EGP:egpBox(14,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(14,vec(30,30,30))
        EGP:egpMaterial(14,"console/background04")
        EGP:egpBox(15,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(15,vec4(120,120,120,10))

        EGP:egpText(16,"Information",vec2(100,19))  
        EGP:egpSize(16,55) 
        EGP:egpColor(16,vec(255,255,251)) 
        EGP:egpFont(16,"Courier New")

        EGP:egpText(28,"Billetpris",vec2(48,128))  
        EGP:egpSize(28,25) 
        EGP:egpColor(28,vec(255,5,1)) 
        EGP:egpFont(28,"arial")
        EGP:egpText(29,"Prisen for en billet er "+Billetpris+"KR",vec2(50,149))  
        EGP:egpSize(29,15) 
        EGP:egpColor(29,vec(255,255,255)) 
        EGP:egpFont(29,"arial")
        EGP:egpText(30,"Billetten bliver betalt i busen",vec2(50,160))  
        EGP:egpSize(30,15) 
        EGP:egpColor(30,vec(255,255,255)) 
        EGP:egpFont(30,"arial")

        EGP:egpText(31,"Reklamtionsret",vec2(48,198))  
        EGP:egpSize(31,25) 
        EGP:egpColor(31,vec(255,5,1)) 
        EGP:egpFont(31,"arial")
        EGP:egpText(32,"Reklametionsretten frafalder sig sin v"+ae()+"rdi",vec2(50,220))  
        EGP:egpSize(32,15) 
        EGP:egpColor(32,vec(255,255,255)) 
        EGP:egpFont(32,"arial")
        EGP:egpText(33,"ved brug af produktet",vec2(50,232))  
        EGP:egpSize(33,15) 
        EGP:egpColor(33,vec(255,255,255)) 
        EGP:egpFont(33,"arial")
        EGP:egpText(34,"som er bussen",vec2(50,245))  
        EGP:egpSize(34,15) 
        EGP:egpColor(34,vec(255,255,255)) 
        EGP:egpFont(34,"arial")

        EGP:egpText(36,"Infomation",vec2(48,275))  
        EGP:egpSize(36,25) 
        EGP:egpColor(36,vec(255,5,1)) 
        EGP:egpFont(36,"arial")
        EGP:egpText(37,"Stavox, Evocity 24, Danmark",vec2(50,295))  
        EGP:egpSize(37,15) 
        EGP:egpColor(37,vec(255,255,255)) 
        EGP:egpFont(37,"arial")
        EGP:egpText(38,"+555 55 22 12 13",vec2(50,310))  
        EGP:egpSize(38,15) 
        EGP:egpColor(38,vec(255,255,255)) 
        EGP:egpFont(38,"arial")
        EGP:egpText(39,"Ejer "+Ejer+"",vec2(50,325))  
        EGP:egpSize(39,15) 
        EGP:egpColor(39,vec(255,255,255)) 
        EGP:egpFont(39,"arial")
        EGP:egpBox(23,vec2(300,510),vec2(600,71)) 
        EGP:egpColor(23,vec4(255,70,70,100))
        EGP:egpText(25,"- TILBAGE -",vec2(150,475))  
        EGP:egpSize(25,35) 
        EGP:egpColor(25,vec(255,255,251)) 
        EGP:egpFont(25,"Courier New")
        Side = 3
    } 
    timer("Klokken",1)
    timer("start",1000) 
}
if(clk("Klokken")){
    EGP:egpSetText(2,returnTime()) 
    timer("Klokken",1000)
}    
elseif(clk("start")){start()}
elseif(clk("rute")){rute()}
elseif(clk("info")){info()}
elseif(clk("bus")){
    EGP:egpClear() EGP:egpBox(40,vec2(256,256),vec2(512,512)) 
    EGP:egpColor(40,vec(30,30,30)) EGP:egpText(13,"Ulovlig e2",vec2(110,19))  
    EGP:egpSize(13,55) 
    EGP:egpColor(13,vec(255,255,251)) 
    EGP:egpFont(13,"Courier New")
    timer("info1",40)
}
elseif(clk("reset")){start()}


if(~User & User){
    if(Side==1){
        if(EGP:egpButton(7,User)){timer("rute",40)}
        elseif(EGP:egpButton(7,User)){timer("reset",16000)}
        elseif(EGP:egpButton(8,User)){timer("info",40)}
    }
    elseif(Side==2){
        if(EGP:egpButton(22,User)){timer("start",40)}
    } 
    elseif(Side==3){
        if(EGP:egpButton(23,User)){timer("start",40)}
    }
}
#Credit til jan for at optimere e2'en

Koden vil blive opdateret løbende!!!

Dupe med bus-stopsted.

Download link: https://www.mediafire.com/file/8et2ls832uw99zq/Bus stop sted v2[SX].txt

Billed: http://steamcommunity.com/sharedfiles/filedetails/?id=1105169841 /  http://steamcommunity.com/sharedfiles/filedetails/?id=1105169786

Bus-stopsted [v.1] af GlymseDK

Link til kommentar
Del på andre sites

@Glymse

 

Jeg legede lige lidt med din E2

 

@name Bus stoppested [v.1] af GlymseDK
@inputs EGP:wirelink User:entity
@outputs 
@persist [Rute1,Rute2,Rute3,Rute4,Rute5,Navn]:string Settings Side Billetpris:number Ejer:string
@trigger all

if (ops()>300){exit()}

if (chatClk(owner())){
    A = lastSaid():explode(" ")
    if (A[1,string]=="!help"){
        printColor(
        vec(250,255,255),"\n\n_____________________________________________________\n",
        vec(0,255,0),"Bus stoppested e2 af GlymseDK [v.1]\n",
        vec(255,0,0),"Commands:\n",
        vec(0,0,255),"!billetpris <antal> : S"+ae()+"t prisen p"+aa()+" hvad en billet koster.\n",
        vec(250,255,255),"\n\n_____________________________________________________\n")
    }
    elseif(A[1,string]=="!billetpris"){
        Billetpris = A[2,string]:toNumber()
        if (Side==3){
            EGP:egpSetText(29,"Prisen for en billet er "+Billetpris+"KR")
        }
    }
    exit()
}elseif(chatClk()){exit()}
if(first() | duped() | dupefinished()){
    ##############################
    Settings
    #lav dine ruter
    Rute1 = "Lav din rute 1 her"
    Rute2 = "Lav din rute 2 her"
    Rute3 = "Lav din rute 3 her"
    Rute4 = "Lav din rute 4 her"
    Rute5 = "Lav din rute 5 her"
    #lav dit bus navn om til noget andet
    Navn = "BUS-SERVICE"
    ##############################
    runOnChat(1)
    Ejer = owner():name()
    printColor(
    vec(250,255,255),"\n\n_____________________________________________________\n",
    vec(0,255,0),"Bus stoppested e2 af GlymseDK [v.1]\n",
    vec(255,0,0),"Ved brug af denne e2, acceptere du Terms Of Service\n",
    vec(5,255,0),"https://pastebin.com/KEd7At7s\n",
    vec(255,0,0),"Du kan finde e2 her https://stavox.com/forums/topic/11314-expression2-bus-stop-sted-v1/\n",
    vec(255,255,0),"Skriv !help for alle tilg"+ae()+"ngelige commands\n",
    vec(250,255,255),"_____________________________________________________") 
    function string returnTime(){
        TempSeconds = time("sec")
        TempMinutes = time("min")
        TempHours = time("hour")+2
        return format("%s:%s:%s",(TempHours<10 ? "0"+TempHours : (TempHours>23 ? "0"+(TempHours-24) : TempHours:toString())),
                                 (TempMinutes<10 ? "0"+TempMinutes : TempMinutes:toString()),
                                 (TempSeconds<10 ? "0"+TempSeconds : TempSeconds:toString()))
    }       
    
    function number wirelink:egpButton(Idx:number,Ply:entity){
        TL = This:egpPos(Idx) - This:egpSize(Idx) / 2 * (0 ? 0 : 1)
        BR = This:egpPos(Idx) + This:egpSize(Idx) / (0 ? 1 : 2)
        Cur = This:egpCursor(Ply) 
        return inrange(Cur, TL, BR)
    }
    function void start(){
        EGP:egpClear()
        EGP:egpBox(1,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(1,vec(30,30,30))
        EGP:egpMaterial(1,"console/background04")
        EGP:egpBox(3,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(3,vec4(120,120,120,10))
        EGP:egpText(2,"",vec2(170,100))  
        EGP:egpSize(2,35) 
        EGP:egpColor(2,vec(255,255,251)) 
        EGP:egpFont(2,"Courier New")
        EGP:egpText(4,""+Navn+"",vec2(95,19))  
        EGP:egpSize(4,55) 
        EGP:egpColor(4,vec(255,255,251)) 
        EGP:egpFont(4,"Courier New")
        EGP:egpBox(7,vec2(256,236),vec2(270,91)) 
        EGP:egpColor(7,vec4(200,70,70,150))
        EGP:egpBox(8,vec2(256,346),vec2(270,91)) 
        EGP:egpColor(8,vec4(200,70,70,150))
        EGP:egpBoxOutline(27,vec2(256,236),vec2(270,91)) 
        EGP:egpSize(27,3) 
        EGP:egpColor(27,vec4(30,30,30,255))
        EGP:egpBoxOutline(28,vec2(256,346),vec2(270,91)) 
        EGP:egpSize(28,3) 
        EGP:egpColor(28,vec4(30,30,30,255))
        EGP:egpText(5,"BUS-RUTE",vec2(190,218))  
        EGP:egpSize(5,30) 
        EGP:egpColor(5,vec(251,251,251)) 
        EGP:egpFont(5,"Arial")
        EGP:egpText(6,"INFORMATION",vec2(170,328))  
        EGP:egpSize(6,30) 
        EGP:egpColor(6,vec(251,251,251)) 
        EGP:egpFont(6,"Arial")
        EGP:egpText(9,"Lavet af GlymseDK | Kan findes p"+aa()+" Stavox.com ",vec2(120,490))  
        EGP:egpSize(9,15) 
        EGP:egpColor(9,vec(251,251,251)) 
        EGP:egpFont(9,"Arial")
        Side = 1
    }
    function void rute(){          
        EGP:egpClear()
        EGP:egpBox(10,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(10,vec(30,30,30))
        EGP:egpMaterial(10,"console/background04")
        EGP:egpBox(12,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(12,vec4(120,120,120,10))

        EGP:egpText(13,"BUS-RUTE",vec2(140,19))  
        EGP:egpSize(13,55) 
        EGP:egpColor(13,vec(255,255,251)) 
        EGP:egpFont(13,"Courier New")
        #Ruter#
        EGP:egpText(17,Rute1,vec2(46,118))
        EGP:egpSize(17,30) 
        EGP:egpColor(17,vec(255,255,251)) 
        EGP:egpFont(17,"Courier New")
        EGP:egpText(18,Rute2,vec2(46,158))
        EGP:egpSize(18,30) 
        EGP:egpColor(18,vec(255,255,251)) 
        EGP:egpFont(18,"Courier New")
        EGP:egpText(19,Rute3,vec2(46,198))
        EGP:egpSize(19,30) 
        EGP:egpColor(19,vec(255,255,251)) 
        EGP:egpFont(19,"Courier New")
        EGP:egpText(20,Rute4,vec2(46,238))
        EGP:egpSize(20,30) 
        EGP:egpColor(20,vec(255,255,241)) 
        EGP:egpFont(20,"Courier New")
        EGP:egpText(21,Rute5,vec2(46,278))
        EGP:egpSize(21,30) 
        EGP:egpColor(21,vec(255,255,251)) 
        EGP:egpFont(21,"Courier New")
        EGP:egpText(24,"- TILBAGE -",vec2(150,475))  
        EGP:egpSize(24,35) 
        EGP:egpColor(24,vec(255,255,251)) 
        EGP:egpFont(24,"Courier New")
        EGP:egpBox(22,vec2(300,510),vec2(600,71)) 
        EGP:egpColor(22,vec4(255,70,70,100))
        Side = 2
    }
    function void info(){
        EGP:egpClear()

        EGP:egpBox(14,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(14,vec(30,30,30))
        EGP:egpMaterial(14,"console/background04")
        EGP:egpBox(15,vec2(256,256),vec2(512,512)) 
        EGP:egpColor(15,vec4(120,120,120,10))

        EGP:egpText(16,"Information",vec2(100,19))  
        EGP:egpSize(16,55) 
        EGP:egpColor(16,vec(255,255,251)) 
        EGP:egpFont(16,"Courier New")

        EGP:egpText(28,"Billetpris",vec2(48,128))  
        EGP:egpSize(28,25) 
        EGP:egpColor(28,vec(255,5,1)) 
        EGP:egpFont(28,"arial")
        EGP:egpText(29,"Prisen for en billet er "+Billetpris+"KR",vec2(50,149))  
        EGP:egpSize(29,15) 
        EGP:egpColor(29,vec(255,255,255)) 
        EGP:egpFont(29,"arial")
        EGP:egpText(30,"Billetten bliver betalt i busen",vec2(50,160))  
        EGP:egpSize(30,15) 
        EGP:egpColor(30,vec(255,255,255)) 
        EGP:egpFont(30,"arial")

        EGP:egpText(31,"Reklamtionsret",vec2(48,198))  
        EGP:egpSize(31,25) 
        EGP:egpColor(31,vec(255,5,1)) 
        EGP:egpFont(31,"arial")
        EGP:egpText(32,"Reklametionsretten frafalder sig sin v"+ae()+"rdi",vec2(50,220))  
        EGP:egpSize(32,15) 
        EGP:egpColor(32,vec(255,255,255)) 
        EGP:egpFont(32,"arial")
        EGP:egpText(33,"ved brug af produktet",vec2(50,232))  
        EGP:egpSize(33,15) 
        EGP:egpColor(33,vec(255,255,255)) 
        EGP:egpFont(33,"arial")
        EGP:egpText(34,"som er bussen",vec2(50,245))  
        EGP:egpSize(34,15) 
        EGP:egpColor(34,vec(255,255,255)) 
        EGP:egpFont(34,"arial")

        EGP:egpText(36,"Infomation",vec2(48,275))  
        EGP:egpSize(36,25) 
        EGP:egpColor(36,vec(255,5,1)) 
        EGP:egpFont(36,"arial")
        EGP:egpText(37,"Stavox, Evocity 24, Danmark",vec2(50,295))  
        EGP:egpSize(37,15) 
        EGP:egpColor(37,vec(255,255,255)) 
        EGP:egpFont(37,"arial")
        EGP:egpText(38,"+555 55 22 12 13",vec2(50,310))  
        EGP:egpSize(38,15) 
        EGP:egpColor(38,vec(255,255,255)) 
        EGP:egpFont(38,"arial")
        EGP:egpText(39,"Ejer "+Ejer+"",vec2(50,325))  
        EGP:egpSize(39,15) 
        EGP:egpColor(39,vec(255,255,255)) 
        EGP:egpFont(39,"arial")
        EGP:egpBox(23,vec2(300,510),vec2(600,71)) 
        EGP:egpColor(23,vec4(255,70,70,100))
        EGP:egpText(25,"- TILBAGE -",vec2(150,475))  
        EGP:egpSize(25,35) 
        EGP:egpColor(25,vec(255,255,251)) 
        EGP:egpFont(25,"Courier New")
        Side = 3
    } 
    timer("Klokken",1)
    timer("start",1000) 
}
if(clk("Klokken")){
    EGP:egpSetText(2,returnTime()) 
    timer("Klokken",1000)
}    
elseif(clk("start")){start()}
elseif(clk("rute")){rute()}
elseif(clk("info")){info()}
elseif(clk("bus")){
    EGP:egpClear() EGP:egpBox(40,vec2(256,256),vec2(512,512)) 
    EGP:egpColor(40,vec(30,30,30)) EGP:egpText(13,"Ulovlig e2",vec2(110,19))  
    EGP:egpSize(13,55) 
    EGP:egpColor(13,vec(255,255,251)) 
    EGP:egpFont(13,"Courier New")
    timer("info1",40)
}
elseif(clk("reset")){start()}


if(~User & User){
    if(Side==1){
        if(EGP:egpButton(7,User)){timer("rute",40)}
        elseif(EGP:egpButton(8,User)){timer("info",40)}
    }
    elseif(Side==2){
        if(EGP:egpButton(22,User)){timer("start",40)}
    } 
    elseif(Side==3){
        if(EGP:egpButton(23,User)){timer("start",40)}
    }
}

 

Link til kommentar
Del på andre sites

Arkiveret

Dette emne er nu arkiveret og er lukket for yderligere svar

Gæst
Dette emne er nu lukket for yderligere svar
×
×
  • Tilføj...

COOKIE- OG PRIVATLIVSPOLITIK PÅ STAVOX.DK

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue. Privatlivspolitik - Vilkår for brug.