API tools faq
paste
Advertisement
Guest User

Borgmester shop - Version 3.0

a guest
Oct 28th, 2018
678
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.81 KB | None | 0 0
raw download clone embed print report
  1. @name Borgmester | Version 3.0 | Udviklet af Merlin
  2. @inputs EGP:wirelink User:entity
  3. @outputs
  4. @persist S CurUser:entity Licenspris Lottobeloeb:number Klar
  5. @trigger
  6. if(duped() | dupefinished()){reset()}
  7. if(first()){
  8.  
  9. ##INDSTILLINGER
  10. Licenspris = 2000
  11. Lottobeloeb = 500
  12. ###############
  13.  
  14. ##ANDET########
  15. timer("start1",250)
  16. timer("start2",500)
  17. timer("Tid",500)
  18. timer("CurUserDistance",500)
  19.  
  20. function number wirelink:egpButton(Idx:number,Ply:entity){
  21. TL = This:egpPos(Idx) - This:egpSize(Idx) / 2 * (0 ? 0 : 1)
  22. BR = This:egpPos(Idx) + This:egpSize(Idx) / (0 ? 1 : 2)
  23. Cur = This:egpCursor(Ply) return inrange(Cur, TL, BR) exit()}
  24. ###############
  25.  
  26. runOnChat(1)
  27. }
  28.  
  29.  
  30. if(clk("start1")){
  31.  
  32. S = 1
  33. F = "Georgia"
  34.  
  35. EGP:egpClear()
  36.  
  37. ##BAGGRUND
  38. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  39. EGP:egpColor(1,vec(215,215,215))
  40.  
  41. EGP:egpBox(2,vec2(256,256),vec2(512,512))
  42. EGP:egpMaterial(2,"console/background06")
  43. EGP:egpColor(2,vec(112, 97, 86))
  44. EGP:egpAlpha(2,250)
  45.  
  46. ##TOP
  47. EGP:egpBox(3,vec2(256,30),vec2(512,60))
  48. EGP:egpColor(3,vec4(20,20,20,125))
  49.  
  50. EGP:egpBox(4,vec2(256,60),vec2(512,1))
  51. EGP:egpColor(4,vec(170, 78, 76))
  52. EGP:egpMaterial(4,"gui/center_gradient")
  53.  
  54. EGP:egpText(5,"Borgmestershop",vec2(256,30))
  55. EGP:egpAlign(5,1,1)
  56. EGP:egpSize(5,40)
  57. EGP:egpFont(5,F)
  58. EGP:egpColor(5,vec(200,200,200))
  59.  
  60. ##KLOKKE
  61. EGP:egpBox(6,vec2(256,265),vec2(512,35))
  62. EGP:egpColor(6,vec(170,78,76))
  63.  
  64. EGP:egpBox(7,vec2(256,265),vec2(512,29))
  65. EGP:egpColor(7,vec(50,50,50))
  66.  
  67. EGP:egpText(8,"",vec2(256,265))
  68. EGP:egpAlign(8,1,1)
  69. EGP:egpSize(8,20)
  70. EGP:egpFont(8,"Courier New")
  71. EGP:egpColor(8,vec(200,200,200))
  72.  
  73. ##BOX 1 VAABENLICENS
  74. EGP:egpRoundedBoxOutline(9,vec2(256,150),vec2(380,120))
  75. EGP:egpColor(9,vec(170,78,76))
  76.  
  77. EGP:egpRoundedBox(10,vec2(256,150),vec2(378,118))
  78. EGP:egpColor(10,vec4(35,35,35,175))
  79.  
  80. EGP:egpText(11,"V"+aa()+"benlicens",vec2(256,110))
  81. EGP:egpAlign(11,1,1)
  82. EGP:egpSize(11,30)
  83. EGP:egpFont(11,F)
  84. EGP:egpColor(11,vec(200,200,200))
  85.  
  86. ##BETAL
  87. EGP:egpRoundedBoxOutline(12,vec2(256,165),vec2(150,32))
  88. EGP:egpColor(12,vec(170,78,76))
  89.  
  90. EGP:egpText(13,"<< Bestil >>",vec2(256,160))
  91. EGP:egpAlign(13,1,1)
  92. EGP:egpSize(13,13)
  93. EGP:egpFont(13,F)
  94. EGP:egpColor(13,vec(200,200,200))
  95.  
  96. EGP:egpText(14,""+Licenspris+""+" DKK",vec2(256,172))
  97. EGP:egpAlign(14,1,1)
  98. EGP:egpSize(14,13)
  99. EGP:egpFont(14,F)
  100. EGP:egpColor(14,vec(200,200,200))
  101.  
  102. ##BOX 2 VAABENLICENS
  103. EGP:egpRoundedBoxOutline(15,vec2(256,394),vec2(380,120))
  104. EGP:egpColor(15,vec(170,78,76))
  105.  
  106. EGP:egpRoundedBox(16,vec2(256,394),vec2(378,118))
  107. EGP:egpColor(16,vec4(35,35,35,175))
  108.  
  109. EGP:egpText(17,"Lotto",vec2(256,354))
  110. EGP:egpAlign(17,1,1)
  111. EGP:egpSize(17,30)
  112. EGP:egpFont(17,F)
  113. EGP:egpColor(17,vec(200,200,200))
  114.  
  115. ##BETAL
  116. EGP:egpRoundedBoxOutline(18,vec2(256,406),vec2(150,32))
  117. EGP:egpColor(18,vec(170,78,76))
  118.  
  119. EGP:egpText(19,"<< Bestil >>",vec2(256,406))
  120. EGP:egpAlign(19,1,1)
  121. EGP:egpSize(19,16)
  122. EGP:egpFont(19,F)
  123. EGP:egpColor(19,vec(200,200,200))
  124.  
  125. EGP:egpBox(20,vec2(256,502),vec2(512,24))
  126. EGP:egpColor(20,vec(170,78,76))
  127.  
  128. EGP:egpBox(21,vec2(256,506),vec2(512,24))
  129. EGP:egpColor(21,vec(50,50,50))
  130.  
  131. EGP:egpText(22,"- Udviklet af Merlin | Udgivet p"+aa()+" forum -",vec2(256,503))
  132. EGP:egpAlign(22,1,1)
  133. EGP:egpSize(22,13)
  134. EGP:egpFont(22,"Courier New")
  135. EGP:egpColor(22,vec(200,200,200))
  136.  
  137. EGP:egpText(23,"V3",vec2(502,8))
  138. EGP:egpAlign(23,1,1)
  139. EGP:egpSize(23,13)
  140. EGP:egpFont(23,"Courier New")
  141. EGP:egpColor(23,vec(200,200,200))
  142. }
  143.  
  144. if(clk("lottob")){
  145.  
  146. S = 2
  147.  
  148. F = "Georgia"
  149.  
  150. EGP:egpClear()
  151.  
  152. ##BAGGRUND
  153. EGP:egpBox(1,vec2(256,256),vec2(512,512))
  154. EGP:egpColor(1,vec(215,215,215))
  155.  
  156. EGP:egpBox(2,vec2(256,256),vec2(512,512))
  157. EGP:egpMaterial(2,"console/background06")
  158. EGP:egpColor(2,vec(112, 97, 86))
  159. EGP:egpAlpha(2,250)
  160.  
  161. ##TOP
  162. EGP:egpBox(3,vec2(256,30),vec2(512,60))
  163. EGP:egpColor(3,vec4(20,20,20,125))
  164.  
  165. EGP:egpBox(4,vec2(256,60),vec2(512,1))
  166. EGP:egpColor(4,vec(170, 78, 76))
  167. EGP:egpMaterial(4,"gui/center_gradient")
  168.  
  169. EGP:egpText(5,"Borgmestershop",vec2(256,30))
  170. EGP:egpAlign(5,1,1)
  171. EGP:egpSize(5,40)
  172. EGP:egpFont(5,F)
  173. EGP:egpColor(5,vec(200,200,200))
  174.  
  175. ##KLOKKE
  176. EGP:egpBox(6,vec2(256,265),vec2(512,35))
  177. EGP:egpColor(6,vec(170,78,76))
  178. EGP:egpBox(7,vec2(256,265),vec2(512,29))
  179. EGP:egpColor(7,vec(50,50,50))
  180.  
  181. ##BOX 1 VAABENLICENS
  182. EGP:egpRoundedBoxOutline(9,vec2(256,150),vec2(380,120))
  183. EGP:egpColor(9,vec(170,78,76))
  184.  
  185. EGP:egpRoundedBox(10,vec2(256,150),vec2(378,118))
  186. EGP:egpColor(10,vec4(35,35,35,175))
  187.  
  188. EGP:egpText(11,"V"+aa()+"benlicens",vec2(256,110))
  189. EGP:egpAlign(11,1,1)
  190. EGP:egpSize(11,30)
  191. EGP:egpFont(11,F)
  192. EGP:egpColor(11,vec(200,200,200))
  193.  
  194. ##BETAL
  195. EGP:egpRoundedBoxOutline(12,vec2(256,165),vec2(150,32))
  196. EGP:egpColor(12,vec(170,78,76))
  197.  
  198. EGP:egpText(13,"<< Bestil >>",vec2(256,160))
  199. EGP:egpAlign(13,1,1)
  200. EGP:egpSize(13,13)
  201. EGP:egpFont(13,F)
  202. EGP:egpColor(13,vec(200,200,200))
  203.  
  204. EGP:egpText(14,""+Licenspris+""+" DKK",vec2(256,172))
  205. EGP:egpAlign(14,1,1)
  206. EGP:egpSize(14,13)
  207. EGP:egpFont(14,F)
  208. EGP:egpColor(14,vec(200,200,200))
  209. ##BOX 2 VAABENLICENS
  210. EGP:egpRoundedBoxOutline(15,vec2(256,394),vec2(380,120))
  211. EGP:egpColor(15,vec(170,78,76))
  212.  
  213. EGP:egpRoundedBox(16,vec2(256,394),vec2(378,118))
  214. EGP:egpColor(16,vec4(35,35,35,175))
  215.  
  216. EGP:egpText(17,"Lotto",vec2(256,354))
  217. EGP:egpAlign(17,1,1)
  218. EGP:egpSize(17,30)
  219. EGP:egpFont(17,F)
  220. EGP:egpColor(17,vec(200,200,200))
  221.  
  222. ##BETAL
  223. EGP:egpRoundedBoxOutline(18,vec2(256,406),vec2(150,32))
  224. EGP:egpColor(18,vec(170,78,76))
  225.  
  226. EGP:egpText(19,"<< Bestil >>",vec2(256,406))
  227. EGP:egpAlign(19,1,1)
  228. EGP:egpSize(19,16)
  229. EGP:egpFont(19,F)
  230. EGP:egpColor(19,vec(200,200,200))
  231.  
  232. EGP:egpBox(20,vec2(256,502),vec2(512,24))
  233. EGP:egpColor(20,vec(170,78,76))
  234.  
  235. EGP:egpBox(21,vec2(256,506),vec2(512,24))
  236. EGP:egpColor(21,vec(50,50,50))
  237.  
  238. EGP:egpText(22,"- Udviklet af Merlin | Udgivet p"+aa()+" forum -",vec2(256,503))
  239. EGP:egpAlign(22,1,1)
  240. EGP:egpSize(22,13)
  241. EGP:egpFont(22,"Courier New")
  242. EGP:egpColor(22,vec(200,200,200))
  243.  
  244. EGP:egpText(64,"V3",vec2(502,8))
  245. EGP:egpAlign(64,1,1)
  246. EGP:egpSize(64,13)
  247. EGP:egpFont(64,"Courier New")
  248. EGP:egpColor(64,vec(200,200,200))
  249.  
  250. EGP:egpBox(65,vec2(256,256),vec2(512,512))
  251. EGP:egpColor(65,vec4(15,15,15,200))
  252. }
  253.  
  254. if(clk("lottob1")){
  255.  
  256. S = 2
  257.  
  258. EGP:egpBox(23,vec2(256,256),vec2(350,140))
  259. EGP:egpColor(23,vec(30,30,30))
  260.  
  261. EGP:egpBox(24,vec2(256,216),vec2(350,1))
  262. EGP:egpColor(24,vec(170,78,76))
  263.  
  264. EGP:egpText(25,"Lotto",vec2(256,200))
  265. EGP:egpAlign(25,1,1)
  266. EGP:egpSize(25,24)
  267. EGP:egpFont(25,F)
  268. EGP:egpColor(25,vec(200,200,200))
  269.  
  270. ##BETAL
  271. EGP:egpBox(26,vec2(344,254),vec2(120,24))
  272. EGP:egpColor(26,vec(93,160,93))
  273.  
  274. EGP:egpText(27,"Betal",vec2(344,254))
  275. EGP:egpAlign(27,1,1)
  276. EGP:egpSize(27,22)
  277. EGP:egpFont(27,F)
  278. EGP:egpColor(27,vec(200,200,200))
  279.  
  280.  
  281. ##AFVIS
  282. EGP:egpBox(28,vec2(344,288),vec2(120,24))
  283. EGP:egpColor(28,vec(138,74,74))
  284.  
  285. EGP:egpText(29,"Afvis",vec2(344,288 ))
  286. EGP:egpAlign(29,1,1)
  287. EGP:egpSize(29,22)
  288. EGP:egpFont(29,F)
  289. EGP:egpColor(29,vec(200,200,200))
  290.  
  291. #HVOR STOR
  292. EGP:egpBox(30,vec2(178,256),vec2(110,22))
  293. EGP:egpColor(30,vec(45,45,45))
  294.  
  295. #-
  296.  
  297. EGP:egpBox(31,vec2(112,256),vec2(22,22))
  298. EGP:egpColor(31,vec(60,60,60))
  299.  
  300. EGP:egpText(32,"-",vec2(112,256))
  301. EGP:egpAlign(32,1,1)
  302. EGP:egpSize(32,22)
  303. EGP:egpFont(32,"Courier New")
  304. EGP:egpColor(32,vec(200,200,200))
  305.  
  306. #+
  307. EGP:egpBox(33,vec2(244,256),vec2(22,22))
  308. EGP:egpColor(33,vec(60,60,60))
  309.  
  310. EGP:egpText(34,"+",vec2(244,256))
  311. EGP:egpAlign(34,1,1)
  312. EGP:egpSize(34,22)
  313. EGP:egpFont(34,"Courier New")
  314. EGP:egpColor(34,vec(200,200,200))
  315.  
  316. ##Halloejsa
  317.  
  318. EGP:egpText(36,"Bestil et lotto her!",vec2(178,278))
  319. EGP:egpAlign(36,1,1)
  320. EGP:egpSize(36,12)
  321. EGP:egpFont(36,"Courier New")
  322. EGP:egpColor(36,vec(200,200,200))
  323.  
  324. EGP:egpText(37,"V"+ae()+"lg dit bel"+oe()+"b ",vec2(178,288))
  325. EGP:egpAlign(37,1,1)
  326. EGP:egpSize(37,12)
  327. EGP:egpFont(37,"Courier New")
  328. EGP:egpColor(37,vec(200,200,200))
  329.  
  330. ##PRIS
  331.  
  332. EGP:egpText(35,""+Lottobeloeb+" DKK",vec2(178,256))
  333. EGP:egpAlign(35,1,1)
  334. EGP:egpSize(35,16)
  335. EGP:egpFont(35,"Courier New")
  336. EGP:egpColor(35,vec(200,200,200))
  337.  
  338. }
  339.  
  340. ##LOGIN SYSTEM#############################################################################
  341.  
  342. ##LOGIN
  343. if(S==1){
  344. if(ops()<100){
  345. if(~User & User){
  346. if(EGP:egpButton(18, User) & Klar == 0){timer("lottob", 500) timer("lottob1", 1000) Klar = 1 timer("Klar",2000) CurUser=User}
  347. if(EGP:egpButton(12,User)){moneyRequest(User,Licenspris,"V"+aa()+"benlicens")
  348. }
  349. }
  350. }
  351. }
  352.  
  353. ##LOGUD
  354. if(S==2){
  355. if(ops()<100){
  356. if(~User & User){
  357. if(CurUser==User){
  358. if(EGP:egpButton(28, User)){timer("start1", 300) Lottobeloeb = 500 CurUser=User}
  359. if(EGP:egpButton(26,User)){moneyRequest(User,Lottobeloeb,"Lotto")
  360. }
  361. }
  362. }
  363. }
  364. }
  365.  
  366. if(clk("Klar")){
  367. Klar = 0
  368. }
  369.  
  370. ##LICENS BETALING
  371. if(moneyClk("V"+aa()+"benlicens")){
  372. printColor(vec(145,68,68),"[Borgmester shop] ", vec(200,200,200),moneyClkPlayer():name()+" har bestilt v"+aa()+"benlicens!")
  373. }
  374.  
  375. ##LICENS BETALING
  376. if(moneyClk("Lotto")){
  377. printColor(vec(145,68,68),"[Borgmester shop] ", vec(200,200,200),moneyClkPlayer():name()+" har bestilt et lotto p"+aa()+" "+Lottobeloeb+" DKK")
  378. Lottobeloeb = 500
  379. timer("start1",1000)
  380. }
  381.  
  382.  
  383. ##BELOEB FOR LOTTO HVOR HOEJT
  384. if(S==2){
  385. if(CurUser == User &ops()<150){
  386. if(ops()<200){
  387. if(EGP:egpButton(31,User) & Lottobeloeb >=1000){Lottobeloeb-=500 EGP:egpSetText(35,""+Lottobeloeb+" DKK")}
  388. if(EGP:egpButton(33,User) & Lottobeloeb <=4500){Lottobeloeb+=500 EGP:egpSetText(35,""+Lottobeloeb+" DKK")}
  389. }
  390. }
  391. }
  392.  
  393. ##DISTANCE
  394. if(clk("CurUserDistance")){
  395. if(S>1){
  396. if(CurUser:pos():distance(EGP:entity():pos())>100){timer("start1",250) CurUser = noentity()}
  397. }
  398. timer("CurUserDistance",3000)
  399. }
  400.  
  401. ##UR
  402. function string returnTime(){
  403. SSec=time("sec")
  404. MMin=time("min")
  405. HHour=time("hour")+1
  406. if(SSec<10){Sec="0"+SSec}
  407. else{Sec=""+SSec}
  408. if(MMin<10){Min="0"+MMin}
  409. else{Min=""+MMin}
  410. if(HHour<10){Hour="0"+HHour} elseif(HHour==24){Hour="00"}
  411. elseif(HHour==25){Hour="01"} elseif(HHour==26){Hour="02"}
  412. elseif(HHour==27){Hour="03"} elseif(HHour==28){Hour="04"}
  413. elseif(HHour==29){Hour="05"} elseif(HHour==30){Hour="06"}
  414. else{Hour=""+HHour}
  415. Tid=Hour+":"+Min+":"+Sec
  416. return Tid
  417. }
  418.  
  419. if(clk("Tid")){
  420. EGP:egpSetText(8,returnTime())
  421. timer("Tid",1000)
  422. }
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!