Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @name Police locker (CasperDK)
- @inputs EGP:wirelink User:entity
- @outputs [F1,F2,F3,F4,F5,F6]
- @persist [CurUser]:entity [S,Port,Fade,Pris,K]:number
- @trigger
- if(EGP & ~EGP){reset()}
- if(first()){
- #CONFIG
- Pris = 10000
- K = 1 #IKKE PILLE
- timer("startUp",100)
- print("Made by CasperDK")
- 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) exit()}
- function void cursor(){
- EGP:egpCircleOutline(255,vec2(256,256),vec2(5,5)) EGP:egpColor(255,vec(255,0,0)) EGP:egpParentToCursor(255)
- }
- }
- if(clk("startUp")){
- EGP:egpClear()
- EGP:egpBox(1,vec2(256,256),vec2(512,512)) EGP:egpColor(1,vec(0,50,70))
- EGP:egpBox(2,vec2(256,25),vec2(512,75)) EGP:egpColor(2,vec(10,10,80))
- EGP:egpText(3,"POLITI",vec2(256,4)) EGP:egpAlign(3,1) EGP:egpSize(3,60) EGP:egpFont(3,"Courier New")
- EGP:egpText(4,"HER KAN DU K"+oeL()+"BE DIT K"+oeL()+"RET"+oeL()+"J UD",vec2(256,475)) EGP:egpAlign(4,1) EGP:egpSize(4,30)
- EGP:egpBox(5,vec2(256,65),vec2(512,5))
- EGP:egpBox(6,vec2(256,465),vec2(512,5))
- EGP:egpBox(7,vec2(256,250),vec2(512,125)) EGP:egpColor(7,vec(10,50,100))
- EGP:egpBox(8,vec2(256,185),vec2(512,5)) EGP:egpColor(8,vec(125,0,0))
- EGP:egpBox(9,vec2(256,315),vec2(512,5)) EGP:egpColor(9,vec(125,0,0))
- EGP:egpText(10,"LOGIN",vec2(256,213)) EGP:egpAlign(10,1) EGP:egpSize(10,80) EGP:egpFont(10,"Marlett")
- EGP:egpText(70,"By CasperDK",vec2(256,0)) EGP:egpAlign(70,1) EGP:egpSize(70,10)
- stoptimer("update")
- CurUser = noentity()
- Port = 1
- S = 1
- cursor()
- }
- if(~User & User){
- if(S == 1){
- if(EGP:egpButton(7,User)){
- if(User:isGov()){timer("update",5000) CurUser = User timer("admin",100)}else{timer("update",5000) timer("buyCar",100) CurUser = User}
- }
- }
- if(CurUser == User){
- if(S == 2 ){
- if(EGP:egpButton(10,User)){
- if(Port == 1){F1 = !F1}
- if(Port == 2){F2 = !F2}
- if(Port == 3){F3 = !F3}
- if(Port == 4){F4 = !F4}
- if(Port == 5){F5 = !F5}
- if(Port == 6){F6 = !F6}
- }
- if(EGP:egpButton(14,User)){Port = Port-1 EGP:egpSetText(16,""+Port)}
- if(EGP:egpButton(15,User)){Port = Port+1 EGP:egpSetText(16,""+Port)}
- if(EGP:egpButton(7,User)){F1 = 0 F2 = 0 F3 = 0 F4 = 0 F5 = 0 F6 = 0}
- if(EGP:egpButton(100,User)){timer("startUp",50)}
- }
- if(S == 3){
- if(EGP:egpButton(14,User)){Port = Port-1 EGP:egpSetText(16,""+Port)}
- if(EGP:egpButton(15,User)){Port = Port+1 EGP:egpSetText(16,""+Port)}
- if(EGP:egpButton(10,User)){moneyRequest(CurUser,Pris,"Port "+Port+" - "+Pris+"kr")}
- if(EGP:egpButton(100,User)){timer("startUp",50)}
- if(EGP:egpButton(7,User)&K==1){concmd("say /pm "+CurUser:steamID()+" Du har tilkaldt efter hj"+ae()+"lp. Vent venligst...") timer("1500",1500) K = 0 timer("5000",5000)}
- }
- }
- }
- if(clk("1500")){concmd("say /g "+CurUser:name()+" Har tilkaldt efter hj"+ae()+"lp nede i PD!")}
- if(clk("5000")){K = 1}
- if(clk("admin")){
- EGP:egpClear()
- EGP:egpBox(1,vec2(256,256),vec2(512,512)) EGP:egpColor(1,vec(0,50,70))
- EGP:egpBox(2,vec2(256,25),vec2(512,75)) EGP:egpColor(2,vec(10,10,80))
- EGP:egpText(3,"POLITI",vec2(256,4)) EGP:egpAlign(3,1) EGP:egpSize(3,60) EGP:egpFont(3,"Courier New")
- EGP:egpBox(4,vec2(256,65),vec2(512,5))
- EGP:egpText(50,"[POLITI] Ingen beskeder i "+oe()+"jeblikket",vec2(256,475)) EGP:egpAlign(50,1) EGP:egpSize(50,30)
- EGP:egpBox(6,vec2(256,465),vec2(512,5))
- EGP:egpBox(7,vec2(250,400),vec2(400,75)) EGP:egpColor(7,vec(10,30,80))
- EGP:egpText(8,"LUK ALLE PORTE",vec2(250,385)) EGP:egpAlign(8,1) EGP:egpSize(8,35) EGP:egpFont(8,"Courier New")
- EGP:egpBoxOutline(9,vec2(250,400),vec2(400,75))
- EGP:egpBox(10,vec2(250,300),vec2(200,50)) EGP:egpColor(10,vec(0,150,0)) #Open / Close
- EGP:egpText(13,""+aaL()+"BEN PORT",vec2(250,285)) EGP:egpAlign(13,1) EGP:egpSize(13,30)
- EGP:egpBox(14,vec2(175,225),vec2(50,50)) EGP:egpColor(14,vec(75,0,0)) #Down
- EGP:egpBox(15,vec2(325,225),vec2(50,50)) EGP:egpColor(15,vec(0,75,0)) #Up
- EGP:egpText(16,""+Port,vec2(250,200)) EGP:egpAlign(16,1) EGP:egpSize(16,50)
- EGP:egpText(17,"<",vec2(175,197)) EGP:egpAlign(17,1) EGP:egpSize(17,50)
- EGP:egpText(18,">",vec2(325,197)) EGP:egpAlign(18,1) EGP:egpSize(18,50)
- EGP:egpBox(100,vec2(256,85),vec2(512,35)) EGP:egpColor(100,vec(75,0,0))
- EGP:egpText(101,"LOG AF",vec2(256,75)) EGP:egpAlign(101,1) EGP:egpSize(101,25) EGP:egpFont(101,"Courier New")
- EGP:egpText(70,"By CasperDK",vec2(256,0)) EGP:egpAlign(70,1) EGP:egpSize(70,10)
- cursor()
- S = 2
- }
- if(clk("buyCar")){
- EGP:egpClear()
- EGP:egpBox(1,vec2(256,256),vec2(512,512)) EGP:egpColor(1,vec(0,50,70))
- EGP:egpBox(2,vec2(256,25),vec2(512,75)) EGP:egpColor(2,vec(10,10,80))
- EGP:egpText(3,"POLITI",vec2(256,4)) EGP:egpAlign(3,1) EGP:egpSize(3,60) EGP:egpFont(3,"Courier New")
- EGP:egpBox(4,vec2(256,65),vec2(512,5))
- EGP:egpBox(14,vec2(175,225),vec2(50,50)) EGP:egpColor(14,vec(75,0,0)) #Down
- EGP:egpBox(15,vec2(325,225),vec2(50,50)) EGP:egpColor(15,vec(0,75,0)) #Up
- EGP:egpText(16,""+Port,vec2(250,200)) EGP:egpAlign(16,1) EGP:egpSize(16,50)
- EGP:egpText(17,"<",vec2(175,197)) EGP:egpAlign(17,1) EGP:egpSize(17,50)
- EGP:egpText(18,">",vec2(325,197)) EGP:egpAlign(18,1) EGP:egpSize(18,50)
- EGP:egpBox(10,vec2(250,300),vec2(200,50)) EGP:egpColor(10,vec(0,150,0)) #PAY BUTTON
- EGP:egpText(13,"Betal: "+Pris+"kr",vec2(250,285)) EGP:egpAlign(13,1) EGP:egpSize(13,30)
- EGP:egpBox(6,vec2(256,465),vec2(512,5))
- EGP:egpText(30,"Hej "+CurUser:name(),vec2(256,475)) EGP:egpAlign(30,1) EGP:egpSize(30,30)
- EGP:egpText(31,"V"+ae()+"lg hvilken port du vil "+aa()+"bne",vec2(250,150)) EGP:egpAlign(31,1) EGP:egpSize(31,25)
- EGP:egpBox(7,vec2(250,400),vec2(400,75)) EGP:egpColor(7,vec(10,30,80))
- EGP:egpText(8,"BRUG FOR HJ"+aeL()+"LP?",vec2(250,385)) EGP:egpAlign(8,1) EGP:egpSize(8,35) EGP:egpFont(8,"Courier New")
- EGP:egpBox(100,vec2(256,85),vec2(512,35)) EGP:egpColor(100,vec(75,0,0))
- EGP:egpText(101,"LOG AF",vec2(256,75)) EGP:egpAlign(101,1) EGP:egpSize(101,25) EGP:egpFont(101,"Courier New")
- EGP:egpText(70,"By CasperDK",vec2(256,0)) EGP:egpAlign(70,1) EGP:egpSize(70,10)
- cursor()
- S = 3
- }
- if(moneyClk("Port "+Port+" - "+Pris+"kr")){
- if(Port == 1){F1 = 1}
- if(Port == 2){F2 = 1}
- if(Port == 3){F3 = 1}
- if(Port == 4){F4 = 1}
- if(Port == 5){F5 = 1}
- if(Port == 6){F6 = 1}
- concmd("say /g "+moneyClkPlayer():name()+" Har k"+oe()+"bt en bil fri i PD!")
- }
- if(S==2){
- if(Port == 1 & F1==1){EGP:egpSetText(13,"LUK PORT") EGP:egpColor(10,vec(150,0,0))
- }elseif(Port == 1 & F1 == 0){EGP:egpSetText(13,""+aaL()+"BEN PORT") EGP:egpColor(10,vec(0,150,0))}
- if(Port == 2 & F2==1){EGP:egpSetText(13,"LUK PORT") EGP:egpColor(10,vec(150,0,0))
- }elseif(Port == 2 & F2 == 0){EGP:egpSetText(13,""+aaL()+"BEN PORT") EGP:egpColor(10,vec(0,150,0))}
- if(Port == 3 & F3==1){EGP:egpSetText(13,"LUK PORT") EGP:egpColor(10,vec(150,0,0))
- }elseif(Port == 3 & F3 == 0){EGP:egpSetText(13,""+aaL()+"BEN PORT") EGP:egpColor(10,vec(0,150,0))}
- if(Port == 4 & F4==1){EGP:egpSetText(13,"LUK PORT") EGP:egpColor(10,vec(150,0,0))
- }elseif(Port == 4 & F4 == 0){EGP:egpSetText(13,""+aaL()+"BEN PORT") EGP:egpColor(10,vec(0,150,0))}
- if(Port == 5 & F5==1){EGP:egpSetText(13,"LUK PORT") EGP:egpColor(10,vec(150,0,0))
- }elseif(Port == 5 & F5 == 0){EGP:egpSetText(13,""+aaL()+"BEN PORT") EGP:egpColor(10,vec(0,150,0))}
- if(Port == 6 & F6==1){EGP:egpSetText(13,"LUK PORT") EGP:egpColor(10,vec(150,0,0))
- }elseif(Port == 6 & F6 == 0){EGP:egpSetText(13,""+aaL()+"BEN PORT") EGP:egpColor(10,vec(0,150,0))}
- }
- if(clk("update")){
- if(round(((entity():pos() - CurUser:pos()):length()))>150){timer("startUp",250)}
- timer("update",5000)
- }
- if(S == 2 | S == 3){
- if(Port<1){Port = 1 EGP:egpSetText(16,""+Port)}
- if(Port>6){Port = 6 EGP:egpSetText(16,""+Port)}
- }
- runOnChat(1)
- if(chatClk(owner())){
- A = owner():lastSaid():lower():explode(" ")
- if(A[1,string]=="!message"){
- Mess = lastSaid():sub(9)
- EGP:egpSetText(50,"[POLITI] "+Mess)
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement