API tools faq
paste
johnlol

Alice Potion Makers

johnlol
Jul 23rd, 2023
143
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VeriLog 15.65 KB | Gaming | 0 0
raw download clone embed print report
  1. // --------------------------------------------------------------------------------------------*
  2. //                                                                                             //
  3. // ______                                           _                                          //
  4. // | ___ \                                         | |                                         //
  5. // | |_/ /___  ___  ___ _ __ ___   ___  _   _ _ __ | |_                                        //
  6. // |    // _ \/ __|/ _ \ '_ ` _ \ / _ \| | | | '_ \| __|                                       //
  7. // | |\ \ (_) \__ \  __/ | | | | | (_) | |_| | | | | |_                                        //
  8. // \_| \_\___/|___/\___|_| |_| |_|\___/ \__,_|_| |_|\__|                                       //
  9. //                                                                                             //
  10. //                                         _____           _       _                           //
  11. //                                        /  ___|         (_)     | |                          //
  12. //                                        \ `--.  ___ _ __ _ _ __ | |_                         //
  13. //                                         `--. \/ __| '__| | '_ \| __|                        //
  14. //                                        /\__/ / (__| |  | | |_) | |_                         //
  15. //                                        \____/ \___|_|  |_| .__/ \__|                        //
  16. //                                                          | |                                //
  17. //                                                          |_|                                //
  18. // --------------------------------------------------------------------------------------------*
  19. //                  Create By ~ Rosemount                      //
  20. //                  Current Version ~ v1.0                                 //
  21. //                  Tested ~ Latest Rathena                                //
  22. // --------------------------------------------------------------------------------------------*
  23.  
  24. sec_in02.gat,178,153,2  script  Alice Potion Makers 665,{
  25. menu "~ Red Potion",L_RPotion,"~ Yellow Potion",L_YPotion,"~ White Potion",L_WPotion,"~ Blue Potion",L_BPotion,"~ Condensed Red Pot",L_CRPotion,"~ Condensed Yellow Pot",L_CYPotion,"~ Condensed White Pot",L_CWPotion,"~ Anodyne",L_Ano,"~ Aloevera",L_Aloe,"~ Alcohol",L_Alco,"~ Bottle Grenade",L_BG,"~ Acid Bottle",L_Acid,"~ Plant Bottle",L_PB,"~ Marine Sphere Bottle",L_MSB,"~ Glistening Coat",L_GC,"~ Embryo",L_EMB,"~ Fireproof Potion",L_FP,"~ Coldproof Potion",L_CP,"~ Earthproof Potion",L_EP,"~ Thunderproof Potion",L_TP,"~ Cancel",L_no;
  26.  
  27. L_TP:
  28. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto TP_Check;
  29. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  30. end;
  31. TP_Check:
  32. if(countitem(717)<1 || countitem(1057)<3 || countitem(1093)<1 ||countitem(7134)<1 || countitem(7434)<1) goto L_error;
  33. delitem 717,1;
  34. delitem 1057,3;
  35. delitem 1093,1;
  36. delitem 7134,1;
  37. if(rand(100)< 85){
  38. specialeffect2 305;
  39. getitem 12121,1;
  40. set .CountSuccess,.CountSuccess +1;
  41. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  42. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  43. sleep2 200;
  44. goto L_TP;
  45. }
  46. specialeffect2 506;
  47. set .CountFailed,.CountFailed +1;
  48. goto L_TP;
  49.  
  50.  
  51. L_EP:
  52. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto EP_Check;
  53. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  54. end;
  55. EP_Check:
  56. if(countitem(715)<1 || countitem(1093)<1 || countitem(7126)<2 || countitem(7134)<1 || countitem(7434)<1) goto L_error;
  57. delitem 715,1;
  58. delitem 1093,1;
  59. delitem 7126,1;
  60. delitem 7134,1;
  61. if(rand(100)< 85){
  62. specialeffect2 305;
  63. getitem 12120,1;
  64. set .CountSuccess,.CountSuccess +1;
  65. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  66. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  67. sleep2 200;
  68. goto L_EP;
  69. }
  70. specialeffect2 506;
  71. set .CountFailed,.CountFailed +1;
  72. goto L_EP;
  73.  
  74.  
  75. L_CP:
  76. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto CP_Check;
  77. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  78. end;
  79. CP_Check:
  80. if(countitem(717)<1 || countitem(950)<3 || countitem(1093)<1 || countitem(7134)<1 || countitem(7434)<1) goto L_error;
  81. delitem 717,1;
  82. delitem 950,3;
  83. delitem 1093,1;
  84. delitem 7134,1;
  85. if(rand(100)< 85){
  86. specialeffect2 305;
  87. getitem 12119,1;
  88. set .CountSuccess,.CountSuccess +1;
  89. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  90. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  91. sleep2 200;
  92. goto L_CP;
  93. }
  94. specialeffect2 506;
  95. set .CountFailed,.CountFailed +1;
  96. goto L_CP;
  97.  
  98. L_FP:
  99. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto FP_Check;
  100. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  101. end;
  102. FP_Check:
  103. if(countitem(716)<1 || countitem(1012)<2 || countitem(1093)<1 || countitem(7134)<1 || countitem(7434)<1) goto L_error;
  104. delitem 716,1;
  105. delitem 1012,2;
  106. delitem 1093,1;
  107. delitem 7134,1;
  108. if(rand(100)< 85){
  109. specialeffect2 305;
  110. getitem 12118,1;
  111. set .CountSuccess,.CountSuccess +1;
  112. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  113. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  114. sleep2 200;
  115. goto L_FP;
  116. }
  117. specialeffect2 506;
  118. set .CountFailed,.CountFailed +1;
  119. goto L_FP;
  120.  
  121.  
  122. L_EMB:
  123. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto EMB_Check;
  124. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  125. end;
  126. EMB_Check:
  127. if(countitem(7140)<1 || countitem(7141)<1 || countitem(7143)<1 || countitem(7134)<1 || countitem(7144)<1) goto L_error;
  128. delitem 7140,1;
  129. delitem 7141,1;
  130. delitem 7143,1;
  131. delitem 7134,1;
  132. if(rand(100)< 85){
  133. specialeffect2 305;
  134. getitem 7142,1;
  135. set .CountSuccess,.CountSuccess +1;
  136. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  137. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  138. sleep2 200;
  139. goto L_EMB;
  140. }
  141. specialeffect2 506;
  142. set .CountFailed,.CountFailed +1;
  143. goto L_EMB;
  144.  
  145. L_GC:
  146. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto GC_Check;
  147. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  148. end;
  149. GC_Check:
  150. if(countitem(713)<1 || countitem(950)<1 || countitem(970)<1 || countitem(1044)< 1 || countitem(7134)<1 || countitem(7132)<1) goto L_error;
  151. delitem 713,1;
  152. delitem 950,1;
  153. delitem 970,1;
  154. delitem 1044,1;
  155. delitem 7134,1;
  156. if(rand(100)< 85){
  157. specialeffect2 305;
  158. getitem 7139,1;
  159. set .CountSuccess,.CountSuccess +1;
  160. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  161. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  162. sleep2 200;
  163. goto L_GC;
  164. }
  165. specialeffect2 506;
  166. set .CountFailed,.CountFailed +1;
  167. goto L_GC;
  168.  
  169. L_MSB:
  170. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto MSB_Check;
  171. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  172. end;
  173. MSB_Check:
  174. if(countitem(713)<1 || countitem(1050)<1 || countitem(1051)<1 || countitem(7134)<1 || countitem(7131)<1) goto L_error;
  175. delitem 713,1;
  176. delitem 1050,1;
  177. delitem 1051,1;
  178. delitem 7134,1;
  179. if(rand(100)< 85){
  180. specialeffect2 305;
  181. getitem 7138,1;
  182. set .CountSuccess,.CountSuccess +1;
  183. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  184. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  185. sleep2 200;
  186. goto L_MSB;
  187. }
  188. specialeffect2 506;
  189. set .CountFailed,.CountFailed +1;
  190. goto L_MSB;
  191.  
  192. L_PB:
  193. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto PB_Check;
  194. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  195. end;
  196. PB_Check:
  197. if(countitem(713)<1 ||countitem(1032)<2 || countitem(7134)<1 || countitem(7130)<1) goto L_error;
  198. delitem 713,1;
  199. delitem 1032,2;
  200. delitem 7134,1;
  201. if(rand(100)< 85){
  202. specialeffect2 305;
  203. getitem 7137,1;
  204. set .CountSuccess,.CountSuccess +1;
  205. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  206. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  207. sleep2 200;
  208. goto L_PB;
  209. }
  210. specialeffect2 506;
  211. set .CountFailed,.CountFailed +1;
  212. goto L_PB;
  213.  
  214. L_BG:
  215. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto BG_Check;
  216. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  217. end;
  218. BG_Check:
  219. if(countitem(713)<1 || countitem(970)<1 || countitem(1059)<1 || countitem(7134)<1 || countitem(7128)<1) goto L_error;
  220. delitem 713,1;
  221. delitem 970,1;
  222. delitem 1059,1;
  223. delitem 7134,1;
  224. if(rand(100)< 85){
  225. specialeffect2 305;
  226. getitem 7135,1;
  227. set .CountSuccess,.CountSuccess +1;
  228. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  229. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  230. sleep2 200;
  231. goto L_BC;
  232. }
  233. specialeffect2 506;
  234. set .CountFailed,.CountFailed +1;
  235. goto L_BC;
  236.  
  237. L_Alco:
  238. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto Alco_Check;
  239. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  240. end;
  241. Alco_Check:
  242. if(countitem(713)<1 || countitem(905)<5 || countitem(1092)<1 || countitem(7033)<5 || countitem(7134)<1 || countitem(7127)<1) goto L_error;
  243. delitem 713,1;
  244. delitem 905,5;
  245. delitem 1092,1;
  246. delitem 7033,5;
  247. delitem 7134,1;
  248. if(rand(100)< 85){
  249. specialeffect2 305;
  250. getitem 970,1;
  251. set .CountSuccess,.CountSuccess +1;
  252. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  253. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  254. sleep2 200;
  255. goto L_Alco;
  256. }
  257. specialeffect2 506;
  258. set .CountFailed,.CountFailed +1;
  259. goto L_Alco;
  260.  
  261. L_Aloe:
  262. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto Aloe_Check;
  263. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  264. end;
  265. Aloe_Check:
  266. if(countitem(518)<1 || countitem(704)<1 || countitem(713)<1 || countitem(7134)<1 || countitem(7144)<1) goto L_error;
  267. delitem 518,1;
  268. delitem 704,1;
  269. delitem 713,1;
  270. delitem 7134,1;
  271. if(rand(100)< 85){
  272. specialeffect2 305;
  273. getitem 606,1;
  274. set .CountSuccess,.CountSuccess +1;
  275. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  276. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  277. sleep2 200;
  278. goto L_Aloe;
  279. }
  280. specialeffect2 506;
  281. set .CountFailed,.CountFailed +1;
  282. goto L_Aloe;
  283.  
  284. L_Ano:
  285. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto Ano_Check;
  286. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  287. end;
  288. Ano_Check:
  289. if(countitem(708)<1 || countitem(713)<1 || countitem(970)<1 || countitem(7134)<1 || countitem(7144)<1) goto L_error;
  290. delitem 708,1;
  291. delitem 713,1;
  292. delitem 970,1;
  293. delitem 7134,1;
  294. if(rand(100)< 85){
  295. specialeffect2 305;
  296. getitem 605,1;
  297. set .CountSuccess,.CountSuccess +1;
  298. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  299. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  300. sleep2 200;
  301. goto L_Ano;
  302. }
  303. specialeffect2 506;
  304. set .CountFailed,.CountFailed +1;
  305. goto L_Ano;
  306.  
  307. L_CWPotion:
  308. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto CWPotion_Check;
  309. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  310. end;
  311. CWPotion_Check:
  312. if(countitem(504)<1 || countitem(1064)<1 || countitem(1092)<1 || countitem(7134)<1 || countitem(7133)<1) goto L_error;
  313. delitem 504,1;
  314. delitem 1064,1;
  315. delitem 1092,1;
  316. delitem 7134,1;
  317. if(rand(100)< 85){
  318. specialeffect2 305;
  319. getitem 547,1;
  320. set .CountSuccess,.CountSuccess +1;
  321. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  322. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  323. sleep2 200;
  324. goto L_CWPotion;
  325. }
  326. specialeffect2 506;
  327. set .CountFailed,.CountFailed +1;
  328. goto L_CWPotion;
  329.  
  330. L_CYPotion:
  331. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto CYPotion_Check;
  332. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  333. end;
  334. CYPotion_Check:
  335. if(countitem(503)<1 || countitem(1017)<1 || countitem(1092)<1 || countitem(7134)<1 || countitem(7133)<1) goto L_error;
  336. delitem 503,1;
  337. delitem 1017,1;
  338. delitem 1092,1;
  339. delitem 7134,1;
  340. if(rand(100)< 85){
  341. specialeffect2 305;
  342. getitem 546,1;
  343. set .CountSuccess,.CountSuccess +1;
  344. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  345. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  346. sleep2 200;
  347. goto L_CYPotion;
  348. }
  349. specialeffect2 506;
  350. set .CountFailed,.CountFailed +1;
  351. goto L_CRPotion;
  352.  
  353. L_CRPotion:
  354. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto CRPotion_Check;
  355. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  356. end;
  357. CRPotion_Check:
  358. if(countitem(501)<1 || countitem(952)<1 || countitem(1092)<1 || countitem(7134)<1 || countitem(7133)<1) goto L_error;
  359. delitem 501,1;
  360. delitem 952,1;
  361. delitem 1092,1;
  362. delitem 7134,1;
  363. if(rand(100)< 85) {
  364. specialeffect2 305;
  365. getitem 545,1;
  366. set .CountSuccess,.CountSuccess +1;
  367. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  368. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  369. sleep2 200;
  370. goto L_CRPotion;
  371. }
  372. specialeffect2 506;
  373. set .CountFailed,.CountFailed +1;
  374. goto L_CRPotion;
  375.  
  376. L_BPotion:
  377. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto BPotion_Check;
  378. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  379. end;
  380. BPotion_Check:
  381. if(countitem(510)<1 || countitem(911)<1 || countitem(1093)<1 || countitem(7134)<1 || countitem(7144)<1) goto L_error;
  382. delitem 510,1;
  383. delitem 911,1;
  384. delitem 1093,1;
  385. delitem 7134,1;
  386. if(rand(100)< 85){
  387. specialeffect2 305;
  388. getitem 505,1;
  389. set .CountSuccess,.CountSuccess +1;
  390. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  391. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  392. sleep2 200;
  393. goto L_BPotion;
  394. }
  395. specialeffect2 506;
  396. set .CountFailed,.CountFailed +1;
  397. goto L_BPotion;
  398.  
  399. L_WPotion:
  400. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto WPotion_Check;
  401. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  402. end;
  403. WPotion_Check:
  404. if(countitem(509)<1 || countitem(1093)<1 || countitem(7134)<1 || countitem(7144)<1) goto L_error;
  405. delitem 509,1;
  406. delitem 1093,1;
  407. delitem 7134,1;
  408. if(rand(100)< 85) {
  409. specialeffect2 305;
  410. getitem 504,1;
  411. set .CountSuccess,.CountSuccess +1;
  412. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  413. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  414. sleep2 200;
  415. goto L_WPotion;
  416. }
  417. set .CountFailed,.CountFailed +1;
  418. specialeffect2 306;
  419. goto L_WPotion;
  420.  
  421. L_YPotion:
  422. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto YPotion_Check;
  423. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  424. end;
  425. YPotion_Check:
  426. if(countitem(508)<1 || countitem(1093)<1 || countitem(7134)<1 || countitem(7144)<1) goto L_error;
  427. delitem 508,1;
  428. delitem 1093,1;
  429. delitem 7134,1;
  430. if(rand(100)< 85) {
  431. specialeffect2 305;
  432. getitem 503,1;
  433. set .CountSuccess,.CountSuccess +1;
  434. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  435. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  436. sleep2 200;
  437. goto L_YPotion;
  438. }
  439. set .CountFailed,.CountFailed +1;
  440. specialeffect2 306;
  441. goto L_YPotion;
  442.  
  443. L_RPotion:
  444. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto RPotion_Check;
  445. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  446. end;
  447. RPotion_Check:
  448. if(countitem(507)<1 || countitem(1093)<1 || countitem(7134)<1 || countitem(7144)<1) goto L_error;
  449. delitem 507,1;
  450. delitem 1093,1;
  451. delitem 7134,1;
  452. if(rand(100)< 85) {
  453. specialeffect2 305;
  454. getitem 501,1;
  455. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  456. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  457. sleep2 100;
  458. goto L_RPotion;
  459. }
  460. set .CountFailed,.CountFailed +1;
  461. specialeffect2 306;
  462. goto L_RPotion;
  463.  
  464. L_Acid:
  465. if(Class == 4019 && getskilllv(228) || Class == 18 && getskilllv(228)) goto Acid_Check;
  466. dispbottom "Alchemist Job And Minimum Skill Pharmacy Lvl 1";
  467. end;
  468. Acid_Check:
  469. if(countitem(713)< 1 || countitem(950)<1 || countitem(7134)<1 || countitem(7129)<1) goto L_error;
  470. delitem 713,1;
  471. delitem 950,1;
  472. delitem 7134,1;
  473. if(rand(100) < 85) {
  474. specialeffect2 305;
  475. getitem 7136,1;
  476. dispbottom "[ Alice ] : "+.CountSuccess+" Successful";
  477. dispbottom "[ Alice ] : "+.CountFailed+" Failed";
  478. sleep2 100;
  479. goto L_Acid;
  480. }
  481. set .CountFailed,.CountFailed +1;
  482. specialeffect2 306;
  483. goto L_Acid;
  484.  
  485. L_no:
  486. end;
  487.  
  488. L_error:
  489. dispbottom "It seems like an item you do not have sufficient";
  490. set .CountSuccess,0;
  491. set .CountFailed,0;
  492. end;
  493. }
Tags: ragnarok AdobeRO
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!