Advertisement
Slamboe

Fakta Gunshop V2

Oct 9th, 2019
366
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 27.54 KB | None | 0 0
  1. #Den orginale code for denne e2 er mountain gunshopen har bare
  2. #lavet om i den s credits til merlin for mountain gunshop og
  3. #og muligheden for at lave den her e2 <3
  4.  
  5. @name Fakta | Gunshop | Version 2 | Kodet af Slamboe
  6. @inputs EGP:wirelink User:entity CP:wirelink [KU,R1,R2,R3,R4,R5,R6,R7,R8]:entity
  7. @outputs U1 U2 U3 U4 U5 U6 U7 U8
  8. @persist CurUser:entity [Profit,C1,C2,C3,C4,C5,C6,C7,C8,Pris,Count,Omsat,Tjent,Klar,S,SS,OpeningTime,M]:number [Butiknavn, Velkommen, Name,Link,Seneste]:string [FinalVelkommen, FinalName]:array
  9. @trigger
  10. if(duped() | dupefinished()){reset()}
  11. if(first()){
  12.  
  13. ## - - - - INDSTILLINGER - - - - ##
  14. Profit = 750
  15. Butiknavn = "Fakta"
  16.  
  17. ## - - - - FUNC & TIMERS & ANDET - - - - ##
  18.  
  19. #- - - TIMERS & NAME
  20. timer("stage1",250)
  21. stoptimer("CurUserDistance")
  22. timer("kon1",1000)
  23. timer("kon2",2000)
  24. timer("Tid",3000)
  25. runOnChat(1)
  26.  
  27. setName("- Fakta Gunshop -
  28. - Udviklet af Slamboe
  29. - Version 2 -")
  30.  
  31.  
  32.  
  33. # - - - FUNC
  34. function number wirelink:egpButton(Idx:number,Ply:entity)
  35. {
  36. TL = This:egpPos(Idx) - This:egpSize(Idx) / 2 * (0 ? 0 : 1)
  37. BR = This:egpPos(Idx) + This:egpSize(Idx) / (0 ? 1 : 2)
  38. Cur = This:egpCursor(Ply) return inrange(Cur, TL, BR) exit()
  39. }
  40.  
  41. function number entity:wepPrice()
  42. {
  43. if(This:isShipment()){
  44. return (This:shipmentPrice()+Profit)
  45. }else{return 0}
  46. }
  47.  
  48. function string entity:wepName()
  49. {
  50. if(This:isShipment()){
  51. return This:shipmentName()
  52. }else{return "Udsolgt"}
  53. }
  54.  
  55.  
  56. function void addCursor()
  57. {
  58. EGP:egpPoly(999,array(vec2(0,0),vec2(0,15),vec2(3,12),vec2(5,15),vec2(7,15),vec2(6,11),vec2(10,10)))
  59. EGP:egpColor(999,0,0,0,200)
  60. EGP:egpParentToCursor(999)
  61. }
  62.  
  63. function void addCursor()
  64. {
  65. CP:egpPoly(999,array(vec2(0,0),vec2(0,15),vec2(3,12),vec2(5,15),vec2(7,15),vec2(6,11),vec2(10,10)))
  66. CP:egpColor(999,0,0,0,200)
  67. CP:egpParentToCursor(999)
  68. }
  69.  
  70. ##TID
  71. function string returnTime()
  72. {
  73. SSec=time("sec")
  74. MMin=time("min")
  75. HHour=time("hour")+1
  76. if(SSec<10){Sec="0"+SSec}
  77. else{Sec=""+SSec}
  78. if(MMin<10){Min="0"+MMin}
  79. else{Min=""+MMin}
  80. if(HHour<10){Hour="0"+HHour} elseif(HHour==24){Hour="00"}
  81. elseif(HHour==25){Hour="01"} elseif(HHour==26){Hour="02"}
  82. elseif(HHour==27){Hour="03"} elseif(HHour==28){Hour="04"}
  83. elseif(HHour==29){Hour="05"} elseif(HHour==30){Hour="06"}
  84. else{Hour=""+HHour}
  85. Tid=Hour+":"+Min
  86. return Tid
  87. }
  88.  
  89. ## - - - - IKKE PILLE SKRID - - - - ##
  90. printColor(vec(255,255,255),"----------------===============INFO===============----------------")
  91. printColor(vec(225,225,225),"[ ",vec(123,172,75),""+Butiknavn+"",vec(225,225,225)," ]",vec(200,200,200)," Ved brug af Fakta v2 acceptere du vores",vec(255,0,0)," TOS! ",vec(57,194,86),+Link)
  92. printColor(vec(225,225,225),"[ ",vec(123,172,75),""+Butiknavn+"",vec(225,225,225)," ]",vec(200,200,200)," Brug ",vec(57,194,86),"!help",vec(200,200,200)," for at se en liste over tilg"+ae()+"ngelige commands!")
  93. printColor(vec(225,225,225),"[ ",vec(123,172,75),""+Butiknavn+"",vec(225,225,225)," ]",vec(200,200,200)," Denne E2 er udviklet af Slamboe!")
  94. printColor(vec(225,225,225),"[ ",vec(123,172,75),""+Butiknavn+"",vec(225,225,225)," ]",vec(200,200,200)," "+Butiknavn+" gunshop er startet 50% op! Og er klar til brug")
  95. printColor(vec(255,255,255),"----------------===============INFO===============----------------")
  96.  
  97.  
  98. }
  99. ## - - - FORSIDE - - - ##
  100.  
  101. if(clk("stage1")){
  102. Y = 25
  103. S = 1
  104.  
  105. EGP:egpClear()
  106.  
  107. ##Baggrund
  108. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  109.  
  110. EGP:egpBox(2,vec2(256,256),vec2(512,512))
  111. EGP:egpMaterial(2,"console/background01")
  112. EGP:egpAlpha(2,250)
  113. EGP:egpColor(2,vec(255,0,0))
  114.  
  115. EGP:egpBox(3,vec2(256,256),vec2(512,512))
  116. EGP:egpMaterial(3,"gui/gradient_up")
  117. EGP:egpColor(3,vec(0,13,255))
  118.  
  119. ##Navn
  120. EGP:egpText(4,""+Butiknavn+"",vec2(256,280))
  121. EGP:egpAlign(4,1,1)
  122. EGP:egpSize(4,60)
  123. EGP:egpFont(4,"Courier New")
  124.  
  125. EGP:egpBox(5,vec2(256,300),vec2(300,1))
  126.  
  127. EGP:egpText(6,"Gunshop",vec2(256,315))
  128. EGP:egpAlign(6,1,1)
  129. EGP:egpSize(6,32)
  130. EGP:egpFont(6,"Courier New")
  131.  
  132. CurUser = noentity() C1=0 C2=0 C3=0 C4=0 C5=0 C6=0 C7=0 C8=0 Pris = 0
  133. addCursor()
  134. }
  135.  
  136. ## - - - VELKOMMEN - - - ##
  137.  
  138. if(clk("stagesvel")){
  139.  
  140. S = 2
  141.  
  142. EGP:egpClear()
  143.  
  144. ##Baggrund
  145. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  146.  
  147. EGP:egpBox(2,vec2(256,256),vec2(512,512))
  148. EGP:egpMaterial(2,"console/background01")
  149. EGP:egpAlpha(2,250)
  150. EGP:egpColor(2,vec(255,0,0))
  151.  
  152. EGP:egpBox(3,vec2(256,256),vec2(512,512))
  153. EGP:egpMaterial(3,"gui/gradient_up")
  154. EGP:egpColor(3,vec(0,13,255))
  155.  
  156. Velkommen="-"
  157. EGP:egpText(4,Velkommen,vec2(256,238))
  158. EGP:egpAlign(4,1,1)
  159. EGP:egpSize(4,52)
  160. EGP:egpFont(4,"Courier New")
  161.  
  162. Name="-"
  163. EGP:egpText(5,Name,vec2(256,274))
  164. EGP:egpAlign(5,1,1)
  165. EGP:egpSize(5,52)
  166. EGP:egpFont(5,"Courier New")
  167.  
  168. EGP:egpText(6,"",vec2(256,50))
  169. EGP:egpAlign(6,1,1)
  170. EGP:egpSize(6,22)
  171. EGP:egpFont(6,"Courier New")
  172.  
  173. EGP:egpText(7,"",vec2(256,75))
  174. EGP:egpAlign(7,1,1)
  175. EGP:egpSize(7,22)
  176. EGP:egpFont(7,"Courier New")
  177.  
  178. EGP:egpText(8,"",vec2(256,100))
  179. EGP:egpAlign(8,1,1)
  180. EGP:egpSize(8,22)
  181. EGP:egpFont(8,"Courier New")
  182.  
  183. timer("Velkommen",100)
  184. }
  185.  
  186. ## - - - Shop - - - "
  187.  
  188. if(clk("stageshop")){
  189.  
  190. S = 3
  191. EGP:egpClear()
  192.  
  193. ##Baggrund
  194. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  195.  
  196. EGP:egpBox(2,vec2(256,256),vec2(512,512))
  197. EGP:egpMaterial(2,"console/background01")
  198. EGP:egpAlpha(2,250)
  199. EGP:egpColor(2,vec(255,0,0))
  200.  
  201. EGP:egpBox(3,vec2(256,256),vec2(512,512))
  202. EGP:egpMaterial(3,"gui/gradient_up")
  203. EGP:egpColor(3,vec(0,13,255))
  204.  
  205. EGP:egpBoxOutline(4,vec2(256,256),vec2(325,514))
  206. EGP:egpColor(4,vec4(0,0,0,125))
  207. EGP:egpBox(5,vec2(256,256),vec2(323,514))
  208. EGP:egpColor(5,vec4(45,45,45,125))
  209.  
  210. ##Logud knap
  211. EGP:egpBox(6,vec2(111,17),vec2(34,34))
  212. EGP:egpColor(6,vec(255,0,0))
  213.  
  214. EGP:egpBox(7,vec2(111,17),vec2(1,34))
  215. EGP:egpAngle(7,45)
  216.  
  217. EGP:egpBox(8,vec2(111,17),vec2(1,34))
  218. EGP:egpAngle(8,-45)
  219.  
  220. ##Navn
  221. EGP:egpText(9,"Fakta",vec2(256,65))
  222. EGP:egpAlign(9,1,1)
  223. EGP:egpSize(9,50)
  224. EGP:egpFont(9,"Courier New")
  225.  
  226. EGP:egpBox(10,vec2(256,85),vec2(250,1))
  227.  
  228. EGP:egpText(11,"Gunshop",vec2(256,100))
  229. EGP:egpAlign(11,1,1)
  230. EGP:egpSize(11,32)
  231. EGP:egpFont(11,"Courier New")
  232.  
  233. ##Vaaben boxe
  234. for(I=1, 8){EGP:egpBox(13+I,vec2(256,138+(I*38)),vec2(310,35)) EGP:egpColor(13+I,vec4(28,28,28,125))}
  235.  
  236. ##Tekst
  237. EGP:egpText(22,"Navn:",vec2(130,148))
  238. EGP:egpAlign(22,1,1)
  239. EGP:egpSize(22,16)
  240. EGP:egpFont(22,"Courier New")
  241.  
  242. EGP:egpText(23,"Pris:",vec2(384,148))
  243. EGP:egpAlign(23,1,1)
  244. EGP:egpSize(23,16)
  245. EGP:egpFont(23,"Courier New")
  246.  
  247. ##Betalings knap
  248. EGP:egpBox(24,vec2(256,500),vec2(325,30))
  249. EGP:egpColor(24,vec(255,0,0))
  250.  
  251. EGP:egpBox(25,vec2(256,486),vec2(325,1))
  252. EGP:egpColor(25,vec(200,200,200))
  253.  
  254. EGP:egpText(26,"INGEN VARER VALGT!",vec2(255,500))
  255. EGP:egpAlign(26,1,1)
  256. EGP:egpSize(26,16)
  257. EGP:egpFont(26,"Courier New")
  258.  
  259. EGP:egpText(27,"~ ~ ~ ~ ~ ~ ~ BETALING ~ ~ ~ ~ ~ ~ ~",vec2(256,474))
  260. EGP:egpAlign(27,1,1)
  261. EGP:egpSize(27,14)
  262. EGP:egpFont(27,"Courier New")
  263.  
  264.  
  265. timer("stagen",500)
  266. timer("stagep",1000)
  267. }
  268.  
  269. ## - - - SHOP TEXT - - -##
  270.  
  271. if(clk("stagen")){
  272.  
  273. S = 3
  274.  
  275. EGP:egpText(29,""+R1:wepName(),vec2(110,176))
  276. EGP:egpText(30,""+R2:wepName(),vec2(110,214))
  277. EGP:egpText(31,""+R3:wepName(),vec2(110,252))
  278. EGP:egpText(32,""+R4:wepName(),vec2(110,290))
  279. EGP:egpText(33,""+R5:wepName(),vec2(110,328))
  280. EGP:egpText(34,""+R6:wepName(),vec2(110,366))
  281. EGP:egpText(35,""+R7:wepName(),vec2(110,404))
  282. EGP:egpText(36,""+R8:wepName(),vec2(110,442))
  283. for(I=1,8){EGP:egpAlign(28+I,0,1) EGP:egpFont(28+I,"Courier New") EGP:egpSize(28+I,20)}
  284. }
  285. if(clk("stagep")){
  286.  
  287. S = 3
  288.  
  289. EGP:egpText(38,""+R1:wepPrice()+",-",vec2(404,166))
  290. EGP:egpText(39,""+R2:wepPrice()+",-",vec2(404,204))
  291. EGP:egpText(40,""+R3:wepPrice()+",-",vec2(404,242))
  292. EGP:egpText(41,""+R4:wepPrice()+",-",vec2(404,280))
  293. EGP:egpText(42,""+R5:wepPrice()+",-",vec2(404,318))
  294. EGP:egpText(43,""+R6:wepPrice()+",-",vec2(404,356))
  295. EGP:egpText(44,""+R7:wepPrice()+",-",vec2(404,394))
  296. EGP:egpText(45,""+R8:wepPrice()+",-",vec2(404,432))
  297. for(I=1,8){EGP:egpAlign(37+I,2) EGP:egpFont(37+I,"Courier New") EGP:egpSize(37+I,20)}
  298. addCursor()
  299. }
  300. # - - - KONTROL PANEL - - - #
  301.  
  302. if(clk("kon1")){
  303.  
  304. SS = 1
  305.  
  306. Y = -12
  307.  
  308. CP:egpClear()
  309.  
  310. ##Baggrund
  311. CP:egpBox(1,vec2(256,256),vec2(512,512))
  312.  
  313. CP:egpBox(2,vec2(256,256),vec2(512,512))
  314. CP:egpMaterial(2,"console/background01")
  315. CP:egpAlpha(2,250)
  316. CP:egpColor(2,vec(255,0,0))
  317.  
  318. CP:egpBox(3,vec2(256,256),vec2(512,512))
  319. CP:egpMaterial(3,"gui/gradient_up")
  320. CP:egpColor(3,vec(0,13,255))
  321.  
  322. ##Navn
  323. CP:egpText(4,"- Fakta -",vec2(282,40))
  324. CP:egpAlign(4,1,1)
  325. CP:egpSize(4,50)
  326. CP:egpFont(4,"Courier New")
  327.  
  328. ##MENU LINJE
  329. CP:egpBox(7,vec2(26,256),vec2(50,512))
  330. CP:egpColor(7,vec(255,166,0))
  331.  
  332. CP:egpBox(8,vec2(52,256),vec2(1,512))
  333. CP:egpColor(8,vec(0,255,8))
  334.  
  335. ##TEGN
  336. CP:egpText(9,"F",vec2(25,25))
  337. CP:egpAlign(9,1,1)
  338. CP:egpSize(9,25)
  339. CP:egpFont(9,"Courier New")
  340.  
  341.  
  342. ##FOR LOGO
  343. CP:egpBox(10,vec2(282,75),vec2(462,1))
  344. CP:egpColor(10,vec(200,200,200))
  345.  
  346. ##STATISTIKKER
  347. CP:egpBox(14,vec2(282,184-Y),vec2(300,50))
  348. CP:egpColor(14,vec(0,149,255))
  349.  
  350. CP:egpText(15,"STATISTIKKER",vec2(282,186-Y))
  351. CP:egpAlign(15,1,1)
  352. CP:egpSize(15,32)
  353. CP:egpFont(15,"Courier New")
  354. }
  355.  
  356. if(clk("kon2")){
  357.  
  358. SS = 1
  359.  
  360. Y = -12
  361.  
  362.  
  363. ##VAABEN TJEK
  364. CP:egpBox(16,vec2(282,242-Y),vec2(300,50))
  365. CP:egpColor(16,vec(56,138,67))
  366.  
  367. CP:egpText(17,"TJEK V"+aaL()+"BEN",vec2(282,242-Y))
  368. CP:egpAlign(17,1,1)
  369. CP:egpSize(17,32)
  370. CP:egpFont(17,"Courier New")
  371.  
  372. ##INDSTILLINGER
  373. CP:egpBox(18,vec2(282,300-Y),vec2(300,50))
  374. CP:egpColor(18,vec(255,0,225))
  375.  
  376. CP:egpText(19,"INDSTILLINGER",vec2(282,300-Y))
  377. CP:egpAlign(19,1,1)
  378. CP:egpSize(19,32)
  379. CP:egpFont(19,"Courier New")
  380.  
  381. ##KLOKKE
  382. CP:egpBox(20,vec2(282,360-Y),vec2(300,50))
  383. CP:egpColor(20,vec4(0,127,127,150))
  384.  
  385. CP:egpText(21,"",vec2(282,360-Y))
  386. CP:egpAlign(21,1,1)
  387. CP:egpSize(21,30)
  388. CP:egpFont(21,"Courier New")
  389.  
  390. ##UNDERSTREG
  391. CP:egpBox(22,vec2(282,221),vec2(300,1))
  392. CP:egpBox(23,vec2(282,279),vec2(300,1))
  393. CP:egpBox(24,vec2(282,337),vec2(300,1))
  394. CP:egpBox(25,vec2(282,397),vec2(300,1))
  395. addCursor()
  396. }
  397.  
  398. if(clk("kstat")){
  399.  
  400. SS = 2
  401. CP:egpClear()
  402.  
  403. ##Baggrund
  404. CP:egpBox(1,vec2(256,256),vec2(512,512))
  405.  
  406. CP:egpBox(2,vec2(256,256),vec2(512,512))
  407. CP:egpMaterial(2,"console/background01")
  408. CP:egpAlpha(2,250)
  409. CP:egpColor(2,vec(255,0,0))
  410.  
  411. CP:egpBox(3,vec2(256,256),vec2(512,512))
  412. CP:egpMaterial(3,"gui/gradient_up")
  413. CP:egpColor(3,vec(0,13,255))
  414.  
  415. ##Navn
  416. CP:egpText(4,"- Fakta -",vec2(282,40))
  417. CP:egpAlign(4,1,1)
  418. CP:egpSize(4,50)
  419. CP:egpFont(4,"Courier New")
  420.  
  421. ##MENU LINJE
  422. CP:egpBox(5,vec2(26,256),vec2(50,512))
  423. CP:egpColor(5,vec(255,166,0))
  424.  
  425. CP:egpBox(6,vec2(52,256),vec2(1,512))
  426. CP:egpColor(6,vec(0,255,8))
  427.  
  428. ##TEGN
  429. CP:egpText(7,"F",vec2(25,25))
  430. CP:egpAlign(7,1,1)
  431. CP:egpSize(7,25)
  432. CP:egpFont(7,"Courier New")
  433.  
  434. ##FOR LOGO
  435. CP:egpBox(8,vec2(282,75),vec2(462,1))
  436. CP:egpColor(8,vec(200,200,200))
  437.  
  438. CP:egpBox(9,vec2(282,290),vec2(300,350))
  439. CP:egpColor(9,vec4(45,45,45,125))
  440.  
  441. ##MENU
  442. CP:egpBox(10,vec2(282,160),vec2(300,1))
  443. CP:egpColor(10,vec(74,119,143))
  444.  
  445. CP:egpText(11,"- STATISTIKKER -",vec2(282,140))
  446. CP:egpAlign(11,1,1)
  447. CP:egpSize(11,22)
  448. CP:egpFont(11,"Courier New")
  449.  
  450. ##LOGUD
  451. CP:egpBox(12,vec2(25,256),vec2(30,30))
  452. CP:egpMaterial(12,"gui/close_32")
  453.  
  454. ##STATS
  455. CP:egpText(13,"- PROFIT: "+Profit+",-",vec2(154,206))
  456. CP:egpAlign(13,0,1)
  457. CP:egpSize(13,18)
  458. CP:egpFont(13,"Courier New")
  459.  
  460. CP:egpText(14,"- OMS"+aeL()+"TNING: "+Omsat+",-",vec2(154,226))
  461. CP:egpAlign(14,0,1)
  462. CP:egpSize(14,18)
  463. CP:egpFont(14,"Courier New")
  464.  
  465. CP:egpText(15,"- INDTJENT: "+Tjent+",-",vec2(154,246))
  466. CP:egpAlign(15,0,1)
  467. CP:egpSize(15,18)
  468. CP:egpFont(15,"Courier New")
  469.  
  470. CP:egpText(16,"- V"+aaL()+"BEN SOLGT: "+Count+" STK.",vec2(154,266))
  471. CP:egpAlign(16,0,1)
  472. CP:egpSize(16,18)
  473. CP:egpFont(16,"Courier New")
  474.  
  475. CP:egpText(17,"- SENETE KUNDE: INGEN",vec2(154,286))
  476. CP:egpAlign(17,0,1)
  477. CP:egpSize(17,18)
  478. CP:egpFont(17,"Courier New")
  479.  
  480. if(Seneste != ""){
  481. CP:egpSetText(17,"- SENETE KUNDE: "+Seneste)
  482. }else{
  483. CP:egpSetText(17,"- SENETE KUNDE: INGEN")
  484. }
  485.  
  486. CP:egpText(18,"- "+aaL()+"BNINGSTID: "+OpeningTime+" MIN",vec2(154,306))
  487. CP:egpAlign(18,0,1)
  488. CP:egpSize(18,18)
  489. CP:egpFont(18,"Courier New")
  490. addCursor()
  491. }
  492. if(clk("tw")){
  493.  
  494. SS = 3
  495.  
  496. CP:egpClear()
  497.  
  498. ##Baggrund
  499. CP:egpBox(1,vec2(256,256),vec2(512,512))
  500.  
  501. CP:egpBox(2,vec2(256,256),vec2(512,512))
  502. CP:egpMaterial(2,"console/background01")
  503. CP:egpAlpha(2,250)
  504. CP:egpColor(2,vec(255,0,0))
  505.  
  506. CP:egpBox(3,vec2(256,256),vec2(512,512))
  507. CP:egpMaterial(3,"gui/gradient_up")
  508. CP:egpColor(3,vec(0,13,255))
  509.  
  510. ##Navn
  511. CP:egpText(4,"- Fakta -",vec2(282,40))
  512. CP:egpAlign(4,1,1)
  513. CP:egpSize(4,50)
  514. CP:egpFont(4,"Courier New")
  515.  
  516. ##MENU LINJE
  517. CP:egpBox(5,vec2(26,256),vec2(50,512))
  518. CP:egpColor(5,vec(255,166,0))
  519.  
  520. CP:egpBox(6,vec2(52,256),vec2(1,512))
  521. CP:egpColor(6,vec(0,255,8))
  522.  
  523. ##TEGN
  524. CP:egpText(7,"F",vec2(25,25))
  525. CP:egpAlign(7,1,1)
  526. CP:egpSize(7,25)
  527. CP:egpFont(7,"Courier New")
  528.  
  529. ##FOR LOGO
  530. CP:egpBox(8,vec2(282,75),vec2(462,1))
  531. CP:egpColor(8,vec(200,200,200))
  532.  
  533. CP:egpBox(9,vec2(282,290),vec2(300,350))
  534. CP:egpColor(9,vec4(45,45,45,125))
  535.  
  536. ##MENU
  537. CP:egpBox(10,vec2(282,160),vec2(300,1))
  538. CP:egpColor(10,vec(74,119,143))
  539.  
  540. CP:egpText(11,"- TJEK V"+aaL()+"BEN -",vec2(282,140))
  541. CP:egpAlign(11,1,1)
  542. CP:egpSize(11,22)
  543. CP:egpFont(11,"Courier New")
  544.  
  545. ##LOGUD
  546. CP:egpBox(12,vec2(25,256),vec2(30,30))
  547. CP:egpMaterial(12,"gui/close_32")
  548.  
  549. CP:egpText(23,"! I = Indtjeneste A = Antal !",vec2(282,177))
  550. CP:egpAlign(23,1,1)
  551. CP:egpSize(23,16)
  552. CP:egpFont(23,"Courier New")
  553.  
  554. ##TEXT'
  555. CP:egpText(25,"1. "+R1:wepName()+" | I = "+R1:wepPrice()+",- | A = "+R1:shipmentAmount(),vec2(282,211))
  556. CP:egpText(26,"2. "+R2:wepName()+" | I = "+R2:wepPrice()+",- | A = "+R2:shipmentAmount(),vec2(282,245))
  557. CP:egpText(27,"3. "+R3:wepName()+" | I = "+R3:wepPrice()+",- | A = "+R3:shipmentAmount(),vec2(282,279))
  558. CP:egpText(28,"4. "+R4:wepName()+" | I = "+R4:wepPrice()+",- | A = "+R4:shipmentAmount(),vec2(282,312))
  559. CP:egpText(29,"5. "+R5:wepName()+" | I = "+R5:wepPrice()+",- | A = "+R5:shipmentAmount(),vec2(282,347))
  560. CP:egpText(30,"6. "+R6:wepName()+" | I = "+R6:wepPrice()+",- | A = "+R6:shipmentAmount(),vec2(282,379))
  561. CP:egpText(31,"7. "+R7:wepName()+" | I = "+R7:wepPrice()+",- | A = "+R7:shipmentAmount(),vec2(282,414))
  562. CP:egpText(32,"8. "+R8:wepName()+" | I = "+R8:wepPrice()+",- | A = "+R8:shipmentAmount(),vec2(282,447))
  563. for(I=1,8){CP:egpAlign(24+I,1,1) CP:egpFont(24+I,"Courier New") CP:egpSize(24+I,16)}
  564. addCursor()
  565. }
  566.  
  567. if(clk("ins")){
  568.  
  569. SS = 4
  570.  
  571. CP:egpClear()
  572.  
  573. ##Baggrund
  574. CP:egpBox(1,vec2(256,256),vec2(512,512))
  575.  
  576. CP:egpBox(2,vec2(256,256),vec2(512,512))
  577. CP:egpMaterial(2,"console/background01")
  578. CP:egpAlpha(2,250)
  579. CP:egpColor(2,vec(255,0,0))
  580.  
  581. CP:egpBox(3,vec2(256,256),vec2(512,512))
  582. CP:egpMaterial(3,"gui/gradient_up")
  583. CP:egpColor(3,vec(0,13,255))
  584.  
  585. ##Navn
  586. CP:egpText(4,"- Fakta -",vec2(282,40))
  587. CP:egpAlign(4,1,1)
  588. CP:egpSize(4,50)
  589. CP:egpFont(4,"Courier New")
  590.  
  591. ##MENU LINJE
  592. CP:egpBox(5,vec2(26,256),vec2(50,512))
  593. CP:egpColor(5,vec(255,166,0))
  594.  
  595. CP:egpBox(6,vec2(52,256),vec2(1,512))
  596. CP:egpColor(6,vec(0,255,8))
  597.  
  598. ##TEGN
  599. CP:egpText(7,"F",vec2(25,25))
  600. CP:egpAlign(7,1,1)
  601. CP:egpSize(7,25)
  602. CP:egpFont(7,"Courier New")
  603.  
  604. ##FOR LOGO
  605. CP:egpBox(8,vec2(282,75),vec2(462,1))
  606. CP:egpColor(8,vec(200,200,200))
  607.  
  608. CP:egpBox(9,vec2(282,290),vec2(300,350))
  609. CP:egpColor(9,vec4(45,45,45,125))
  610.  
  611. ##MENU
  612. CP:egpBox(10,vec2(282,160),vec2(300,1))
  613. CP:egpColor(10,vec(74,119,143))
  614.  
  615. CP:egpText(11,"- INDSTILLINGER -",vec2(282,140))
  616. CP:egpAlign(11,1,1)
  617. CP:egpSize(11,22)
  618. CP:egpFont(11,"Courier New")
  619.  
  620. ##LOGUD
  621. CP:egpBox(12,vec2(25,256),vec2(30,30))
  622. CP:egpMaterial(12,"gui/close_32")
  623.  
  624. CP:egpBox(13,vec2(282,256),vec2(220,40))
  625. CP:egpColor(13,vec4(83, 92, 104,150))
  626.  
  627. # -
  628. CP:egpBox(14,vec2(152,256),vec2(40,40))
  629. CP:egpColor(14,vec(255,0,0))
  630.  
  631. CP:egpText(15,"-",vec2(152,256))
  632. CP:egpAlign(15,1,1)
  633. CP:egpFont(15,"Courier New")
  634. CP:egpSize(15,24)
  635.  
  636. # +
  637. CP:egpBox(16,vec2(412,256),vec2(40,40))
  638. CP:egpColor(16,vec(0,255,68))
  639.  
  640. CP:egpText(17,"+",vec2(412,256))
  641. CP:egpAlign(17,1,1)
  642. CP:egpFont(17,"Courier New")
  643. CP:egpSize(17,24)
  644.  
  645. CP:egpText(18,""+Profit+",-",vec2(282,256))
  646. CP:egpAlign(18,1,1)
  647. CP:egpFont(18,"Courier New")
  648. CP:egpSize(18,18)
  649.  
  650. CP:egpText(19,"PROFIT:",vec2(282,226))
  651. CP:egpAlign(19,1,1)
  652. CP:egpFont(19,"Courier New")
  653. CP:egpSize(19,14)
  654.  
  655. # - - - - - - SKIFTE - - - - - - #
  656. CP:egpBox(20,vec2(282,366),vec2(220,40))
  657. CP:egpColor(20,vec4(83, 92, 104,150))
  658.  
  659. # <
  660. CP:egpBox(21,vec2(152,366),vec2(40,40))
  661. CP:egpColor(21,vec(255,0,0))
  662.  
  663. CP:egpText(22,"<",vec2(152,366))
  664. CP:egpAlign(22,1,1)
  665. CP:egpFont(22,"Courier New")
  666. CP:egpSize(22,24)
  667. # >
  668. CP:egpBox(23,vec2(412,366),vec2(40,40))
  669. CP:egpColor(23,vec(0,255,68))
  670.  
  671. CP:egpText(24,">",vec2(412,366))
  672. CP:egpAlign(24,1,1)
  673. CP:egpFont(24,"Courier New")
  674. CP:egpSize(24,24)
  675.  
  676. CP:egpText(25,""+aaL()+"ben",vec2(282,366))
  677. CP:egpAlign(25,1,1)
  678. CP:egpFont(25,"Courier New")
  679. CP:egpSize(25,18)
  680.  
  681. CP:egpText(26,"STATUS:",vec2(282,336))
  682. CP:egpAlign(26,1,1)
  683. CP:egpFont(26,"Courier New")
  684. CP:egpSize(26,14)
  685. addCursor()
  686. }
  687.  
  688.  
  689. ## - - - Login - - - ##
  690. if(S==1)
  691. {
  692. if(ops()<100)
  693. {
  694. if(~User & User & Klar == 0)
  695. {
  696. Klar = 1
  697. timer("klar1",2000)
  698.  
  699. CurUser = User
  700. if(EGP:egpButton(1, User)){timer("stagesvel", 400) Velkommen=" " FinalVelkommen="Velkommen":explode("") CurUser=User timer("CurUserDistance",2500)}
  701. }
  702. }
  703. }
  704.  
  705.  
  706. if(clk("klar1"))
  707. {
  708. Klar = 0
  709. }
  710.  
  711. ## - - - Logud - - - #
  712. if(S==3 & CurUser==User)
  713. {
  714. if(ops()<100){
  715. if(~User & User){
  716. if(EGP:egpButton(6, User)){timer("stage1", 400)}
  717. }
  718. }
  719. }
  720.  
  721. ################################# - - - - - - - GUNSHOP - - - - - - - #################################
  722.  
  723. ## - - - WEAPON SYSTEM - - - ##
  724. if(ops()<100){
  725. if(S == 3 & CurUser == User)
  726. {
  727. if(EGP:egpButton(24,User)&Pris>0){moneyRequest(CurUser,Pris,"Kondomer")}
  728. elseif(EGP:egpButton(14,User)&R1:isShipment()){
  729. if(C1==0){
  730. Pris = Pris+R1:wepPrice() C1 = 1 EGP:egpBox(46,vec2(102,176),vec2(1,35)) EGP:egpBox(47,vec2(411,176),vec2(1,35))
  731. }else{Pris = Pris-R1:wepPrice() C1 = 0 EGP:egpRemove(46) EGP:egpRemove(47)}
  732. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  733. }elseif(EGP:egpButton(15,User)&R2:isShipment()){
  734. if(C2==0){
  735. Pris = Pris+R2:wepPrice() C2 = 1 EGP:egpBox(48,vec2(102,214),vec2(1,35)) EGP:egpBox(49,vec2(411,214),vec2(1,35))
  736. }else{Pris = Pris-R2:wepPrice() C2 = 0 EGP:egpRemove(48) EGP:egpRemove(49)}
  737. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  738. }elseif(EGP:egpButton(16,User)&R3:isShipment()){
  739. if(C3==0){
  740. Pris = Pris+R3:wepPrice() C3 = 1 EGP:egpBox(50,vec2(102,252),vec2(1,35)) EGP:egpBox(51,vec2(411,252),vec2(1,35))
  741. }else{Pris = Pris-R3:wepPrice() C3 = 0 EGP:egpRemove(50) EGP:egpRemove(51)}
  742. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  743. }elseif(EGP:egpButton(17,User)&R4:isShipment()){
  744. if(C4==0){
  745. Pris = Pris+R4:wepPrice() C4 = 1 EGP:egpBox(52,vec2(102,290),vec2(1,35)) EGP:egpBox(53,vec2(411,290),vec2(1,35))
  746. }else{Pris = Pris-R4:wepPrice() C4 = 0 EGP:egpRemove(52) EGP:egpRemove(53)}
  747. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  748. }elseif(EGP:egpButton(18,User)&R5:isShipment()){
  749. if(C5==0){
  750. Pris = Pris+R5:wepPrice() C5 = 1 EGP:egpBox(54,vec2(102,328),vec2(1,35)) EGP:egpBox(55,vec2(411,328),vec2(1,35))
  751. }else{Pris = Pris-R5:wepPrice() C5 = 0 EGP:egpRemove(54) EGP:egpRemove(55)}
  752. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  753. }elseif(EGP:egpButton(19,User)&R6:isShipment()){
  754. if(C6==0){
  755. Pris = Pris+R6:wepPrice() C6 = 1 EGP:egpBox(56,vec2(102,366),vec2(1,35)) EGP:egpBox(57,vec2(411,366),vec2(1,35))
  756. }else{Pris = Pris-R6:wepPrice() C6 = 0 EGP:egpRemove(56) EGP:egpRemove(57)}
  757. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  758. }elseif(EGP:egpButton(20,User)&R7:isShipment()){
  759. if(C7==0){
  760. Pris = Pris+R7:wepPrice() C7 = 1 EGP:egpBox(58,vec2(102,404),vec2(1,35)) EGP:egpBox(59,vec2(411,404),vec2(1,35))
  761. }else{Pris = Pris-R7:wepPrice() C7 = 0 EGP:egpRemove(58) EGP:egpRemove(59)}
  762. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  763. }elseif(EGP:egpButton(21,User)&R8:isShipment()){
  764. if(C8==0){
  765. Pris = Pris+R8:wepPrice() C8 = 1 EGP:egpBox(60,vec2(102,442),vec2(1,35)) EGP:egpBox(61,vec2(411,442),vec2(1,35))
  766. }else{Pris = Pris-R8:wepPrice() C8 = 0 EGP:egpRemove(60) EGP:egpRemove(61)}
  767. EGP:egpSetText(26,"BESTIL: "+Pris+",-")
  768. }
  769. }
  770. }
  771.  
  772. ## - - - MONEYCLK - - - ##
  773. if(moneyClk("Penge til vores personale"))
  774. {
  775. timer("1pres",1250)
  776. Seneste = moneyClkPlayer():name()
  777. }
  778.  
  779. if(moneyNoClk())
  780. {
  781. timer("stage1",300)
  782. }
  783.  
  784. ##System P
  785. if(clk("1pres"))
  786. {
  787. # - - - Logud
  788. timer("stage1",300)
  789. timer("Y",1000)
  790. timer("cpup",3000)
  791.  
  792. # - - - KAERE KUNDE
  793. concmd("say /pm "+CurUser:steamID()+" ["+Butiknavn+" | "+returnTime()+"] Tak for din bestilling! Du vil modtage din bestilling inden l"+ae()+"nge Mvh "+Butiknavn+"")
  794. printColor(vec(225,225,225),"[ ",vec(123,172,75),""+Butiknavn+" | "+returnTime(),vec(225,225,225)," ] ",vec(200,200,200),moneyClkPlayer():name()+" har bestilt v"+aa()+"ben for: ",vec(45,182,75),+Pris,vec(200,200,200),",-")
  795. ## - - - PRESS PRESS - - - ##
  796. if(C1==1){U1 = 1 Count++ Tjent+=Profit Omsat+=R1:wepPrice()}
  797. if(C2==1){U2 = 1 Count++ Tjent+=Profit Omsat+=R2:wepPrice()}
  798. if(C3==1){U3 = 1 Count++ Tjent+=Profit Omsat+=R3:wepPrice()}
  799. if(C4==1){U4 = 1 Count++ Tjent+=Profit Omsat+=R4:wepPrice()}
  800. if(C5==1){U5 = 1 Count++ Tjent+=Profit Omsat+=R5:wepPrice()}
  801. if(C6==1){U6 = 1 Count++ Tjent+=Profit Omsat+=R6:wepPrice()}
  802. if(C7==1){U7 = 1 Count++ Tjent+=Profit Omsat+=R7:wepPrice()}
  803. if(C8==1){U8 = 1 Count++ Tjent+=Profit Omsat+=R8:wepPrice()}
  804. CurUser = noentity()
  805. if(SS == 2){timer("kstat",1250)}
  806. }
  807.  
  808. if(clk("Y")){U1 = 0 U2 = 0 U3 = 0 U4 = 0 U5 = 0 U6 = 0 U7 = 0 U8 = 0}
  809.  
  810. ## - - - Chat Commands P FL B - - - #
  811.  
  812. ## - - - Profit
  813. if(chatClk(owner()))
  814. {
  815. Said = owner():lastSaid():lower():explode(" ")
  816. Cmd = lastSaid():explode(" "):string(1)
  817. switch(Cmd)
  818. {
  819. case"!profit",
  820. if(lastSpoke() == owner()){
  821. Profit = Said[2, string]:toNumber()
  822. printColor(vec(225,225,225),"[ ",vec(123,172,75),""+Butiknavn+" | "+returnTime(),vec(225,225,225)," ]",vec(200,200,200)," Profit sat til: ",vec(45,182,75),+Said[2,string]:toNumber(),vec(200,200,200),",-")
  823. hideChat(1)
  824.  
  825. }
  826. }
  827. }
  828.  
  829. # - - - Force logout
  830. if(chatClk(owner()))
  831. {
  832. Said = owner():lastSaid():lower():explode(" ")
  833. Cmd = lastSaid():explode(" "):string(1)
  834. switch(Cmd)
  835. {
  836. case "!fl",
  837. printColor(vec(225,225,225),"[ ",vec(123,172,75),""+Butiknavn+" | "+returnTime(),vec(225,225,225)," ]",vec(200,200,200)," Logger ud af "+Butiknavn+"...")
  838. timer("stage1",500)
  839. hideChat(1)
  840. ,break
  841. }
  842. }
  843.  
  844. # - - - HELP
  845. if(chatClk(owner()))
  846. {
  847. Said = owner():lastSaid():lower():explode(" ")
  848. Cmd = lastSaid():explode(" "):string(1)
  849. switch(Cmd)
  850. {
  851. case "!help",
  852. printColor(vec(255,255,255),"---------------==============COMMANDS==============---------------")
  853. printColor(vec(225,225,225),"[ ",vec(123,172,75),"Profit",vec(225,225,225)," ]",vec(200,200,200)," For at indstille profit brug: ",vec(57,194,86),"!profit <penge>")
  854. printColor(vec(225,225,225),"[ ",vec(123,172,75),"Force logout",vec(225,225,225)," ]",vec(175,175,175)," For at force logout brug: ",vec(57,194,86),"!fl")
  855. printColor(vec(225,225,225),"[ ",vec(123,172,75),"Blacklist",vec(225,225,225)," ]",vec(200,200,200)," For at blacklist en person brug: ",vec(57,194,86),"!bl <Navn>")
  856. printColor(vec(225,225,225),"[ ",vec(123,172,75),"Unblacklist",vec(225,225,225)," ]",vec(175,175,175)," For at unblacklist en person brug: ",vec(57,194,86),"!removebl <Navn>")
  857. printColor(vec(255,255,255),"---------------==============COMMANDS==============---------------")
  858. hideChat(1)
  859. ,break
  860. }
  861. }
  862.  
  863.  
  864. ## - - - AFSTAND - - - ##
  865. if(ops()<150){
  866. if(clk("CurUserDistance")){
  867. if(S>1){
  868. if(CurUser:pos():distance(EGP:entity():pos())>125){timer("stage1",250) CurUser = noentity()}
  869. }
  870. timer("CurUserDistance",3500)
  871. }
  872. }
  873.  
  874. ## - - - VELKOMMEN KAERE BRUGER - - - ##
  875. if(clk("Velkommen")&S==2)
  876. {
  877. if(Velkommen:length()<=FinalVelkommen:count())
  878. {
  879. Velkommen=Velkommen+FinalVelkommen[Velkommen:length(),string]
  880. EGP:egpSetText(4,Velkommen:sub(2))
  881. timer("Velkommen",150)
  882. }else{timer("Name",150) Name=" " FinalName=CurUser:name():explode("") S=2}
  883. }
  884.  
  885. if(clk("Name")&S==2)
  886. {
  887. if(Name:length()<=FinalName:count())
  888. {
  889. Name=Name+FinalName[Name:length(),string]
  890. EGP:egpSetText(5,Name:sub(2))
  891. timer("Name",150)
  892. }else{timer("stageshop",250)}
  893. }
  894.  
  895.  
  896. ## - - - KONTROL FUNC - - - ##
  897. if(ops()<200){
  898. if(~KU & KU:keyUse() & KU == owner()){
  899. if(SS == 1){
  900. if(CP:egpButton(14,KU)){timer("kstat",500) timer("updateTime",60000)} else{stoptimer("updateTime")}
  901. if(CP:egpButton(16,KU)){timer("tw",500)}
  902. if(CP:egpButton(18,KU)){timer("ins",500)}
  903. }
  904. if(SS == 2)
  905. {
  906. if(CP:egpButton(12,KU)){timer("kon1",500) timer("kon2",1000) timer("Tid",1500)}
  907. }
  908.  
  909. if(SS == 3)
  910. {
  911. if(CP:egpButton(12,KU)){timer("kon1",500) timer("kon2",1000) timer("Tid",1500)}
  912. }
  913.  
  914. if(SS == 4)
  915. {
  916. if(CP:egpButton(12,KU)){timer("kon1",500) timer("kon2",1000) timer("Tid",1500)}
  917. }
  918. }
  919.  
  920. if(~KU & KU & KU == owner()& SS == 4 &ops()<150)
  921. {
  922. if(CP:egpButton(14,KU)){Profit-=250 CP:egpSetText(18,""+Profit+",-")}
  923. if(CP:egpButton(16,KU)){Profit+=250 CP:egpSetText(18,""+Profit+",-")}
  924.  
  925.  
  926. if(CP:egpButton(23,KU)){
  927. if(M==0){
  928. M=1
  929. CP:egpSetText(25,"Opfyldning")
  930. timer("Opfyldning",1000)
  931. }
  932. elseif(M==1){
  933. M=2
  934. CP:egpSetText(25,"Lukket")
  935. timer("Lukket",1000)
  936. }
  937. elseif(M==2){
  938. M=0
  939. CP:egpSetText(25,aaL()+"ben")
  940. timer("stage1",1000)
  941. }
  942.  
  943. }
  944. if(CP:egpButton(21,KU)){
  945. if(M==2){
  946. M=0
  947. CP:egpSetText(25,aaL()+"ben")
  948. timer("stage1",1000)
  949. }
  950. elseif(M==1){
  951. M=2
  952. CP:egpSetText(25,"Opfyldning")
  953. timer("Opfyldning",1000)
  954. }
  955. elseif(M==0){
  956. M=1
  957. CP:egpSetText(25,"Lukket")
  958. timer("Lukket",1000)
  959. }
  960. }
  961. }
  962. }
  963.  
  964. if(clk("Opfyldning")){
  965.  
  966. S = 34
  967. EGP:egpClear()
  968.  
  969. ##Baggrund
  970. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  971.  
  972. EGP:egpBox(2,vec2(256,256),vec2(512,512))
  973. EGP:egpMaterial(2,"console/background01")
  974. EGP:egpAlpha(2,250)
  975. EGP:egpColor(2,vec(255,0,0))
  976.  
  977. EGP:egpBox(3,vec2(256,256),vec2(512,512))
  978. EGP:egpMaterial(3,"gui/gradient_up")
  979. EGP:egpColor(3,vec(0,13,255))
  980.  
  981. EGP:egpBox(4,vec2(256,256),vec2(512,60))
  982. EGP:egpColor(4,vec(0,13,255))
  983.  
  984. EGP:egpText(5,"! VI ER IGANG MED AT OPFYLDE BUTIKKEN !",vec2(256,256))
  985. EGP:egpAlign(5,1,1)
  986. EGP:egpFont(5,"Courier New")
  987. EGP:egpSize(5,22)
  988.  
  989. }
  990.  
  991. if(clk("Lukket")){
  992.  
  993. S = 33
  994.  
  995. EGP:egpClear()
  996.  
  997. ##Baggrund
  998. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  999.  
  1000. EGP:egpBox(2,vec2(256,256),vec2(512,512))
  1001. EGP:egpMaterial(2,"console/background01")
  1002. EGP:egpAlpha(2,250)
  1003. EGP:egpColor(2,vec(255,0,0))
  1004.  
  1005. EGP:egpBox(3,vec2(256,256),vec2(512,512))
  1006. EGP:egpMaterial(3,"gui/gradient_up")
  1007. EGP:egpColor(3,vec(0,13,255))
  1008.  
  1009. EGP:egpBox(4,vec2(256,256),vec2(512,60))
  1010. EGP:egpColor(4,vec(0,13,255))
  1011.  
  1012. EGP:egpText(5,"! BUTIKKEN ER LUKKET P"+aaL()+" NUV"+aeL()+"RENDE TIDSPNUKT !",vec2(256,256))
  1013. EGP:egpAlign(5,1,1)
  1014. EGP:egpFont(5,"Courier New")
  1015. EGP:egpSize(5,22)
  1016. }
  1017.  
  1018.  
  1019.  
  1020.  
  1021. if(clk("cpup") & SS == 2)
  1022. {
  1023. CP:egpSetText(13,"- PROFIT: "+Profit+",-")
  1024. CP:egpSetText(14,"- OMS"+aeL()+"TNING: "+Omsat+",-")
  1025. CP:egpSetText(15,"- INDTJENT: "+Tjent+",-")
  1026. CP:egpSetText(16,"- V"+aaL()+"BEN SOLGT: "+Count+" STK.")
  1027. CP:egpSetText(17,"- SENETE KUNDE: "+Seneste)
  1028. }
  1029.  
  1030. if(SS == 1)
  1031. {
  1032. if(clk("Tid")){
  1033. CP:egpSetText(21,returnTime())
  1034. timer("Tid",6500)
  1035. }
  1036. }
  1037.  
  1038. if(clk("updateTime"))
  1039. {
  1040. OpeningTime++
  1041. timer("updateTime",60000)
  1042. if(SS == 2){CP:egpSetText(18,aaL()+"BNINGSTID: "+OpeningTime+" MIN")}
  1043. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement