API tools faq
paste
Guest User

Untitled

a guest
Jul 21st, 2018
72
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.10 KB | None | 0 0
raw download clone embed print report
  1. @name AutoOrderBank
  2. @inputs CS:wirelink CS2:wirelink Mon1
  3. @outputs O1 O2 O3 O4 O5 Omaster Mon2
  4. @persist Msg:string X1 X2 X3 X4 X5 Y1 Y2 Y3 Y4 Y5 Ar2:array Ar3:array H1 H2 H3 H4 H5 Xm Ym Mtest X Y Use Menu Ar:array Price
  5. @trigger
  6.  
  7. if(first())
  8. {
  9. CS[2041] = 1
  10. findByClass("player")
  11. Menu = 0
  12. timer("cs2",3000)
  13. print("Commands: (without those [] )")
  14. print("!changelog")
  15. print("!remove [Player's Place on list 1-5]")
  16. print("!price [number]")
  17. print("!msg_[message]")
  18. print("example for msg use: !msg_hello world example")
  19. print("!setsafe [safe number 1-5]")
  20. print("!mastersafe")
  21. timer("touchFix",5000)
  22. }
  23. interval(21)
  24. if(clk("touchFix"))
  25. {
  26. findByClass("player")
  27. }
  28.  
  29. if(owner():lastSaid() == "!changelog")
  30. {
  31. timer("cl",1)
  32. concmd("say done")
  33. }
  34. if(clk("cl"))
  35. {
  36. print(_HUD_PRINTCENTER,"Safe available/not colors, money counter, and auto !reset every 5 seconds, so !reset is no longer a command")
  37.  
  38. }
  39. SX = owner():lastSaid():explode(" ")
  40. if(SX[1,string] == "!price")
  41. {
  42. Price = SX[2,string]:toNumber()
  43. concmd("say done")
  44.  
  45. }
  46.  
  47. if(SX[1,string] == "!remove")
  48. {
  49. Ar[SX[2,string]:toNumber(),entity] = owner()
  50. concmd("say done")
  51. }
  52.  
  53. if(SX[1,string] == "!setsafe")
  54. {
  55. Ar2[SX[2,string]:toNumber(),number] = owner():pos():x()
  56. Ar3[SX[2,string]:toNumber(),number] = owner():pos():y()
  57. concmd("say done")
  58. }
  59.  
  60. if(owner():lastSaid() == "!mastersafe")
  61. {
  62. Xm = owner():pos():x()
  63. Ym = owner():pos():y()
  64. concmd("say done")
  65. }
  66.  
  67. Sm = owner():lastSaid():explode("_")
  68. if(Sm[1,string] == "!msg")
  69. {
  70. Msg = Sm[2,string]
  71. CS[2041] = 1
  72. concmd("say done")
  73. }
  74. Player = findClosest(CS:entity():pos())
  75. if (->CS){E=CS:entity()}
  76. Use=Player:keyUse()
  77. X=round(((E:toLocal(Player:aimPos()):y()+E:boxSize():x()/2)/E:boxSize():x())*29)
  78. Y=round(((E:toLocal(Player:aimPos()):x()+E:boxSize():y()/2)/E:boxSize():y())*18)
  79.  
  80. CS:writeString(" Welcome to Mouses Bank V2 ",0,0,999,57)
  81. CS:writeString(" Order and be added to ",0,1,999,47)
  82. CS:writeString(" safe Automaticly: ",0,2,999,37)
  83.  
  84. if(Menu == 0) ## Menu
  85. {
  86. Mon2 = 0
  87. if(X>=4 && X<=13 && Y>=6 && Y<=9)
  88. {
  89. CS:writeString(" ",4,6,999,60)
  90. CS:writeString(" Buy ",4,7,999,50)
  91. CS:writeString(" ",4,8,999,40)
  92. }
  93. else
  94. {
  95. CS:writeString(" ",4,6,999,50)
  96. CS:writeString(" Buy ",4,7,999,40)
  97. CS:writeString(" ",4,8,999,30)
  98. }
  99.  
  100. if(X>=4 && X<=13 && Y>=6 && Y<=9&& Use)
  101. {
  102. timer("ref",10)
  103. timer("fixBuy",250)
  104. }
  105.  
  106. CS:writeString(Msg,0,10,999)
  107.  
  108. # 2.1 12.3 20.2 21.6
  109. if(X>=4 && X<=24 && Y>=17 && Y<=18)
  110. {
  111. CS:writeString(" Credits ",4,17,999,444)
  112. }
  113. else
  114. {
  115. CS:writeString(" Credits ",4,17,999,333)
  116. }
  117. if(X>=4 && X<=24 && Y>=17 && Y<=18 && Use)
  118. {
  119. timer("ref",10)
  120. Menu = 3
  121.  
  122. }
  123.  
  124. }
  125.  
  126. if(Menu == 3) # credits
  127. {
  128. CS:writeString("Made by iNvalid, special made ",0,5,999,505)
  129. CS:writeString(" for ogMouse ",0,6,999,606)
  130. CS:writeString(" Back ",10,12,999,303)
  131.  
  132. if(X>=10 && X<=20 && Y>=12 && Y<=13 && Use)
  133. {
  134. timer("ref",10)
  135. Menu = 0
  136. }
  137. }
  138.  
  139. if(Menu == 1) #Buy menu
  140. {
  141. CS:writeString(" Please put " + toString(Price) + "$ then choose:",0,4,50)
  142.  
  143. CS:writeString("Money inside: " + toString(Mon1),0,15,70,111)
  144. if(Ar[4,entity]:isPlayer() && Ar[4,entity] != owner())
  145. {
  146. H4 = 500
  147. }
  148. else
  149. {
  150. H4 = 50
  151. }
  152.  
  153. if(Ar[1,entity]:isPlayer() && Ar[1,entity] != owner())
  154. {
  155. H1 = 500
  156. }
  157. else
  158. {
  159. H1 = 50
  160. }
  161.  
  162. if(Ar[2,entity]:isPlayer() && Ar[2,entity] != owner())
  163. {
  164. H2 = 500
  165. }
  166. else
  167. {
  168. H2 = 50
  169. }
  170.  
  171. if(Ar[3,entity]:isPlayer() && Ar[3,entity] != owner())
  172. {
  173. H3 = 500
  174. }
  175. else
  176. {
  177. H3 = 50
  178. }
  179.  
  180. if(Ar[5,entity]:isPlayer() && Ar[5,entity] != owner())
  181. {
  182. H5 = 500
  183. }
  184. else
  185. {
  186. H5 = 50
  187. }
  188. CS:writeString(" Safe #1 ",3,5,999,H1)
  189. CS:writeString(" Safe #2 ",15,5,999,H2)
  190. CS:writeString(" Safe #3 ",3,7,999,H3)
  191. CS:writeString(" Safe #4 ",15,7,999,H4)
  192. CS:writeString(" Safe #5 ",9,9,999,H5)
  193. CS:writeString(" Back ",9,12,111,770)
  194.  
  195. if(X>=9 && X<=20 && Y>=9 && Y<=10 && Use)
  196. {
  197. if(Mon1>=Price)
  198. {
  199. if(Ar[5,entity]:isPlayer() && Ar[5,entity] != owner())
  200. {
  201. CS:writeString(" Already being used ",0,16,500)
  202. timer("ref",5000)
  203. }
  204. else{
  205. Mon2 = 1
  206. Ar[5,entity] = Player
  207. CS:writeString(" Thanks for buying, you ",0,13,50,999,1)
  208. CS:writeString(" will now be able to auto ",0,14,50,999,1)
  209. CS:writeString(" get in safe #5 ",0,15,50,999,1)
  210. timer("payed",5000)
  211. Menu = -1
  212. hint(Ar[5,entity]:name() + " Bought save #5",7)
  213. }
  214. }
  215. else
  216.  
  217. {
  218. CS:writeString(" Not enaugh cash ",0,16,500)
  219. timer("ref",5000)
  220. }
  221. }
  222.  
  223. if(X>=15 && X<=26 && Y>=7 && Y<=8 && Use)
  224. {
  225. if(Mon1>=Price)
  226. {
  227. if(Ar[4,entity]:isPlayer() && Ar[4,entity] != owner())
  228. {
  229. CS:writeString(" Already being used ",0,16,500)
  230. timer("ref",5000)
  231. }
  232. else{
  233. Mon2 = 1
  234. Ar[4,entity] = Player
  235. CS:writeString(" Thanks for buying, you ",0,13,50,999,1)
  236. CS:writeString(" will now be able to auto ",0,14,50,999,1)
  237. CS:writeString(" get in safe #4 ",0,15,50,999,1)
  238. timer("payed",5000)
  239. Menu = -1
  240. hint(Ar[4,entity]:name() + " Bought save #4",7)
  241. }
  242. }
  243. else
  244.  
  245. {
  246. CS:writeString(" Not enaugh cash ",0,16,500)
  247. timer("ref",5000)
  248. }
  249. }
  250.  
  251. if(X>=3 && X<=14 && Y>=7 && Y<=8 && Use)
  252. {
  253. if(Mon1>=Price)
  254. {
  255. if(Ar[3,entity]:isPlayer() && Ar[3,entity] != owner())
  256. {
  257. CS:writeString(" Already being used ",0,16,500)
  258. timer("ref",5000)
  259. }
  260. else{
  261. Mon2 = 1
  262. Ar[3,entity] = Player
  263. CS:writeString(" Thanks for buying, you ",0,13,50,999,1)
  264. CS:writeString(" will now be able to auto ",0,14,50,999,1)
  265. CS:writeString(" get in safe #3 ",0,15,50,999,1)
  266. timer("payed",5000)
  267. Menu = -1
  268. hint(Ar[3,entity]:name() + " Bought save #3",7)
  269. }
  270. }
  271. else
  272.  
  273. {
  274. CS:writeString(" Not enaugh cash ",0,16,500)
  275. timer("ref",5000)
  276. }
  277. }
  278.  
  279. if(X>=15 && X<=26 && Y>=5 && Y<=6 && Use)
  280. {
  281. if(Mon1>=Price)
  282. {
  283. if(Ar[2,entity]:isPlayer() && Ar[2,entity] != owner())
  284. {
  285. CS:writeString(" Already being used ",0,16,500)
  286. timer("ref",5000)
  287. }
  288. else{
  289. Mon2 = 1
  290. Ar[2,entity] = Player
  291. CS:writeString(" Thanks for buying, you ",0,13,50,999,1)
  292. CS:writeString(" will now be able to auto ",0,14,50,999,1)
  293. CS:writeString(" get in safe #2 ",0,15,50,999,1)
  294. timer("payed",5000)
  295. Menu = -1
  296. hint(Ar[2,entity]:name() + " Bought save #2",7)
  297. }
  298. }
  299. else
  300.  
  301. {
  302. CS:writeString(" Not enaugh cash ",0,16,500)
  303. timer("ref",5000)
  304. }
  305. }
  306.  
  307.  
  308.  
  309.  
  310.  
  311. if(X>=3 && X<=14 && Y>=5 && Y<=6 && Use)
  312. {
  313. if(Mon1>=Price)
  314. {
  315. if(Ar[1,entity]:isPlayer() && Ar[1,entity] != owner())
  316. {
  317. CS:writeString(" Already being used ",0,16,500)
  318. timer("ref",5000)
  319. }
  320. else{
  321. Mon2 = 1
  322. Ar[1,entity] = Player
  323. CS:writeString(" Thanks for buying, you ",0,13,50,999,1)
  324. CS:writeString(" will now be able to auto ",0,14,50,999,1)
  325. CS:writeString(" get in safe #1 ",0,15,50,999,1)
  326. timer("payed",5000)
  327. Menu = -1
  328. hint(Ar[1,entity]:name() + " Bought save #1",7)
  329. }
  330. }
  331. else
  332.  
  333. {
  334. CS:writeString(" Not enaugh cash ",0,16,500)
  335. timer("ref",5000)
  336. }
  337. }
  338.  
  339. if(X>=9 && X<= 20 && Y>=12 && Y<=13 && Use)
  340. {
  341. timer("ref",10)
  342. Menu = 0
  343. }
  344. }
  345.  
  346. if(clk("ref"))
  347. {
  348. CS[2041] = 1
  349. }
  350. if(clk("payed"))
  351. {
  352. Menu = 0
  353. CS[2041] = 1
  354. }
  355.  
  356. X1 = (Ar2[1,number] - Ar[1,entity]:pos():x()) * (Ar2[1,number] - Ar[1,entity]:pos():x())
  357. X2 = (Ar2[2,number] - Ar[2,entity]:pos():x()) * (Ar2[2,number] - Ar[2,entity]:pos():x())
  358. X3 = (Ar2[3,number] - Ar[3,entity]:pos():x()) * (Ar2[3,number] - Ar[3,entity]:pos():x())
  359. X4 = (Ar2[4,number] - Ar[4,entity]:pos():x()) * (Ar2[4,number] - Ar[4,entity]:pos():x())
  360. X5 = (Ar2[5,number] - Ar[5,entity]:pos():x()) * (Ar2[5,number] - Ar[5,entity]:pos():x())
  361.  
  362. Y1 = (Ar3[1,number] - Ar[1,entity]:pos():y()) * (Ar3[1,number] - Ar[1,entity]:pos():y())
  363. Y2 = (Ar3[2,number] - Ar[2,entity]:pos():y()) * (Ar3[2,number] - Ar[2,entity]:pos():y())
  364. Y3 = (Ar3[3,number] - Ar[3,entity]:pos():y()) * (Ar3[3,number] - Ar[3,entity]:pos():y())
  365. Y4 = (Ar3[4,number] - Ar[4,entity]:pos():y()) * (Ar3[4,number] - Ar[4,entity]:pos():y())
  366. Y5 = (Ar3[5,number] - Ar[5,entity]:pos():y()) * (Ar3[5,number] - Ar[5,entity]:pos():y())
  367.  
  368.  
  369. F = 1
  370. Mtest = 0
  371. while(F<=5)
  372. {
  373. if( sqrt((Xm - Ar[F,entity]:pos():x())*(Xm - Ar[F,entity]:pos():x()) + (Ym - Ar[F,entity]:pos():y())*(Ym - Ar[F,entity]:pos():y())))
  374. {
  375. Omaster = 1
  376. Mtest = 1
  377. }
  378. else
  379. {
  380. if(Mtest == 0)
  381. {
  382. Omaster = 0
  383. }
  384. }
  385. F = F + 1
  386. }
  387.  
  388. if(sqrt(X1 + Y1) < 30)
  389. {
  390. O1 = 1
  391. }
  392. else
  393. {
  394. O1 = 0
  395. }
  396.  
  397. if(sqrt(X2 + Y2) < 30)
  398. {
  399. O2 = 1
  400. }
  401. else
  402. {
  403. O2 = 0
  404. }
  405.  
  406. if(sqrt(X3 + Y3) < 30)
  407. {
  408. O3 = 1
  409. }
  410. else
  411. {
  412. O3 = 0
  413. }
  414.  
  415. if(sqrt(X4 + Y4) < 30)
  416. {
  417. O4 = 1
  418. }
  419. else
  420. {
  421. O4 = 0
  422. }
  423.  
  424. if(sqrt(X5 + Y5) < 30)
  425. {
  426. O5 = 1
  427. }
  428. else
  429. {
  430. O5 = 0
  431. }
  432.  
  433.  
  434. CS2:writeString("Members (in the right order to remove)",0,0,999)
  435. I = 1
  436. while(I<=5)
  437. {
  438. if(Ar[I,entity] != owner()){
  439. CS2:writeString(toString(I)+". " + Ar[I,entity]:name(),0,I+2,999)
  440. }
  441. else
  442. {
  443. CS2:writeString(toString(I)+". ",0,I+2,999)
  444. }
  445. I = I + 1
  446. }
  447. if(clk("cs2"))
  448. {
  449. CS2[2041] = 1
  450. timer("cs2",3000)
  451. }
  452.  
  453. if(clk("fixBuy"))
  454. {
  455. Menu = 1
  456. CS[2041] = 1
  457. }
Add Comment
Please, Sign In to add comment
Public Pastes
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!