API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Apr 12th, 2020
140
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.48 KB | None | 0 0
raw download clone embed print report
  1. @name Ammu Nation Gunshop | By Sandpapir V1.0
  2. @inputs [EGP]:wirelink [User, R1, R2, R3, R4, R5, R6, R7, R8]:entity
  3. @outputs
  4. @persist [T]:table [Font]:string [MOTD, F1, F2]:array [Profit, S, A]:number [LoginPlayer]:entity
  5. if(first())
  6. {
  7. #[ DENNE E2 ER LAVET AF Mic [STEAM_0:1:73536783] ]#
  8. # INDSTILLINGER #
  9. T["Settings",table] = table()
  10. T["Settings",table]["Profit",number] = 3000 #[ <-- Profit ]#
  11. T["Settings",table]["ClosedMessage",string] = ": Kom tilbage igen om noget tid :" #[ <-- Denne besked vises naar gunshoppen er lukket ]#
  12. T["Settings",table]["OpfylderMessage",string] = ": Kom tilbage igen om noget tid :" #[ <-- Denne besked vises naar gunshop status er sat til opfylder ]#
  13.  
  14. T["Settings",table]["PMPrefix",string] = "Ammunation : " #[ <-- PM prefix. ]#
  15. T["Settings",table]["PrintPrefix",string] = "Ammunation : " #[ <-- Print prefix. ]#
  16. T["Settings",table]["Font",string] = "Arial" #[ <-- Texttypen paa E2'en ]#
  17.  
  18. #[ En lille besked der vises i toppen af loginskaermen (valeger tilfaeldigt) ]#
  19. T["MOTD",array] = array(
  20. "Sl"+aa()+"r du dit hoved imod en v"+ae()+"g i en time br"+ae()+"nde 150 kalorier",
  21. "I Schweiz er det ulovligt kun at eje 1 marsvin",
  22. "Slanger kan forudse jordsk"+ae()+"lv",
  23. "Den "+ae()+"ldste 'din mor' joke er 3.500 "+aa()+"r gammel",
  24. "'Cherophobia' er en frygt for sjov og gl"+ae()+"de",
  25. "7% af America tror at chokoladem"+ae()+"lk kommer fra brune k"+oe()+"er",
  26. "Hvis du l"+oe()+"fter en k"+ae()+"nguru's hale fra jorden kan den ikke hoppe",
  27. "Bananer er b"+oe()+"jet fordi de gror mod solen"
  28. )
  29.  
  30. # DON'T TOUCH #
  31. function p(P:string)
  32. { printColor(vec(156,46,33),"" + T["Settings",table]["PrintPrefix",string] + "",vec(255,255,255),""+P) }
  33. function void eRemove(EScreen:wirelink,NumArray:array) {
  34. foreach(K,V:number=NumArray) {
  35. EScreen:egpRemove(V)
  36. }
  37. }
  38. function number entity:wepPrice(){
  39. if(This:isShipment()){
  40. return (This:shipmentPrice()+T["Settings",table]["Profit",number])
  41. }else{return 0}
  42. }
  43. function string entity:wepName(){
  44. if(This:isShipment()){
  45. return This:shipmentName()
  46. }else{return "Udsolgt"}
  47. }
  48. function number wirelink:egpButton(Index:number,Player:entity){
  49. Pos=This:egpPos(Index)
  50. Size=This:egpSize(Index)/2
  51. return inrange(This:egpCursor(Player),Pos-Size,Pos+Size)
  52. }
  53.  
  54. # DESIGN #
  55. function startUp(){
  56. Font = T["Settings",table]["Font",string]
  57. MOTD = T["MOTD",array]
  58. F1 = array(10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,41,42,43,44,45,46,47,48,49,50,51,52)
  59. F2 = array(10,11,12,13,14,15,16,17,18,19)
  60. Profit = T["Settings",table]["Profit",number]
  61.  
  62. runOnChat(1)
  63.  
  64. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  65. EGP:egpColor(1,156,46,33,255)
  66. EGP:egpText(2,"AMMU - NATION",vec2(261,2))
  67. EGP:egpAlign(2,1,0)
  68. EGP:egpSize(2,65)
  69. EGP:egpFont(2,"Arial")
  70. EGP:egpPoly(3,vec2(256-17,4),vec2(264-17,24),vec2(248-17,24))
  71. EGP:egpPoly(4,vec2(264-17,24),vec2(283-17,24),vec2(268-17,40))
  72. EGP:egpPoly(5,vec2(268-17,40),vec2(273-17,60),vec2(256-17,47))
  73. EGP:egpPoly(6,vec2(257-17,47),vec2(239-17,60),vec2(246-17,40))
  74. EGP:egpPoly(7,vec2(246-17,40),vec2(230-17,24),vec2(249-17,24))
  75. EGP:egpPoly(8,vec2(248-17,24),vec2(264-17,24),vec2(268-17,40),vec2(256-17,47),vec2(246-17,40))
  76. EGP:egpLine(9,vec2(0,65),vec2(512,65))
  77.  
  78. EGP:egpText(911,"Lavet af Mic",vec2(1,513))
  79. EGP:egpAlign(911,0,2)
  80. EGP:egpSize(911,15)
  81. EGP:egpFont(911,Font)
  82.  
  83. timer("FORSIDE",500)
  84. }
  85. function forside(){
  86. eRemove(EGP,F1)
  87.  
  88. EGP:egpBoxOutline(10,vec2(256,225-40),vec2(300,40))
  89. EGP:egpBoxOutline(11,vec2(256,320-40),vec2(300,40))
  90. EGP:egpText(12,"BRUGERNAVN",vec2(104,208-40))
  91. EGP:egpAlign(12,0,2)
  92. EGP:egpSize(12,25)
  93. EGP:egpFont(12,Font)
  94. EGP:egpText(13,"ADGANGSKODE",vec2(106,303-40))
  95. EGP:egpAlign(13,0,2)
  96. EGP:egpSize(13,25)
  97. EGP:egpFont(13,Font)
  98. EGP:egpText(14,"Brugernavn",vec2(108,224-40))
  99. EGP:egpAlign(14,0,1)
  100. EGP:egpSize(14,30)
  101. EGP:egpFont(14,Font)
  102. EGP:egpAlpha(14,120)
  103. EGP:egpText(15,"Adgangskode",vec2(108,319-40))
  104. EGP:egpAlign(15,0,1)
  105. EGP:egpSize(15,30)
  106. EGP:egpFont(15,Font)
  107. EGP:egpAlpha(15,120)
  108.  
  109. EGP:egpBoxOutline(16,vec2(256,380-40),vec2(200,40))
  110. EGP:egpText(17,"LOGIN",vec2(256,381-40))
  111. EGP:egpAlign(17,1,1)
  112. EGP:egpSize(17,35)
  113. EGP:egpFont(17,Font)
  114. EGP:egpBox(18,vec2(256,380-40),vec2(200,40)) ##
  115. EGP:egpAlpha(18,0)
  116.  
  117. I = random(1,MOTD:count())
  118.  
  119. EGP:egpText(19,""+MOTD[I,string]+"",vec2(256,75))
  120. EGP:egpAlign(19,1,1)
  121. EGP:egpSize(19,15)
  122.  
  123. S = 1.0
  124. }
  125. function gunshop(){
  126. eRemove(EGP,F2)
  127.  
  128. timer("Gunshop1",50)
  129. timer("Gunshop2",400)
  130. timer("Gunshop3",700)
  131. timer("Gunshop4",1000)
  132. }
  133. function gunshop1(){
  134. EGP:egpBoxOutline(10,vec2(128,120),vec2(150,50))
  135. EGP:egpBoxOutline(11,vec2(128,220),vec2(150,50))
  136. EGP:egpBoxOutline(12,vec2(128,320),vec2(150,50))
  137. EGP:egpBoxOutline(13,vec2(128,420),vec2(150,50))
  138.  
  139. EGP:egpBoxOutline(14,vec2(384,120),vec2(150,50))
  140. EGP:egpBoxOutline(15,vec2(384,220),vec2(150,50))
  141. EGP:egpBoxOutline(16,vec2(384,320),vec2(150,50))
  142. EGP:egpBoxOutline(17,vec2(384,420),vec2(150,50))
  143. }
  144. function gunshop2(){
  145. EGP:egpText(18,R1:wepName(),vec2(128,112))
  146. EGP:egpAlign(18,1,1)
  147. EGP:egpSize(18,20)
  148. EGP:egpFont(18,Font)
  149. EGP:egpText(20,R2:wepName(),vec2(128,212))
  150. EGP:egpAlign(20,1,1)
  151. EGP:egpSize(20,20)
  152. EGP:egpFont(20,Font)
  153. EGP:egpText(22,R3:wepName(),vec2(128,312))
  154. EGP:egpAlign(22,1,1)
  155. EGP:egpSize(22,20)
  156. EGP:egpFont(22,Font)
  157. EGP:egpText(24,R4:wepName(),vec2(128,412))
  158. EGP:egpAlign(24,1,1)
  159. EGP:egpSize(24,20)
  160. EGP:egpFont(24,Font)
  161. EGP:egpText(26,R5:wepName(),vec2(384,112))
  162. EGP:egpAlign(26,1,1)
  163. EGP:egpSize(26,20)
  164. EGP:egpFont(26,Font)
  165. EGP:egpText(28,R6:wepName(),vec2(384,212))
  166. EGP:egpAlign(28,1,1)
  167. EGP:egpSize(28,20)
  168. EGP:egpFont(28,Font)
  169. EGP:egpText(30,R7:wepName(),vec2(384,312))
  170. EGP:egpAlign(30,1,1)
  171. EGP:egpSize(30,20)
  172. EGP:egpFont(30,Font)
  173. EGP:egpText(32,R8:wepName(),vec2(384,412))
  174. EGP:egpAlign(32,1,1)
  175. EGP:egpSize(32,20)
  176. EGP:egpFont(32,Font)
  177. }
  178. function gunshop3(){
  179. EGP:egpText(19,""+R1:wepPrice(),vec2(128,130))
  180. EGP:egpAlign(19,1,1)
  181. EGP:egpSize(19,20)
  182. EGP:egpFont(19,Font)
  183. EGP:egpText(21,""+R2:wepPrice(),vec2(128,230))
  184. EGP:egpAlign(21,1,1)
  185. EGP:egpSize(21,20)
  186. EGP:egpFont(21,Font)
  187. EGP:egpText(23,""+R3:wepPrice(),vec2(128,330))
  188. EGP:egpAlign(23,1,1)
  189. EGP:egpSize(23,20)
  190. EGP:egpFont(23,Font)
  191. EGP:egpText(25,""+R4:wepPrice(),vec2(128,430))
  192. EGP:egpAlign(25,1,1)
  193. EGP:egpSize(25,20)
  194. EGP:egpFont(25,Font)
  195. EGP:egpText(27,""+R5:wepPrice(),vec2(384,130))
  196. EGP:egpAlign(27,1,1)
  197. EGP:egpSize(27,20)
  198. EGP:egpFont(27,Font)
  199. EGP:egpText(29,""+R6:wepPrice(),vec2(384,230))
  200. EGP:egpAlign(29,1,1)
  201. EGP:egpSize(29,20)
  202. EGP:egpFont(29,Font)
  203. EGP:egpText(31,""+R7:wepPrice(),vec2(384,330))
  204. EGP:egpAlign(31,1,1)
  205. EGP:egpSize(31,20)
  206. EGP:egpFont(31,Font)
  207. EGP:egpText(33,""+R8:wepPrice(),vec2(384,430))
  208. EGP:egpAlign(33,1,1)
  209. EGP:egpSize(33,20)
  210. EGP:egpFont(33,Font)
  211. }
  212. function gunshop4(){
  213. EGP:egpBox(41,vec2(128,120),vec2(150,50)) EGP:egpAlpha(41,0) #
  214. EGP:egpBox(42,vec2(128,220),vec2(150,50)) EGP:egpAlpha(42,0) #
  215. EGP:egpBox(43,vec2(128,320),vec2(150,50)) EGP:egpAlpha(43,0) #
  216. EGP:egpBox(44,vec2(128,420),vec2(150,50)) EGP:egpAlpha(44,0) #
  217. EGP:egpBox(45,vec2(384,120),vec2(150,50)) EGP:egpAlpha(45,0) #
  218. EGP:egpBox(46,vec2(384,220),vec2(150,50)) EGP:egpAlpha(46,0) #
  219. EGP:egpBox(47,vec2(384,320),vec2(150,50)) EGP:egpAlpha(47,0) #
  220. EGP:egpBox(48,vec2(384,420),vec2(150,50)) EGP:egpAlpha(48,0) #
  221.  
  222. EGP:egpBoxOutline(49,vec2(256,502),vec2(200,22))
  223. EGP:egpText(50,"V"+ae()+"lg v"+aa()+"ben",vec2(256,503))
  224. EGP:egpAlign(50,1,1)
  225. EGP:egpSize(50,21)
  226. EGP:egpFont(50,Font)
  227. EGP:egpBox(51,vec2(256,502),vec2(200,22))
  228. EGP:egpAlpha(51,0)
  229. S = 2.0
  230. Klar = 1
  231. timer("LoginPlayerDistance",5000)
  232. }
  233.  
  234. if(->EGP)
  235. {
  236. timer("StartUp",500)
  237. EGP:egpClear()
  238. }
  239. else
  240. { p("Du har ikke wiret E2'en til nogen sk"+ae()+"rm") }
  241. }
  242.  
  243. ########################
  244. ##----- StartUp ----- ##
  245. ########################
  246. elseif(clk("StartUp"))
  247. { startUp() }
  248.  
  249. ######################
  250. ##----- DESIGN -----##
  251. ######################
  252. # Forside #
  253. elseif(clk("FORSIDE"))
  254. { forside() }
  255. # Gunshop #
  256. elseif(clk("GUNSHOP"))
  257. { gunshop() }
  258. elseif(clk("Gunshop1"))
  259. { gunshop1() }
  260. elseif(clk("Gunshop2"))
  261. { gunshop2() }
  262. elseif(clk("Gunshop3"))
  263. { gunshop3() }
  264. elseif(clk("Gunshop4"))
  265. { gunshop4() }
  266.  
  267. #########################
  268. ##----- egpButton -----##
  269. #########################
  270. elseif(S == 1.0 & ops() < 200)
  271. {
  272. if(EGP:egpButton(18, User) & User:keyUse())
  273. {
  274. timer("LoopN",200)
  275. LoginPlayer = User
  276. }
  277. }
  278.  
  279. ######################
  280. ##----- Timers -----##
  281. ######################
  282. elseif(clk("LoginPlayerDistance"))
  283. {
  284. if(((EGP:entity():pos() - LoginPlayer:pos()):length())>150)
  285. {
  286. timer("FORSIDE",200)
  287. C1 = 0 C2 = 0 C3 = 0 C4 = 0 C5 = 0 C6 = 0 C7 = 0 C8 = 0
  288. TotalPrice = 0
  289. stoptimer("LoginPlayerDistance")
  290. }
  291. else
  292. { timer("LoginPlayerDistance",3000) }
  293. }
  294. elseif(clk("LoopnN"))
  295. {
  296. Navn = LoginPlayer:name()
  297. Stop = Navn:length()
  298. A += 2
  299. #T = Navn:sub(1,A)
  300. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!