Advertisement
Guest User

Untitled

a guest
Nov 27th, 2013
1,784
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.91 KB | None | 0 0
  1. @name Lottery E2 V.2
  2. @inputs EGP:wirelink
  3. @persist [CurrentAmount,PricePerTicket,Tickets,PercentProfit,Closed]:number [Players,NewArray]:array [Version,Changelog,Winner,Advert,AdvertPrint]:string
  4. if(first()) {
  5. #Here are variables you may change to your liking! :)
  6. PercentProfit=8
  7. PricePerTicket=1000
  8. }
  9.  
  10.  
  11. #------------------------------------------------------------------------------------------------------------------------------------------
  12. if(first()) {
  13. #Here are variables you MAY NOT change! :)
  14. Version="V.2"
  15. Changelog="-Updated so that the E2 is fully automatic! No more writing down on a sheet of paper!\n-Added Tax!"
  16. CurrentAmount=0
  17. Tickets=0
  18. Closed=0
  19. }
  20. if(first()) {
  21. printColor(vec(100,100,100),"---------------------")
  22. printColor(vec(33,255,33)," LOTTERY E2 "+Version+"!")
  23. printColor(vec(100,100,100),"---------------------")
  24. printColor(vec(33,255,33),"Changelog: ")
  25. printColor(vec(255,255,33),Changelog)
  26. }
  27. function loadScreen() {
  28.  
  29. EGP:egpClear()
  30. EGP:egpRoundedBox(1,vec2(256,256),vec2(400,200))
  31. EGP:egpColor(1,vec(33,255,33))
  32. EGP:egpAlign(1,1,1)
  33.  
  34. EGP:egpRoundedBox(2,vec2(256,256),vec2(395,195))
  35. EGP:egpColor(2,vec(125,125,125))
  36. EGP:egpAlign(2,1,1)
  37.  
  38. EGP:egpRoundedBox(3,vec2(256,185),vec2(395,50))
  39. EGP:egpColor(3,vec(33,255,33))
  40. EGP:egpAlign(3,1,1)
  41.  
  42. EGP:egpRoundedBox(4,vec2(256,195),vec2(105,55))
  43. EGP:egpColor(4,vec(33,255,33))
  44. EGP:egpAlign(4,1,1)
  45.  
  46. EGP:egpRoundedBox(5,vec2(256,195),vec2(100,50))
  47. EGP:egpColor(5,vec(100,100,100))
  48. EGP:egpAlign(5,1,1)
  49.  
  50. EGP:egpRoundedBox(6,vec2(256,183),vec2(395,50))
  51. EGP:egpColor(6,vec(100,100,100))
  52. EGP:egpAlign(6,1,1)
  53.  
  54. EGP:egpText(7,"$ $ $ $ LOTTERY $ $ $ $",vec2(256,183))
  55. EGP:egpFont(7,"Arial",35)
  56. EGP:egpColor(7,vec(33,255,33))
  57. EGP:egpAlign(7,1,1)
  58.  
  59. EGP:egpText(8,"Jackpot: $"+round(CurrentAmount),vec2(256,235))
  60. EGP:egpFont(8,"Arial",28)
  61. EGP:egpColor(8,vec(33,255,33))
  62. EGP:egpAlign(8,1,1)
  63.  
  64. EGP:egpText(9,"Amount of Tickets: "+Tickets,vec2(256,256))
  65. EGP:egpFont(9,"Arial",20)
  66. EGP:egpColor(9,vec(33,255,33))
  67. EGP:egpAlign(9,1,1)
  68.  
  69. EGP:egpBox(10,vec2(256,270),vec2(395,3))
  70. EGP:egpColor(10,vec(33,255,33))
  71. EGP:egpAlign(10,1,1)
  72.  
  73. EGP:egpText(11,"Chances of winning with...",vec2(256,280))
  74. EGP:egpColor(11,vec(200,200,200))
  75. EGP:egpAlign(11,1,1)
  76.  
  77. if(Tickets <= 0) {
  78. EGP:egpText(12,"1 ticket: 100%",vec2(256,302))
  79. } elseif(Tickets > 0) {EGP:egpText(12,"1 ticket: "+round((1/Tickets)*100,3)+"%",vec2(256,302))}
  80. if(Tickets <= 5) {
  81. EGP:egpText(13,"5 tickets: 100%",vec2(256,317))
  82. } else {EGP:egpText(13,"5 tickets: "+round((5/Tickets)*100,3)+"%",vec2(256,317))}
  83.  
  84. if(Tickets <=10) {
  85. EGP:egpText(14,"10 tickets: 100%",vec2(256,332))
  86. } else {EGP:egpText(14,"10 tickets: "+round((10/Tickets)*100,3)+"%",vec2(256,332))}
  87. EGP:egpAlign(12,1,1),EGP:egpAlign(13,1,1),EGP:egpAlign(14,1,1)
  88.  
  89. Taxed=CurrentAmount-(CurrentAmount/100*PercentProfit)
  90. EGP:egpText(15,"Tax: "+PercentProfit+"%",vec2(415,234))
  91. EGP:egpAlign(15,1,1)
  92. EGP:egpColor(15,vec(150,50,150))
  93.  
  94. EGP:egpRoundedBox(25,vec2(256,256),vec2(400,200))
  95. EGP:egpColor(25,vec(50,50,50))
  96. EGP:egpAlign(25,1,1)
  97.  
  98. EGP:egpRoundedBox(26,vec2(256,256),vec2(395,195))
  99. EGP:egpAlign(26,1,1)
  100. EGP:egpColor(26,vec(255,75,75))
  101.  
  102.  
  103. EGP:egpText(27,"CLOSED",vec2(256,256))
  104. EGP:egpFont(27,"Arial",45)
  105. EGP:egpColor(27,vec(50,50,50))
  106. EGP:egpAlign(27,1,1)
  107.  
  108. EGP:egpAlpha(25,Closed*255),EGP:egpAlpha(26,Closed*255),EGP:egpAlpha(27,Closed*255)
  109.  
  110. }
  111. if(first()){loadScreen()}
  112. runOnChat(1)
  113. if(chatClk(owner())) {
  114. LS=owner():lastSaid():explode(" ")
  115. if(LS[1,string]=="-addt"|LS[1,string]=="-addtickets") {
  116. hideChat(1)
  117. if(LS[2,string]!="" & LS[3,string]!="" & LS[4,string]=="") {
  118. if(LS[2,string]:toNumber() < 1) {
  119. printColor(vec(255,75,75),"Cannot add less than 1 ticket!")
  120. } else {
  121. if(LS[2,string]:toNumber() <= 100) {
  122. if(findPlayerByName(LS[3,string])) {
  123. Player=findPlayerByName(LS[3,string]):name()
  124.  
  125. if(LS[2,string]:toNumber()>Tickets) {
  126. for(I=Tickets,LS[2,string]:toNumber(),1) {
  127. if(I!=Tickets) {
  128. Players[I,string]=Player
  129. }
  130. }
  131. } elseif(LS[2,string]:toNumber()<=Tickets) {
  132. for(I=Tickets,LS[2,string]:toNumber()+Tickets,1) {
  133. if(I!=Tickets) {
  134. Players[I,string]=Player
  135. }
  136. }
  137. }
  138.  
  139. Tickets=Tickets+LS[2,string]:toNumber()
  140. CurrentAmount=CurrentAmount+(PricePerTicket*LS[2,string]:toNumber())
  141. printColor(vec(0,150,255),"Added "+LS[2,string]+" tickets to the lottery under the name of ",vec(255,255,33),Player)
  142. printColor(vec(0,150,255),"Current amount of tickets: "+Tickets)
  143. loadScreen()
  144. } else {
  145. printColor(vec(255,75,75),"Error: "+LS[3,string]+" is not a player online!")
  146. }
  147. } else {
  148. printColor(vec(255,75,75),"Cannot add more than 100 tickets (Tick quota will be reached if so!)")
  149. }
  150. }
  151. } else {
  152. printColor(vec(255,75,75),"Correct Usage: -addt [number of tickets] [player name]")
  153. }
  154. }
  155. elseif(LS[1,string]=="-clear") {
  156. hideChat(1)
  157. printColor(vec(33,255,33),"Cleared the lottery.")
  158. Players=NewArray
  159. Tickets=0
  160. CurrentAmount=0
  161. loadScreen()
  162. }
  163. elseif(LS[1,string]=="-pick") {
  164. hideChat(1)
  165. if(LS[2,string]=="") {
  166. LuckyNumber=ceil(random(1,Tickets))
  167. printColor(vec(33,255,33),"The lottery results are in! The lucky number was... ",vec(255,255,33),LuckyNumber+"!")
  168. Profit=CurrentAmount/100*PercentProfit
  169. printColor(vec(33,255,33),"You get a profit of $"+Profit+" Give them $"+(CurrentAmount-Profit):toString())
  170. Winner=Players[LuckyNumber,string]
  171. printColor(vec(200,33,255),"THE WINNER IS... ",vec(255,255,33),Winner)
  172. timer("WINNER",1000)
  173. Players=NewArray
  174. Tickets=0
  175. CurrentAmount=0
  176. loadScreen()
  177. } else {
  178. printColor(vec(255,33,33),"Correct Usage: -pick")
  179. }
  180. }
  181. elseif(LS[1,string]=="-setjackpot"|LS[1,string]=="-setj") {
  182. hideChat(1)
  183. if(LS[2,string]!=""&LS[3,string]=="") {
  184. CurrentAmount=LS[2,string]:toNumber()
  185. printColor(vec(0,150,255),"You set the jackpot to $"+LS[2,string]:toNumber())
  186. loadScreen()
  187. } else {
  188. printColor(vec(255,33,33),"Corrent Usage: -setj [amount]")
  189. }
  190. }
  191. elseif(LS[1,string]=="-setadvert"|LS[1,string]=="-seta") {
  192. hideChat(1)
  193. Advert=LS:concat(" ",2,LS:count())
  194. if(Advert:find("[CURRENT_AMOUNT]")) {
  195. AdvertPrint=Advert:replace("[CURRENT_AMOUNT]",CurrentAmount:toString())
  196. }
  197. printColor(vec(33,255,33),"Set advert to: ",vec(255,255,33),AdvertPrint)
  198. printColor(vec(33,255,33),"Type -advert or -ad to say your advert!")
  199. }
  200. elseif(LS[1,string]=="-advert"|LS[1,string]=="-ad") {
  201. hideChat(1)
  202. if(LS[2,string]=="") {
  203. if(Advert !="") {
  204. timer("advert",1000)
  205. } else {
  206. printColor(vec(255,75,75),"You haven't set your advert yet! Use -setadvert to do so!")
  207. }
  208. } else {
  209. printColor(vec(255,75,75),"Correct Usage: -ad")
  210. }
  211. }
  212. elseif(LS[1,string]=="-power") {
  213. hideChat(1)
  214. if(Closed==0) {
  215. Closed=1
  216. printColor(vec(255,255,33),"The lottery has been closed!")
  217. } elseif(Closed==1) {
  218. Closed=0
  219. printColor(vec(255,255,33),"The lottery has been opened!")
  220. }
  221. loadScreen()
  222. }
  223.  
  224. }
  225. if(clk("WINNER")) {
  226. stoptimer("WINNER")
  227. hideChat(0)
  228. concmd("say \"/advert [AUTOMATED MESSAGE] THE WINNER IS... "+Winner+"!\"")
  229. }
  230. if(clk("advert")) {
  231. stoptimer("advert")
  232. hideChat(0)
  233. if(Advert:find("[CURRENT_AMOUNT]")) {
  234. AdvertPrint=Advert:replace("[CURRENT_AMOUNT]",CurrentAmount:toString())
  235. }
  236. concmd("say \"/advert "+AdvertPrint+"\"")
  237. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement