Advertisement
Guest User

Untitled

a guest
Jan 23rd, 2017
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.92 KB | None | 0 0
  1. @name Kobfiskerings 7 Biler Green | By Mic Spammeren
  2. @inputs EGP:wirelink User:entity
  3. @outputs D1 D2 D3 D4 D5 D6 D7
  4. @persist Pris
  5. Pris = 10000
  6. function void base(){
  7. EGP:egpClear()
  8. EGP:egpBox(1,vec2(256,256),vec2(512,512)) EGP:egpMaterial(1,"console/background02") EGP:egpColor(1,vec(120,200,120))
  9. EGP:egpText(2,"KONFISKEREDE BILER",vec2(256,0)) EGP:egpAlign(2,1) EGP:egpSize(2,45)
  10. EGP:egpBox(3,vec2(256,90),vec2(400,50))
  11. EGP:egpBox(4,vec2(256,150),vec2(400,50))
  12. EGP:egpBox(5,vec2(256,210),vec2(400,50))
  13. EGP:egpBox(6,vec2(256,270),vec2(400,50))
  14. EGP:egpBox(7,vec2(256,330),vec2(400,50))
  15. EGP:egpBox(8,vec2(256,390),vec2(400,50))
  16. EGP:egpBox(9,vec2(256,450),vec2(400,50))
  17. EGP:egpBoxOutline(10,vec2(256,90),vec2(400,50)) EGP:egpColor(10,vec(0,0,0)) EGP:egpSize(10,2)
  18. EGP:egpBoxOutline(11,vec2(256,150),vec2(400,50)) EGP:egpColor(11,vec(0,0,0)) EGP:egpSize(11,2)
  19. EGP:egpBoxOutline(12,vec2(256,210),vec2(400,50)) EGP:egpColor(12,vec(0,0,0)) EGP:egpSize(12,2)
  20. EGP:egpBoxOutline(13,vec2(256,270),vec2(400,50)) EGP:egpColor(13,vec(0,0,0)) EGP:egpSize(13,2)
  21. EGP:egpBoxOutline(14,vec2(256,330),vec2(400,50)) EGP:egpColor(14,vec(0,0,0)) EGP:egpSize(14,2)
  22. EGP:egpBoxOutline(15,vec2(256,390),vec2(400,50)) EGP:egpColor(15,vec(0,0,0)) EGP:egpSize(15,2)
  23. EGP:egpBoxOutline(16,vec2(256,450),vec2(400,50)) EGP:egpColor(16,vec(0,0,0)) EGP:egpSize(16,2)
  24. EGP:egpText(17,"B"+aaL()+"S 1 - "+Pris+" Kr",vec2(256,92)) EGP:egpColor(17,vec(0,0,0)) EGP:egpAlign(17,1,1) EGP:egpSize(17,50)
  25. EGP:egpText(18,"B"+aaL()+"S 2 - "+Pris+" Kr",vec2(256,152)) EGP:egpColor(18,vec(0,0,0)) EGP:egpAlign(18,1,1) EGP:egpSize(18,50)
  26. EGP:egpText(19,"B"+aaL()+"S 3 - "+Pris+" Kr",vec2(256,212)) EGP:egpColor(19,vec(0,0,0)) EGP:egpAlign(19,1,1) EGP:egpSize(19,50)
  27. EGP:egpText(20,"B"+aaL()+"S 4 - "+Pris+" Kr",vec2(256,272)) EGP:egpColor(20,vec(0,0,0)) EGP:egpAlign(20,1,1) EGP:egpSize(20,50)
  28. EGP:egpText(21,"B"+aaL()+"S 5 - "+Pris+" Kr",vec2(256,332)) EGP:egpColor(21,vec(0,0,0)) EGP:egpAlign(21,1,1) EGP:egpSize(21,50)
  29. EGP:egpText(22,"B"+aaL()+"S 6 - "+Pris+" Kr",vec2(256,392)) EGP:egpColor(22,vec(0,0,0)) EGP:egpAlign(22,1,1) EGP:egpSize(22,50)
  30. EGP:egpText(23,"B"+aaL()+"S 7 - "+Pris+" Kr",vec2(256,452)) EGP:egpColor(23,vec(0,0,0)) EGP:egpAlign(23,1,1) EGP:egpSize(23,50)
  31.  
  32.  
  33. EGP:egpText(30,"By Mic Spammeren",vec2(256,492)) EGP:egpAlign(30,1)
  34. }
  35. if(duped()){reset()}
  36. if(first()){
  37. base()
  38. function number egpClick(CursorPos:vector2,ObjId){
  39. EPos = EGP:egpPos(ObjId)
  40. ESize = EGP:egpSize(ObjId)
  41. if(inrange(CursorPos, (EPos - ESize/2), (EPos + ESize/2))){
  42. return 1
  43. }
  44. return 0
  45. }
  46. #Du maa ikke saelge denne E2, men GIVE den mma du godt ;D
  47. }
  48. if(ops()<100){
  49. Cursor = EGP:egpCursor(User)
  50. if(egpClick(Cursor,3)){if(User:isCop()){if(D1){D1=0} else{D1=1}} else{moneyRequest(User,Pris,"B"+aaL()+"S-1")}}
  51. if(egpClick(Cursor,4)){if(User:isCop()){if(D2){D2=0} else{D2=1}} else{moneyRequest(User,Pris,"B"+aaL()+"S-1")}}
  52. if(egpClick(Cursor,5)){if(User:isCop()){if(D3){D3=0} else{D3=1}} else{moneyRequest(User,Pris,"B"+aaL()+"S-1")}}
  53. if(egpClick(Cursor,6)){if(User:isCop()){if(D4){D4=0} else{D4=1}} else{moneyRequest(User,Pris,"B"+aaL()+"S-1")}}
  54. if(egpClick(Cursor,7)){if(User:isCop()){if(D5){D5=0} else{D5=1}} else{moneyRequest(User,Pris,"B"+aaL()+"S-1")}}
  55. if(egpClick(Cursor,8)){if(User:isCop()){if(D6){D6=0} else{D6=1}} else{moneyRequest(User,Pris,"B"+aaL()+"S-1")}}
  56. if(egpClick(Cursor,9)){if(User:isCop()){if(D7){D7=0} else{D7=1}} else{moneyRequest(User,Pris,"B"+aaL()+"S-1")}}
  57. }
  58. if(moneyClk("B"+aaL()+"S-1")){D1 = 1}
  59. if(moneyClk("B"+aaL()+"S-2")){D2 = 1}
  60. if(moneyClk("B"+aaL()+"S-3")){D3 = 1}
  61. if(moneyClk("B"+aaL()+"S-4")){D4 = 1}
  62. if(moneyClk("B"+aaL()+"S-5")){D5 = 1}
  63. if(moneyClk("B"+aaL()+"S-6")){D6 = 1}
  64. if(moneyClk("B"+aaL()+"S-7")){D7 = 1}
  65.  
  66.  
  67. #E2 af Mic Spammeren
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement