Advertisement
Guest User

E2 Kode for Mini gunshop

a guest
Jul 30th, 2016
440
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.35 KB | None | 0 0
  1. @name SimpeltGunBox
  2. @inputs EGP:wirelink Ranger
  3. @outputs User
  4. @persist Timeout Vaaben Pris VaabenNavn:string READY
  5. @trigger
  6.  
  7. ## VALG AF VAABEN SALG ##
  8.  
  9. ## 1: AK47 - Pris for 1: 1500 kr Pris for 10: 14500 kr
  10. ## 2: AK74 - Pris for 1: 1450 kr Pris for 10: 14000 kr
  11. ## 3: Famas - Pris for 1: 1450 kr Pris for 10: 14000 kr
  12. ## 4: G3A3 - Pris for 1: 1600 kr Pris for 10: 15500 kr
  13. ## 5: Deagle - Pris for 1: 650 kr Pris for 10: 6000 kr
  14. ## 6: Glock-20 - Pris for 1: 550 kr Pris for 10: 5000 kr
  15. ## 7: G36C - Pris for 1: 1550 kr Pris for 10: 15000 kr
  16. ## 8: M4A1 - Pris for 1: 1550 kr Pris for 10: 15000 kr
  17. ## 9: KS-23 - Pris for 1: 1200 kr Pris for 10: 11500 kr
  18. ## 10: M14 - Pris for 1: 2000 kr Pris for 10: 19000 kr
  19. ## 11: M82 - Pris for 1: 3500 kr Pris for 10: 32000 kr
  20. ## 12: M24 - Pris for 1: 2800 kr Pris for 10: 25000 kr
  21. ## 13: M21 - Pris for 1: 3000 kr Pris for 10: 28000 kr
  22. ## 14: Raging Bull - Pris for 1: 750 kr Pris for 10: 7000 kr
  23. ## 15: M1911 - Pris for 1: 500 kr Pris for 10: 4500 kr
  24. ## 16: OTs-33 Pernach - Pris for 1: 800 kr Pris for 10: 7500 kr
  25. ## 17: P228 - Pris for 1: 600 kr Pris for 10: 5500 kr
  26. ## 18: PP-19 Bizon - Pris for 1: 1050 kr Pris for 10: 10000 kr
  27. ## 19: MP5 - Pris for 1: 1100 kr Pris for 10: 10500 kr
  28. ## 20: SKS - Pris for 1: 2400 kr Pris for 10: 23000 kr
  29. ## 21: RPK-47 - Pris for 1: 1900 kr Pris for 10: 18000 kr
  30. ## 22: M3 Shotgun - Pris for 1: 1300 kr Pris for 10: 12500 kr
  31. ## 23: SR-25 - Pris for 1: 2850 kr Pris for 10: 28000 kr
  32. ## 24: SG 552 - Pris for 1: 1500 kr Pris for 10: 14500 kr
  33. ## 25: SG 550 - Pris for 1: 1550 kr Pris for 10: 15000 kr
  34. ## 26: UZI - Pris for 1: 1050 kr Pris for 10: 10000 kr
  35. if(first())
  36. {
  37. ## Vaelg det vaaben du vil saelge
  38. Vaaben = 1
  39.  
  40. ## Vaelg den pris du vil saelge vaabnet for
  41. Pris = 10000
  42.  
  43. }
  44.  
  45. runOnTick(1)
  46.  
  47. switch(Vaaben){
  48. case 1, VaabenNavn = "AK47", break
  49. case 2, VaabenNavn = "AK74", break
  50. case 3, VaabenNavn = "Famas", break
  51. case 4, VaabenNavn = "G3A3", break
  52. case 5, VaabenNavn = "Deagle", break
  53. case 6, VaabenNavn = "Glock-20", break
  54. case 7, VaabenNavn = "G36C", break
  55. case 8, VaabenNavn = "M4A1", break
  56. case 9, VaabenNavn = "KS-23", break
  57. case 10, VaabenNavn = "M14", break
  58. case 11, VaabenNavn = "M82", break
  59. case 12, VaabenNavn = "M24", break
  60. case 13, VaabenNavn = "M21", break
  61. case 14, VaabenNavn = "Raging Bull", break
  62. case 15, VaabenNavn = "M1911", break
  63. case 16, VaabenNavn = "OTs-33 Pernach", break
  64. case 17, VaabenNavn = "P228", break
  65. case 18, VaabenNavn = "PP-19 Bizon", break
  66. case 19, VaabenNavn = "MP5", break
  67. case 20, VaabenNavn = "SKS", break
  68. case 21, VaabenNavn = "RPK-47", break
  69. case 22, VaabenNavn = "M3", break
  70. case 23, VaabenNavn = "SR-25", break
  71. case 24, VaabenNavn = "SG 552", break
  72. case 25, VaabenNavn = "SG 550", break
  73. case 26, VaabenNavn = "UZI", break
  74.  
  75.  
  76. }
  77.  
  78.  
  79. if(!READY && Ranger >0)
  80. {
  81.  
  82. EGP:egpClear()
  83. EGP:egpDrawTopLeft(1)
  84. EGP:egpBox(1,vec2(0,0),vec2(512,512))
  85. EGP:egpColor(1, vec(0,0,0))
  86. EGP:egpRoundedBox(2,vec2(20,60),vec2(470,400))
  87. EGP:egpColor(2, vec(90,90,90))
  88.  
  89. if(Vaaben == 6){
  90. EGP:egpBox(3, vec2(16,75),vec2(480,10))
  91. EGP:egpColor(3, vec(255,255,255))
  92. EGP:egpText(3, VaabenNavn,vec2(80,150))
  93. EGP:egpSize(3, 100)
  94. }elseif(Vaaben == 14){
  95. EGP:egpBox(3, vec2(16,75),vec2(480,10))
  96. EGP:egpColor(3, vec(255,255,255))
  97. EGP:egpText(3, VaabenNavn,vec2(40,160))
  98. EGP:egpSize(3, 90)
  99. }elseif(Vaaben == 16){
  100. EGP:egpBox(3, vec2(16,75),vec2(480,10))
  101. EGP:egpColor(3, vec(255,255,255))
  102. EGP:egpText(3, VaabenNavn,vec2(30,170))
  103. EGP:egpSize(3, 68)
  104. }elseif(Vaaben == 18){
  105. EGP:egpBox(3, vec2(16,75),vec2(480,10))
  106. EGP:egpColor(3, vec(255,255,255))
  107. EGP:egpText(3, VaabenNavn,vec2(40,160))
  108. EGP:egpSize(3, 85)
  109. }else{
  110. EGP:egpBox(3, vec2(16,75),vec2(480,10))
  111. EGP:egpColor(3, vec(255,255,255))
  112. EGP:egpText(3, VaabenNavn,vec2(140,150))
  113. EGP:egpSize(3, 100)
  114. }
  115. EGP:egpText(4, Pris+" kr",vec2(140,250))
  116. EGP:egpColor(4, vec(10,255,10))
  117. EGP:egpSize(4, 80)
  118. READY=1
  119. Timeout=0
  120.  
  121.  
  122. }
  123.  
  124.  
  125. if(Ranger >0)
  126. {
  127. if(changed(EGP["User",entity])&EGP["User",entity])
  128. {
  129. User = 0
  130. LeftTop = EGP:egpPos(2)
  131. RightBottom = EGP:egpPos(2) + EGP:egpSize(2)
  132. Cursor = EGP:egpCursor(EGP["User",entity])
  133.  
  134. if(inrange(Cursor,LeftTop,RightBottom)&READY==1)
  135. {
  136. moneyRequest(EGP["User",entity],Pris,"TheFee",13) ## 13 er Request tiden
  137. READY=0
  138. Timeout=0
  139. }
  140.  
  141. }
  142. }
  143.  
  144.  
  145. if(moneyClk("TheFee")){
  146. hint(""+moneyClkPlayer():name()+" har kobt en "+VaabenNavn+" for: "+Pris+" kr",5000)
  147. User = 1
  148. READY=0
  149. Timeout=0
  150. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement