API tools faq
paste
Innos

Multi Service NPC (All in One+Premium Features)

Innos
Sep 29th, 2011
132
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 32.56 KB | None | 0 0
raw download clone embed print report
  1. //------------------------------------------------------------------//
  2. // Service NPC
  3. //------------------------------------------------------------------//
  4. // By Innos™ @ 2011 for exRO
  5. //------------------------------------------------------------------//
  6. // sd
  7. //------------------------------------------------------------------//
  8.  
  9. moc_para01,35,82,3  script  exRO Service#2  874,{
  10.  
  11. set .@price,5000*BaseLevel;
  12. set .@price2,10000*BaseLevel;
  13. set .@item,26000;
  14. set .@coin_cost,10;
  15. set @n$,"^778899[exRO Service]^000000";
  16.  
  17. // Abfrage ob schon registriert
  18.     if (query_sql("select `account_id` from `excoins` where `account_id` = '"+getcharid(3)+"'",.@ignore)) {
  19.     goto L_start;
  20.     } else {
  21.     mes @n$;
  22.     mes "Bevor du meinen Service nutzen kannst muss du dich bei unserem exCoin Manager anmelden.";
  23.     mes "Er registriert dich dann in unserem ^ff0000Premium System^000000.";
  24.     close;
  25.     }
  26.  
  27. L_start:
  28. mes @n$;
  29. mes "Hallo " + strcharinfo(0) + ",";
  30. mes "Bitte wähle zuerst den gewünschten Service aus.";
  31. next;
  32. menu "Status & Skill Reset",-,"Card's entfernen",card_remove,"Miet Service",rental,"Platinum Skills",PLATI;
  33.  
  34. mes "^778899[Reset Service]^000000";
  35. mes "Willkommen beim Reset Service,";
  36. mes "bei mir kannst du deine Skills oder deine Statuswerte zurück setzen lassen.";
  37. next;
  38. mes "^778899[Reset Service]^000000";
  39. mes "Die Gebühr beträgt:";
  40. mes "^0000FF5.000 Zeny^000000 pro ^0000FFBase Level^000000.";
  41. next;
  42.  
  43. if (RESET_PREM == 0){
  44. if (resetfree == 3) goto NEED_PREM;
  45. if (resetfree <= 2) goto FREE_RESET;
  46. }
  47.  
  48. if(!maxrebirth) {
  49. mes "^778899[Reset Service]^000000";
  50. mes "Anhand deines Base Level's kostet dich der Service:";
  51. mes "Reset Stats: ^0000FF"+.@price+"^000000 Zeny";
  52. mes "Reset Skills: ^0000FF"+.@price+"^000000 Zeny";
  53. mes "Reset beides: ^0000FF"+.@price2+"^000000 Zeny";
  54. next;
  55. menu "^FF3355Reset Skills",L0,"Reset Stats",L1,"Reset beides^000000",L2,"Nichts",BEnd;
  56.  
  57. L0:
  58. mes "[Reset Service]";
  59. if (Zeny < .@price) goto NeedZenys;
  60. mes "Okay. Deine Skills wurden restet!";
  61. set Zeny,zeny-.@price;
  62. ResetSkill;
  63. close;
  64. L1:
  65. mes "[Reset Service]";
  66. if (Zeny < .@price) goto NeedZenys;
  67. set Zeny,zeny-.@price;
  68. ResetStatus;
  69. close;
  70. L2:
  71. mes "[Reset Service]";
  72. if (Zeny < .@price2) goto NeedZenys;
  73. mes "Okay. Deine Skills und deine Statuswerte wurden resetet!";
  74. set Zeny,zeny-.@price2;
  75. ResetSkill;
  76. ResetStatus;
  77. close;
  78.  
  79. }else{
  80.  
  81. mes "^778899[Reset Service]^000000";
  82. mes "Anhand deines Base Level's kostet dich der Service:";
  83. mes "Reset Stats: ^0000FF"+.@price+"^000000 Zeny";
  84. mes "Reset Skills: ^0000FF"+.@price+"^000000 Zeny";
  85. mes "Reset beides: ^0000FF"+.@price2+"^000000 Zeny";
  86. next;
  87. menu "^FF3355Reset Skills",B0,"Reset Stats",B1,"Reset beides^000000",B2,"Nichts",BEnd;
  88.  
  89. B0:
  90. mes "^778899[Reset Service]^000000";
  91. if (Zeny < .@price) goto NeedZenys;
  92. mes "Okay. Deine Skills wurden restet!";
  93. set Zeny,zeny-.@price;
  94. ResetSkill;
  95. close;
  96. B1:
  97. mes "^778899[Reset Service]^000000";
  98. if (Zeny < .@price) goto NeedZenys;
  99. mes "Okay. Dein Status wurde resetet!";
  100. set Zeny,zeny-.@price;
  101. ResetStatus;
  102. set StatusPoint,StatusPoint+750;
  103. close;
  104. B2:
  105. mes "^778899[Reset Service]^000000";
  106. if (Zeny < .@price2) goto NeedZenys;
  107. mes "Okay. Deine Skills und deine Statuswerte wurden resetet!";
  108. set Zeny,zeny-.@price2;
  109. ResetSkill;
  110. ResetStatus;
  111. set StatusPoint,StatusPoint+750;
  112. close;
  113.  
  114. NeedZenys:
  115. mes "^778899[Reset Service]^000000";
  116. mes "Tut mir leid...";
  117. mes "Du hast zu wenig ^CC0000Zeny's^000000.";
  118. close;
  119.  
  120. BEnd:
  121. close;
  122. }
  123.  
  124. // ------------ Kostenloses Nutzen --------------------
  125.  
  126. FREE_RESET:
  127.  
  128.  
  129. mes "^ff0000[Reset Service]^000000";
  130. mes " ";
  131. mes "Pro Charakter hast du jedoch nur ^CC00003 Aktionen frei^000000, danach benötigst du den Premium Status für meinen Service.";
  132. next;
  133.  
  134. if (resetfree == 2) { set @rftext$,"einmal"; }
  135. if (resetfree == 1) { set @rftext$,"zweimal"; }
  136. if (resetfree == 0) { set @rftext$,"dreimal"; }
  137.  
  138. if(!maxrebirth) {
  139. mes "^ff0000[Reset Service]^000000";
  140. mes "Wie kann ich dir helfen?";
  141. mes "Du kannst unseren Service noch ^0000FF"+@rftext$+"^000000 kostenlos in Anspruch nehmen.";
  142. mes "Bitte wähle was du möchtest:";
  143. next;
  144. menu "^FF3355Reset Skills",FL0,"Reset Stats",FL1,"Reset beides^000000",FL2,"Nichts",FBEnd;
  145.  
  146. FL0:
  147. mes "[Reset Service]";
  148. mes "Okay. Deine Skills wurden restet!";
  149. set resetfree,resetfree + 1;
  150. ResetSkill;
  151. close;
  152. FL1:
  153. mes "[Reset Service]";
  154. mes "Okay. Dein Status wurde resetet!";
  155. set resetfree,resetfree + 1;
  156. ResetStatus;
  157. close;
  158. FL2:
  159. mes "[Reset Service]";
  160. mes "Okay. Deine Skills und deine Statuswerte wurden resetet!";
  161. set resetfree,resetfree + 1;
  162. ResetSkill;
  163. ResetStatus;
  164. close;
  165.  
  166. }else{
  167.  
  168. mes "^ff0000[Reset Service]^000000";
  169. mes "Du kannst unseren Service noch ^0000FF"+@rftext$+"^000000 kostenlos in Anspruch nehmen.";
  170. mes "Bitte wähle was du möchtest:";
  171. next;
  172. menu "^FF3355Reset Skills",FB0,"Reset Stats",FB1,"Reset beides^000000",FB2,"Nichts",FBEnd;
  173.  
  174. FB0:
  175. mes "^ff0000[Reset Service]^000000";
  176. mes "Okay. Deine Skills wurden restet!";
  177. set resetfree,resetfree + 1;
  178. ResetSkill;
  179. close;
  180. FB1:
  181. mes "^ff0000[Reset Service]^000000";
  182. mes "Okay. Dein Status wurde resetet!";
  183. set resetfree,resetfree + 1;
  184. ResetStatus;
  185. set StatusPoint,StatusPoint+750;
  186. close;
  187. FB2:
  188. mes "^ff0000[Reset Service]^000000";
  189. mes "Okay. Deine Skills und deine Statuswerte wurden resetet!";
  190. set resetfree,resetfree + 1;
  191. ResetSkill;
  192. ResetStatus;
  193. set StatusPoint,StatusPoint+750;
  194. close;
  195.  
  196. FBEnd:
  197. close;
  198. }
  199.  
  200. //
  201.  
  202. // ------------ Miet Service --------------------
  203.  
  204. rental:
  205.     mes "^ff0000[Miet Service]^000000";
  206.     mes "Willkommen beim Miet Service,";
  207.     mes "bei mir kannst du je nach Klasse Carts, Falken oder Pecopecos mieten.";
  208.     next;
  209.     menu "Cart mieten",L_Cart,"Falken mieten",L_Falcon,"PecoPeco mieten",L_Peco,"Beenden",L_Quit;
  210.  
  211. L_Cart:
  212.     if((Class == 4019 || Class == 4011) && checkcart() == 0) goto L_Cart_Ok;
  213.     if((Class == Job_Alchemist || Class == Job_Blacksmith) && checkcart() == 0) goto L_Cart_Ok;
  214.     if((Class == Job_Merchant || Class == Job_SuperNovice || Class == 4045) && checkcart() == 0) goto L_Cart_Ok;
  215.     if(getskilllv(39)<1) goto L_Need_Skill;
  216.     mes "^ff0000[Miet Service]^000000";
  217.     mes "Sorry " + strcharinfo(0) + ", Aber ich vermiete Carts nur für Merchant Klasse die die Fähigkeit dafür haben.";
  218.     close;
  219.  
  220. L_Cart_Ok:
  221.     setcart;
  222.     goto L_Quit2;
  223.  
  224. L_Need_Skill:
  225.     mes "^ff0000[Miet Service]^000000";
  226.     mes "Sorry du hast nicht die Fähigkeit für ein Cart.";
  227.     close;
  228.  
  229. L_Falcon:
  230.     if(BaseJob != Job_Archer && BaseClass == Job_Archer && checkfalcon() == 0) goto L_Falc;
  231.     if(getskilllv(127)<1) goto L_Need_Skill2;
  232.     mes "^ff0000[Miet Service]^000000";
  233.     mes "Sorry "+ strcharinfo(0) +", Aber ich vermiete Falken nur für Hunter und Sniper die auch die Fähigkeit dazu haben.";
  234.     close;
  235.  
  236. L_Falc:
  237.     setfalcon;
  238.     goto L_Quit2;
  239.  
  240. L_Need_Skill2:
  241.     mes "^ff0000[Miet Service]^000000";
  242.     mes "Sorry du hast nicht die Fähigkeit für einen Falken.";
  243.     close;
  244.  
  245. L_Peco:
  246.     if(BaseJob == Job_Knight || BaseJob == Job_Knight2 ) goto L_Peco_Ok;
  247.     if(BaseJob == Job_Crusader || BaseJob == Job_Crusader2 ) goto L_Peco_Ok;
  248.     if(getskilllv(63) == 0) goto L_Need_Skill3;
  249.     if(checkriding() == 0) goto L_Quit;
  250.     mes "^ff0000[Miet Service]^000000";
  251.     mes "Sorry " + strcharinfo(0) + ", ich vermiete nur PecoPecos für Knight und Crusader die auch die Fähigkeit dazu haben.";
  252.     close;
  253.  
  254. L_Peco_Ok:
  255.     setriding;
  256.     goto L_Quit2;
  257.  
  258. L_Need_Skill3:
  259.     mes "^ff0000[Miet Service]^000000";
  260.     mes "Sorry du hast nicht die Fähigkeit für ein PecoPeco.";
  261.     close;
  262.  
  263. L_Quit:
  264.     mes "^ff0000[Miet Service]^000000";
  265.     mes strcharinfo(0) + ", Bitte komm zurück wenn du bereit bist um etwas zu mieten.";
  266.     close;
  267.  
  268. L_Quit2:
  269.     mes "^ff0000[Miet Service]^000000";
  270.     mes strcharinfo(0) + ", Bitte komm zurück wenn du nochmal etwas brauchst.";
  271.     close;
  272.  
  273. // ------------ Card Remover --------------------
  274.  
  275. card_remove:
  276.     mes "^ff0000[Card Service]^000000";
  277.     mes "Möchtest du Cards aus deinem Equipment entfernen?!";
  278.     next;
  279.     menu "Entfernen",REMOVEMENU,"Was verlangst du dafür?",REMOVEPRICE,"Nein Danke.",-;
  280.     close;
  281.  
  282. REMOVEPRICE:
  283.     mes "^ff0000[Miet Service]^000000";
  284.     mes "Ich verlange pro Card ^0000FF100.000 zeny^000000 pro Aktion.";
  285.     mes "Man sagt ich sei der billigste Card Entferner weit und breit!";
  286.     next;
  287.     menu "Sehr gut. Los gehts!",REMOVEMENU,"Nein Danke.",-;
  288.     close;
  289.  
  290. REMOVEMENU:
  291.     mes "^ff0000[Card Service]^000000";
  292.     mes "Welches Item soll ich bearbeiten?";
  293.     next;
  294.     menu ""+ getequipname(10) +"",SLOT10,""+ getequipname(9) +"",SLOT9,""+ getequipname(8) +"",SLOT8,""+ getequipname(7) +"",SLOT7,""+ getequipname(6) +"",SLOT6,""+ getequipname(5) +"",SLOT5,""+ getequipname(4) +"",SLOT4,""+ getequipname(3) +"",SLOT3,""+ getequipname(2) +"",SLOT2,""+ getequipname(1) +"",SLOT1,"Ich habs mir doch anders überlegt.",CLOSEOUT;
  295.     set @part,3;
  296. SLOT1:
  297.     set @part,1;
  298.     goto CARDNUMCHECK;
  299.  
  300. SLOT2:
  301.     set @part,2;
  302.     goto CARDNUMCHECK;
  303.  
  304. SLOT3:
  305.     set @part,3;
  306.     goto CARDNUMCHECK;
  307.  
  308. SLOT4:
  309.     set @part,4;
  310.     goto CARDNUMCHECK;
  311.  
  312. SLOT5:
  313.     set @part,5;
  314.     goto CARDNUMCHECK;
  315.  
  316. SLOT6:
  317.     set @part,6;
  318.     goto CARDNUMCHECK;
  319.  
  320. SLOT7:
  321.     set @part,7;
  322.     goto CARDNUMCHECK;
  323.  
  324. SLOT8:
  325.     set @part,8;
  326.     goto CARDNUMCHECK;
  327.  
  328. SLOT9:
  329.     set @part,9;
  330.     goto CARDNUMCHECK;
  331.  
  332. SLOT10:
  333.     set @part,10;
  334.     goto CARDNUMCHECK;
  335.  
  336. CARDNUMCHECK:
  337.     if(getequipcardcnt(@part) == 0) goto DENYCARDCOUNT;
  338.     set @cardcount,getequipcardcnt(@part);
  339.     if(@cardcount > 1) goto CARDNUMMULTIMSG;
  340.     mes "^ff0000[Card Service]^000000";
  341.     mes "Dieses Item hat " + @cardcount + " card. Um meine Magie zu wirken, brauche ich, ^0000FF100.000^000000 zeny!";
  342.     goto CARDNUMPOSTMSG;
  343. CARDNUMMULTIMSG:
  344.     mes "^ff0000[Card Service]^000000";
  345.     mes "Dieses Item hat " + @cardcount + " cards. Um meine Magie zu wirken, brauche ich " + (@cardcount * 100000) + " zeny!";
  346. CARDNUMPOSTMSG:
  347.     next;
  348.     menu "Sehr gut, mach es.",RemoveCard,"Doch nicht!!",-;
  349.     close;
  350. RemoveCard:
  351.     mes "^ff0000[Card Service]^000000";
  352.     mes "Sehr gut, ich werde jetzt beginnen.";
  353.     if(zeny < (@cardcount * 100000)) goto DENYMATERIAL;
  354.     set zeny,zeny - (@cardcount * 100000);
  355.     successremovecards @part;
  356.     next;
  357.     mes "^ff0000[Card Service]^000000";
  358.     mes "Der Prozess war ein voller Erfolg. Hier hast du deine Cards und dein Item.";
  359.     close;
  360.  
  361. DENYCARDCOUNT:
  362.     mes "^ff0000[Card Service]^000000";
  363.     mes "Tut mir leid aber dieses Item ist mit keiner einzigen Card verbunden... damit kann ich nichts anfangen!";
  364.     close;
  365.  
  366. DENYMATERIAL:
  367.     next;
  368.     mes "^ff0000[Card Service]^000000";
  369.     mes "Tut mir leid aber du hast zu wenig Zeny dabei, komm wieder wenn du genug dabei hast!!";
  370.     close;
  371.  
  372. CLOSEOUT:
  373.     close;
  374.  
  375. // ------------ Platinum Skills  --------------------
  376.  
  377. PLATI:
  378.  
  379. set @ps_cost,1;
  380.  
  381. if (#language == 0){
  382. mes "[ ^000088Platin Skill Service^000000 ]";
  383. mes "I can teach you the Platinium-Skills for your Class.";
  384. mes "this will cost you one time only 1 ^0000FFexCoin^000000 per Skill ea";
  385. next;
  386. menu "Yes please.",Lgetskills,"No thanks.",Lnogetskills;
  387. } else {
  388. mes "[ ^000088Platinium Skill NPC^000000 ]";
  389. mes "Ich kann dir die Platinium-Skills beibringen wenn du magst.";
  390. mes "das kostet dich einmalig nur 1 ^0000FFexCoin^000000 pro Skill.";
  391. next;
  392. menu "Ja gerne.",Lgetskills,"Nein danke.",Lnogetskills;
  393. }
  394.  
  395. Lgetskills:
  396. if (BaseClass==Job_Novice) goto Lskillsnovice;
  397. if (BaseJob==Job_Crusader) goto Lskillscrusader;
  398. if (BaseJob==Job_Knight) goto Lskillsknight;
  399. if (BaseClass==Job_Swordman) goto Lskillsswordie;
  400. if (BaseJob==Job_Sage) goto Lskillssage;
  401. if (BaseJob==Job_Wizard) goto Lskillswizard;
  402. if (BaseClass==Job_Mage) goto Lskillsmage;
  403. if (BaseJob==Job_Hunter) goto Lskillshunter;
  404. if (BaseJob==Job_Bard) goto Lskillsbard;
  405. if (BaseJob==Job_Dancer) goto Lskillsdancer;
  406. if (BaseClass==Job_Archer) goto Lskillsarcher;
  407. if (BaseJob==Job_Monk) goto Lskillsmonk;
  408. if (BaseJob==Job_Priest) goto Lskillspriest;
  409. if (BaseClass==Job_Acolyte) goto Lskillsaco;
  410. if (BaseJob==Job_Alchemist) goto Lskillsalchemist;
  411. if (BaseJob==Job_Blacksmith) goto Lskillsblacksmith;
  412. if (BaseClass==Job_Merchant) goto Lskillsmerchie;
  413. if (BaseJob==Job_Rogue) goto Lskillsrogue;
  414. if (BaseJob==Job_Assassin) goto Lskillsassa;
  415. if (BaseClass==Job_Thief) goto Lskillsthief;
  416.  
  417. Lskillsnovice:
  418. if (#language == 0){
  419. mes "[ ^000088Platinium Skill NPC^000000 ]";
  420. mes "Oh i see, you are a Novice, here are your Skills.";
  421. } else {
  422. mes "[ ^000088Platinium Skill NPC^000000 ]";
  423. mes "Oh ich sehe, du bist Novice, hier deine Skills.";
  424. }
  425. // First Aid
  426. skill 142,1,0;
  427. // Trick Dead
  428. skill 143,1,0;
  429. next;
  430. goto LskillsEND;
  431.  
  432. Lskillsswordie:
  433. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  434. if (ps144 > 0 && ps145 > 0 && ps146 > 0){
  435. mes "[ ^000088Platinium Skill NPC^000000 ]";
  436. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  437. close;
  438. }
  439. mes "[ ^000088Platinium Skill NPC^000000 ]";
  440. mes "Oh ich sehe, du bist Swordman, welchen Platinium Skill möchtest du?";
  441. next;
  442. switch (select("Fatal Blow","Moving HP Recovery","Auto Berserk","Beenden.")) {
  443.  
  444. case 1:
  445. if (ps145 > 0) goto PS_DONE;
  446. delitem 26000,@ps_cost;
  447. skill 145,1,0;
  448. set ps145,1;
  449. next;
  450. goto LskillsEND;
  451.  
  452. case 2:
  453. if (ps144 > 0) goto PS_DONE;
  454. delitem 26000,@ps_cost;
  455. skill 144,1,0;
  456. set ps144,1;
  457. next;
  458. goto LskillsEND;
  459.  
  460. case 3:
  461. if (ps146 > 0) goto PS_DONE;
  462. delitem 26000,@ps_cost;
  463. skill 146,1,0;
  464. set ps146,1;
  465. next;
  466. goto LskillsEND;
  467.  
  468. case 4:
  469. mes "[ ^000088Platinium Skill NPC^000000 ]";
  470. mes "Dann bist später.";
  471. close;
  472. }
  473.  
  474. Lskillsmage:
  475. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  476. if (ps157 > 0){
  477. mes "[ ^000088Platinium Skill NPC^000000 ]";
  478. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  479. close;
  480. }
  481. mes "[ ^000088Platinium Skill NPC^000000 ]";
  482. mes "Oh ich sehe, du bist Mage, welchen Platinium Skill möchtest du?";
  483. next;
  484. switch (select("Energy Coat","Beenden.")) {
  485.  
  486. case 1:
  487. if (ps157 > 0) goto PS_DONE;
  488. delitem 26000,@ps_cost;
  489. skill 157,1,0;
  490. set ps157,1;
  491. next;
  492. goto LskillsEND;
  493.  
  494. case 2:
  495. mes "[ ^000088Platinium Skill NPC^000000 ]";
  496. mes "Dann bist später.";
  497. close;
  498. }
  499.  
  500. Lskillsarcher:
  501. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  502. if (ps147 > 0 && ps148 > 0){
  503. mes "[ ^000088Platinium Skill NPC^000000 ]";
  504. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  505. close;
  506. }
  507. mes "[ ^000088Platinium Skill NPC^000000 ]";
  508. mes "Oh ich sehe, du bist Archer, welchen Platinium Skill möchtest du?";
  509. next;
  510. switch (select("Arrow Crafting","Charge Arrow","Beenden.")) {
  511.  
  512. case 1:
  513. if (ps147 > 0) goto PS_DONE;
  514. delitem 26000,@ps_cost;
  515. skill 147,1,0;
  516. set ps147,1;
  517. next;
  518. goto LskillsEND;
  519.  
  520. case 2:
  521. if (ps148 > 0) goto PS_DONE;
  522. delitem 26000,@ps_cost;
  523. skill 148,1,0;
  524. set ps148,1;
  525. next;
  526. goto LskillsEND;
  527.  
  528. case 3:
  529. mes "[ ^000088Platinium Skill NPC^000000 ]";
  530. mes "Dann bist später.";
  531. close;
  532. }
  533.  
  534. Lskillsaco:
  535. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  536. if (ps156 > 0){
  537. mes "[ ^000088Platinium Skill NPC^000000 ]";
  538. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  539. close;
  540. }
  541. mes "[ ^000088Platinium Skill NPC^000000 ]";
  542. mes "Oh ich sehe, du bist Aco, welchen Platinium Skill möchtest du?";
  543. next;
  544. switch (select("Holy Light","Beenden.")) {
  545.  
  546. case 1:
  547. if (ps156 > 0) goto PS_DONE;
  548. delitem 26000,@ps_cost;
  549. skill 156,1,0;
  550. set ps156,1;
  551. next;
  552. goto LskillsEND;
  553.  
  554. case 2:
  555. mes "[ ^000088Platinium Skill NPC^000000 ]";
  556. mes "Dann bist später.";
  557. close;
  558. }
  559.  
  560. Lskillsmerchie:
  561. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  562. if (ps153 > 0 && ps154 > 0 && ps155 > 0){
  563. mes "[ ^000088Platinium Skill NPC^000000 ]";
  564. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  565. close;
  566. }
  567. mes "[ ^000088Platinium Skill NPC^000000 ]";
  568. mes "Oh ich sehe, du bist Merchant, welchen Platinium Skill möchtest du?";
  569. next;
  570. switch (select("Cart Revolution","Change Cart","Crazy Uproar","Beenden.")) {
  571.  
  572. case 1:
  573. if (ps153 > 0) goto PS_DONE;
  574. delitem 26000,@ps_cost;
  575. skill 153,1,0;
  576. set ps153,1;
  577. next;
  578. goto LskillsEND;
  579.  
  580. case 2:
  581. if (ps154 > 0) goto PS_DONE;
  582. delitem 26000,@ps_cost;
  583. skill 154,1,0;
  584. set ps154,1;
  585. next;
  586. goto LskillsEND;
  587.  
  588. case 3:
  589. if (ps155 > 0) goto PS_DONE;
  590. delitem 26000,@ps_cost;
  591. skill 155,1,0;
  592. set ps155,1;
  593. next;
  594. goto LskillsEND;
  595.  
  596. case 4:
  597. mes "[ ^000088Platinium Skill NPC^000000 ]";
  598. mes "Dann bist später.";
  599. close;
  600. }
  601.  
  602. Lskillsthief:
  603. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  604. if (ps149 > 0 && ps150 > 0 && ps151 > 0 && ps152 > 0){
  605. mes "[ ^000088Platinium Skill NPC^000000 ]";
  606. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  607. close;
  608. }
  609. mes "[ ^000088Platinium Skill NPC^000000 ]";
  610. mes "Oh ich sehe, du bist Thief, welchen Platinium Skill möchtest du?";
  611. next;
  612. switch (select("Sand Attack","Back Sliding","Pick Stone","Throw Stone","Beenden.")) {
  613.  
  614. case 1:
  615. if (ps149 > 0) goto PS_DONE;
  616. delitem 26000,@ps_cost;
  617. skill 149,1,0;
  618. set ps149,1;
  619. next;
  620. goto LskillsEND;
  621.  
  622. case 2:
  623. if (ps150 > 0) goto PS_DONE;
  624. delitem 26000,@ps_cost;
  625. skill 150,1,0;
  626. set ps150,1;
  627. next;
  628. goto LskillsEND;
  629.  
  630. case 3:
  631. if (ps151 > 0) goto PS_DONE;
  632. delitem 26000,@ps_cost;
  633. skill 151,1,0;
  634. set ps151,1;
  635. next;
  636. goto LskillsEND;
  637.  
  638. case 4:
  639. if (ps152 > 0) goto PS_DONE;
  640. delitem 26000,@ps_cost;
  641. skill 152,1,0;
  642. set ps152,1;
  643. next;
  644. goto LskillsEND;
  645.  
  646. case 5:
  647. mes "[ ^000088Platinium Skill NPC^000000 ]";
  648. mes "Dann bist später.";
  649. close;
  650. }
  651.  
  652. Lskillsknight:
  653. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  654. if (ps144 > 0 && ps145 > 0 && ps146 > 0 && ps1001 > 0){
  655. mes "[ ^000088Platinium Skill NPC^000000 ]";
  656. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  657. close;
  658. }
  659. mes "[ ^000088Platinium Skill NPC^000000 ]";
  660. mes "Oh ich sehe, du bist Knight, welchen Platinium Skill möchtest du?";
  661. next;
  662. switch (select("Fatal Blow","Moving HP Recovery","Auto Berserk","Charge Attack ","Beenden.")) {
  663.  
  664. case 1:
  665. if (ps145 > 0) goto PS_DONE;
  666. delitem 26000,@ps_cost;
  667. skill 145,1,0;
  668. set ps145,1;
  669. next;
  670. goto LskillsEND;
  671.  
  672. case 2:
  673. if (ps144 > 0) goto PS_DONE;
  674. delitem 26000,@ps_cost;
  675. skill 144,1,0;
  676. set ps144,1;
  677. next;
  678. goto LskillsEND;
  679.  
  680. case 3:
  681. if (ps146 > 0) goto PS_DONE;
  682. delitem 26000,@ps_cost;
  683. skill 146,1,0;
  684. set ps146,1;
  685. next;
  686. goto LskillsEND;
  687.  
  688. case 4:
  689. if (ps1001 > 0) goto PS_DONE;
  690. delitem 26000,@ps_cost;
  691. skill 1001,1,0;
  692. set ps1001,1;
  693. next;
  694. goto LskillsEND;
  695.  
  696. case 5:
  697. mes "[ ^000088Platinium Skill NPC^000000 ]";
  698. mes "Dann bist später.";
  699. close;
  700. }
  701.  
  702.  
  703. Lskillscrusader:
  704. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  705. if (ps144 > 0 && ps145 > 0 && ps146 > 0 && ps1002 > 0){
  706. mes "[ ^000088Platinium Skill NPC^000000 ]";
  707. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  708. close;
  709. }
  710. mes "[ ^000088Platinium Skill NPC^000000 ]";
  711. mes "Oh ich sehe, du bist Crusader, welchen Platinium Skill möchtest du?";
  712. next;
  713. switch (select("Fatal Blow","Moving HP Recovery","Auto Berserk","Shrink","Beenden.")) {
  714.  
  715. case 1:
  716. if (ps145 > 0) goto PS_DONE;
  717. delitem 26000,@ps_cost;
  718. skill 145,1,0;
  719. set ps145,1;
  720. next;
  721. goto LskillsEND;
  722.  
  723. case 2:
  724. if (ps144 > 0) goto PS_DONE;
  725. delitem 26000,@ps_cost;
  726. skill 144,1,0;
  727. set ps144,1;
  728. next;
  729. goto LskillsEND;
  730.  
  731. case 3:
  732. if (ps146 > 0) goto PS_DONE;
  733. delitem 26000,@ps_cost;
  734. skill 146,1,0;
  735. set ps146,1;
  736. next;
  737. goto LskillsEND;
  738.  
  739. case 4:
  740. if (ps1002 > 0) goto PS_DONE;
  741. delitem 26000,@ps_cost;
  742. skill 1002,1,0;
  743. set ps1002,1;
  744. next;
  745. goto LskillsEND;
  746.  
  747. case 5:
  748. mes "[ ^000088Platinium Skill NPC^000000 ]";
  749. mes "Dann bist später.";
  750. close;
  751. }
  752.  
  753.  
  754. Lskillssage:
  755. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  756. if (ps157 > 0 && ps1007 > 0 && ps1008 > 0 || ps1017 > 0 || ps1018 > 0 || ps1019 > 0){
  757. mes "[ ^000088Platinium Skill NPC^000000 ]";
  758. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  759. close;
  760. }
  761. mes "[ ^000088Platinium Skill NPC^000000 ]";
  762. mes "Oh ich sehe, du bist Sage, welchen Platinium Skill möchtest du?";
  763. next;
  764. switch (select("Energy Coat","Create Converter","Elemental Change","Beenden.")) {
  765.  
  766. case 1:
  767. if (ps157 > 0) goto PS_DONE;
  768. delitem 26000,@ps_cost;
  769. skill 157,1,0;
  770. set ps157,1;
  771. next;
  772. goto LskillsEND;
  773.  
  774. case 2:
  775. if (ps1007 > 0) goto PS_DONE;
  776. delitem 26000,@ps_cost;
  777. skill 1007,1,0;
  778. set ps1007,1;
  779. next;
  780. goto LskillsEND;
  781.  
  782. case 3:
  783. mes "[ ^000088Platinium Skill NPC^000000 ]";
  784. mes "Du kannst einen von 4 Elemente beherschen, welche möchtest du?";
  785. next;
  786. switch (select("Fire","Wind","Earth","Water","Beenden.")) {
  787. case 1:
  788. if (ps1008 > 0) goto PS_DONE;
  789. if (ps1017 > 0) goto PS_DONE;
  790. if (ps1018 > 0) goto PS_DONE;
  791. if (ps1019 > 0) goto PS_DONE;
  792. delitem 26000,@ps_cost;
  793. skill 1018,1,0;
  794. set ps1018,1;
  795. next;
  796. goto LskillsEND;
  797. case 2:
  798. if (ps1008 > 0) goto PS_DONE;
  799. if (ps1017 > 0) goto PS_DONE;
  800. if (ps1018 > 0) goto PS_DONE;
  801. if (ps1019 > 0) goto PS_DONE;
  802. delitem 26000,@ps_cost;
  803. skill 1019,1,0;
  804. set ps1019,1;
  805. next;
  806. goto LskillsEND;
  807. case 3:
  808. if (ps1008 > 0) goto PS_DONE;
  809. if (ps1017 > 0) goto PS_DONE;
  810. if (ps1018 > 0) goto PS_DONE;
  811. if (ps1019 > 0) goto PS_DONE;
  812. delitem 26000,@ps_cost;
  813. skill 1017,1,0;
  814. set ps1017,1;
  815. next;
  816. goto LskillsEND;
  817. case 4:
  818. if (ps1008 > 0) goto PS_DONE;
  819. if (ps1017 > 0) goto PS_DONE;
  820. if (ps1018 > 0) goto PS_DONE;
  821. if (ps1019 > 0) goto PS_DONE;
  822. delitem 26000,@ps_cost;
  823. skill 1008,1,0;
  824. set ps1008,1;
  825. next;
  826. goto LskillsEND;
  827. case 5:
  828. mes "[ ^000088Platinium Skill NPC^000000 ]";
  829. mes "Komm wieder wenn du weißt, was du möchtest.";
  830. close;
  831. }
  832.  
  833. case 4:
  834. mes "[ ^000088Platinium Skill NPC^000000 ]";
  835. mes "Dann bist später.";
  836. close;
  837. }
  838.  
  839.  
  840. Lskillswizard:
  841. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  842. if (ps157 > 0 && ps1006 > 0){
  843. mes "[ ^000088Platinium Skill NPC^000000 ]";
  844. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  845. close;
  846. }
  847. mes "[ ^000088Platinium Skill NPC^000000 ]";
  848. mes "Oh ich sehe, du bist Wizard, welchen Platinium Skill möchtest du?";
  849. next;
  850. switch (select("Energy Coat","Sight Blaster","Beenden.")) {
  851.  
  852. case 1:
  853. if (ps157 > 0) goto PS_DONE;
  854. delitem 26000,@ps_cost;
  855. skill 157,1,0;
  856. set ps157,1;
  857. next;
  858. goto LskillsEND;
  859.  
  860. case 2:
  861. if (ps1006 > 0) goto PS_DONE;
  862. delitem 26000,@ps_cost;
  863. skill 1006,1,0;
  864. set ps1006,1;
  865. next;
  866. goto LskillsEND;
  867.  
  868. case 3:
  869. mes "[ ^000088Platinium Skill NPC^000000 ]";
  870. mes "Dann bist später.";
  871. close;
  872. }
  873.  
  874.  
  875. Lskillshunter:
  876. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  877. if (ps147 > 0 && ps148 > 0 && ps1009 > 0){
  878. mes "[ ^000088Platinium Skill NPC^000000 ]";
  879. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  880. close;
  881. }
  882. mes "[ ^000088Platinium Skill NPC^000000 ]";
  883. mes "Oh ich sehe, du bist Hunter, welchen Platinium Skill möchtest du?";
  884. next;
  885. switch (select("Arrow Crafting","Charge Arrow","Phantasmic Arrow","Beenden.")) {
  886.  
  887. case 1:
  888. if (ps147 > 0) goto PS_DONE;
  889. delitem 26000,@ps_cost;
  890. skill 147,1,0;
  891. set ps147,1;
  892. next;
  893. goto LskillsEND;
  894.  
  895. case 2:
  896. if (ps148 > 0) goto PS_DONE;
  897. delitem 26000,@ps_cost;
  898. skill 148,1,0;
  899. set ps148,1;
  900. next;
  901. goto LskillsEND;
  902.  
  903. case 3:
  904. if (ps1009 > 0) goto PS_DONE;
  905. delitem 26000,@ps_cost;
  906. skill 1009,1,0;
  907. set ps1009,1;
  908. next;
  909. goto LskillsEND;
  910.  
  911. case 4:
  912. mes "[ ^000088Platinium Skill NPC^000000 ]";
  913. mes "Dann bist später.";
  914. close;
  915. }
  916.  
  917.  
  918. Lskillsdancer:
  919. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  920. if (ps147 > 0 && ps148 > 0 && ps1011 > 0){
  921. mes "[ ^000088Platinium Skill NPC^000000 ]";
  922. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  923. close;
  924. }
  925. mes "[ ^000088Platinium Skill NPC^000000 ]";
  926. mes "Oh ich sehe, du bist eine Dancerin, welchen Platinium Skill möchtest du?";
  927. next;
  928. switch (select("Arrow Crafting","Charge Arrow","Wink of Charm","Beenden.")) {
  929.  
  930. case 1:
  931. if (ps147 > 0) goto PS_DONE;
  932. delitem 26000,@ps_cost;
  933. skill 147,1,0;
  934. set ps147,1;
  935. next;
  936. goto LskillsEND;
  937.  
  938. case 2:
  939. if (ps148 > 0) goto PS_DONE;
  940. delitem 26000,@ps_cost;
  941. skill 148,1,0;
  942. set ps148,1;
  943. next;
  944. goto LskillsEND;
  945.  
  946. case 3:
  947. if (ps1011 > 0) goto PS_DONE;
  948. delitem 26000,@ps_cost;
  949. skill 1011,1,0;
  950. set ps1011,1;
  951. next;
  952. goto LskillsEND;
  953.  
  954. case 4:
  955. mes "[ ^000088Platinium Skill NPC^000000 ]";
  956. mes "Dann bist später.";
  957. close;
  958. }
  959.  
  960.  
  961. Lskillsbard:
  962. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  963. if (ps147 > 0 && ps148 > 0 && ps1010 > 0){
  964. mes "[ ^000088Platinium Skill NPC^000000 ]";
  965. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  966. close;
  967. }
  968. mes "[ ^000088Platinium Skill NPC^000000 ]";
  969. mes "Oh ich sehe, du bist Archer, welchen Platinium Skill möchtest du?";
  970. next;
  971. switch (select("Arrow Crafting","Charge Arrow","Pang Voice","Beenden.")) {
  972.  
  973. case 1:
  974. if (ps147 > 0) goto PS_DONE;
  975. delitem 26000,@ps_cost;
  976. skill 147,1,0;
  977. set ps147,1;
  978. next;
  979. goto LskillsEND;
  980.  
  981. case 2:
  982. if (ps148 > 0) goto PS_DONE;
  983. delitem 26000,@ps_cost;
  984. skill 148,1,0;
  985. set ps148,1;
  986. next;
  987. goto LskillsEND;
  988.  
  989. case 3:
  990. if (ps1010 > 0) goto PS_DONE;
  991. delitem 26000,@ps_cost;
  992. skill 1010,1,0;
  993. set ps1010,1;
  994. next;
  995. goto LskillsEND;
  996.  
  997. case 4:
  998. mes "[ ^000088Platinium Skill NPC^000000 ]";
  999. mes "Dann bist später.";
  1000. close;
  1001. }
  1002.  
  1003.  
  1004. Lskillsmonk:
  1005. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  1006. if (ps156 > 0 && ps1015 > 0 && ps1016 > 0){
  1007. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1008. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  1009. close;
  1010. }
  1011. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1012. mes "Oh ich sehe, du bist Aco, welchen Platinium Skill möchtest du?";
  1013. next;
  1014. switch (select("Holy Light","Ki Translation","Ki Explosion","Beenden.")) {
  1015.  
  1016. case 1:
  1017. if (ps156 > 0) goto PS_DONE;
  1018. delitem 26000,@ps_cost;
  1019. skill 156,1,0;
  1020. set ps156,1;
  1021. next;
  1022. goto LskillsEND;
  1023.  
  1024. case 2:
  1025. if (ps1015 > 0) goto PS_DONE;
  1026. delitem 26000,@ps_cost;
  1027. skill 1015,1,0;
  1028. set ps1015,1;
  1029. next;
  1030. goto LskillsEND;
  1031.  
  1032. case 3:
  1033. if (ps1016 > 0) goto PS_DONE;
  1034. delitem 26000,@ps_cost;
  1035. skill 1016,1,0;
  1036. set ps1016,1;
  1037. next;
  1038. goto LskillsEND;
  1039.  
  1040. case 4:
  1041. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1042. mes "Dann bist später.";
  1043. close;
  1044. }
  1045.  
  1046. Lskillspriest:
  1047. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  1048. if (ps156 > 0 && ps1014 > 0){
  1049. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1050. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  1051. close;
  1052. }
  1053. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1054. mes "Oh ich sehe, du bist Aco, welchen Platinium Skill möchtest du?";
  1055. next;
  1056. switch (select("Holy Light","Redemptio","Beenden.")) {
  1057.  
  1058. case 1:
  1059. if (ps156 > 0) goto PS_DONE;
  1060. delitem 26000,@ps_cost;
  1061. skill 156,1,0;
  1062. set ps156,1;
  1063. next;
  1064. goto LskillsEND;
  1065.  
  1066. case 2:
  1067. if (ps1014 > 0) goto PS_DONE;
  1068. delitem 26000,@ps_cost;
  1069. skill 1014,1,0;
  1070. set ps1014,1;
  1071. next;
  1072. goto LskillsEND;
  1073.  
  1074. case 3:
  1075. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1076. mes "Dann bist später.";
  1077. close;
  1078. }
  1079.  
  1080. Lskillsalchemist:
  1081. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  1082. if (ps153 > 0 && ps154 > 0 && ps155 > 0 && ps238 > 0){
  1083. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1084. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  1085. close;
  1086. }
  1087. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1088. mes "Oh ich sehe, du bist Alchemist, welchen Platinium Skill möchtest du?";
  1089. next;
  1090. switch (select("Cart Revolution","Change Cart","Crazy Uproar","Bio Ethics","Beenden.")) {
  1091.  
  1092. case 1:
  1093. if (ps153 > 0) goto PS_DONE;
  1094. delitem 26000,@ps_cost;
  1095. skill 153,1,0;
  1096. set ps153,1;
  1097. next;
  1098. goto LskillsEND;
  1099.  
  1100. case 2:
  1101. if (ps154 > 0) goto PS_DONE;
  1102. delitem 26000,@ps_cost;
  1103. skill 154,1,0;
  1104. set ps154,1;
  1105. next;
  1106. goto LskillsEND;
  1107.  
  1108. case 3:
  1109. if (ps155 > 0) goto PS_DONE;
  1110. delitem 26000,@ps_cost;
  1111. skill 155,1,0;
  1112. set ps155,1;
  1113. next;
  1114. goto LskillsEND;
  1115.  
  1116. case 4:
  1117. if (ps238 > 0) goto PS_DONE;
  1118. delitem 26000,@ps_cost;
  1119. skill 238,1,0;
  1120. set ps238,1;
  1121. next;
  1122. goto LskillsEND;
  1123.  
  1124. case 5:
  1125. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1126. mes "Dann bist später.";
  1127. close;
  1128. }
  1129.  
  1130.  
  1131. Lskillsblacksmith:
  1132. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  1133. if (ps153 > 0 && ps154 > 0 && ps155 > 0 && ps1012 > 0 && ps1013 > 0){
  1134. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1135. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  1136. close;
  1137. }
  1138. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1139. mes "Oh ich sehe, du bist Blacksmith, welchen Platinium Skill möchtest du?";
  1140. next;
  1141. switch (select("Cart Revolution","Change Cart","Crazy Uproar","Unfair Trick","Greed","Beenden.")) {
  1142.  
  1143. case 1:
  1144. if (ps153 > 0) goto PS_DONE;
  1145. delitem 26000,@ps_cost;
  1146. skill 153,1,0;
  1147. set ps153,1;
  1148. next;
  1149. goto LskillsEND;
  1150.  
  1151. case 2:
  1152. if (ps154 > 0) goto PS_DONE;
  1153. delitem 26000,@ps_cost;
  1154. skill 154,1,0;
  1155. set ps154,1;
  1156. next;
  1157. goto LskillsEND;
  1158.  
  1159. case 3:
  1160. if (ps155 > 0) goto PS_DONE;
  1161. delitem 26000,@ps_cost;
  1162. skill 155,1,0;
  1163. set ps155,1;
  1164. next;
  1165. goto LskillsEND;
  1166.  
  1167. case 4:
  1168. if (ps1012 > 0) goto PS_DONE;
  1169. delitem 26000,@ps_cost;
  1170. skill 1012,1,0;
  1171. set ps1012,1;
  1172. next;
  1173. goto LskillsEND;
  1174.  
  1175. case 5:
  1176. if (ps1013 > 0) goto PS_DONE;
  1177. delitem 26000,@ps_cost;
  1178. skill 1013,1,0;
  1179. set ps1013,1;
  1180. next;
  1181. goto LskillsEND;
  1182.  
  1183. case 6:
  1184. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1185. mes "Dann bist später.";
  1186. close;
  1187. }
  1188.  
  1189.  
  1190. Lskillsrogue:
  1191. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  1192. if (ps149 > 0 && ps150 > 0 && ps151 > 0 && ps152 > 0 && ps1005 > 0){
  1193. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1194. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  1195. close;
  1196. }
  1197. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1198. mes "Oh ich sehe, du bist Rogue, welchen Platinium Skill möchtest du?";
  1199. next;
  1200. switch (select("Sand Attack","Back Sliding","Pick Stone","Throw Stone","Close Confine","Beenden.")) {
  1201.  
  1202. case 1:
  1203. if (ps149 > 0) goto PS_DONE;
  1204. delitem 26000,@ps_cost;
  1205. skill 149,1,0;
  1206. set ps149,1;
  1207. next;
  1208. goto LskillsEND;
  1209.  
  1210. case 2:
  1211. if (ps150 > 0) goto PS_DONE;
  1212. delitem 26000,@ps_cost;
  1213. skill 150,1,0;
  1214. set ps150,1;
  1215. next;
  1216. goto LskillsEND;
  1217.  
  1218. case 3:
  1219. if (ps151 > 0) goto PS_DONE;
  1220. delitem 26000,@ps_cost;
  1221. skill 151,1,0;
  1222. set ps151,1;
  1223. next;
  1224. goto LskillsEND;
  1225.  
  1226. case 4:
  1227. if (ps152 > 0) goto PS_DONE;
  1228. delitem 26000,@ps_cost;
  1229. skill 152,1,0;
  1230. set ps152,1;
  1231. next;
  1232. goto LskillsEND;
  1233.  
  1234. case 5:
  1235. if (ps1005 > 0) goto PS_DONE;
  1236. delitem 26000,@ps_cost;
  1237. skill 1005,1,0;
  1238. set ps1005,1;
  1239. next;
  1240. goto LskillsEND;
  1241.  
  1242. case 6:
  1243. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1244. mes "Dann bist später.";
  1245. close;
  1246. }
  1247.  
  1248. Lskillsassa:
  1249. if (countitem(26000) < @ps_cost) goto NO_TICKET;
  1250. if (ps149 > 0 && ps150 > 0 && ps151 > 0 && ps152 > 0 && ps1004 > 0 && ps1003 > 0){
  1251. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1252. mes "Du hast bereits alle verfügbaren Platinium Skills für deine Klasse.";
  1253. close;
  1254. }
  1255. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1256. mes "Oh ich sehe, du bist Thief, welchen Platinium Skill möchtest du?";
  1257. next;
  1258. switch (select("Sand Attack","Back Sliding","Pick Stone","Throw Stone","Throw Venom Knife","Sonic Acceleration","Beenden.")) {
  1259.  
  1260. case 1:
  1261. if (ps149 > 0) goto PS_DONE;
  1262. delitem 26000,@ps_cost;
  1263. skill 149,1,0;
  1264. set ps149,1;
  1265. next;
  1266. goto LskillsEND;
  1267.  
  1268. case 2:
  1269. if (ps150 > 0) goto PS_DONE;
  1270. delitem 26000,@ps_cost;
  1271. skill 150,1,0;
  1272. set ps150,1;
  1273. next;
  1274. goto LskillsEND;
  1275.  
  1276. case 3:
  1277. if (ps151 > 0) goto PS_DONE;
  1278. delitem 26000,@ps_cost;
  1279. skill 151,1,0;
  1280. set ps151,1;
  1281. next;
  1282. goto LskillsEND;
  1283.  
  1284. case 4:
  1285. if (ps152 > 0) goto PS_DONE;
  1286. delitem 26000,@ps_cost;
  1287. skill 152,1,0;
  1288. set ps152,1;
  1289. next;
  1290. goto LskillsEND;
  1291.  
  1292. case 5:
  1293. if (ps1004 > 0) goto PS_DONE;
  1294. delitem 26000,@ps_cost;
  1295. skill 1004,1,0;
  1296. set ps1004,1;
  1297. next;
  1298. goto LskillsEND;
  1299.  
  1300. case 6:
  1301. if (ps1003 > 0) goto PS_DONE;
  1302. delitem 26000,@ps_cost;
  1303. skill 1003,1,0;
  1304. set ps1003,1;
  1305. next;
  1306. goto LskillsEND;
  1307.  
  1308. case 7:
  1309. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1310. mes "Dann bist später.";
  1311. close;
  1312. }
  1313.  
  1314.  
  1315. PS_DONE:
  1316. if (#language == 0){
  1317. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1318. mes "Oh sorry, i see you have this Skill already acquired.";
  1319. close;
  1320. } else {
  1321. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1322. mes "Entschuldige, aber du hast diesen Skill doch schon.";
  1323. close;
  1324. }
  1325.  
  1326.  
  1327. LskillsEND:
  1328. if (#language == 0){
  1329. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1330. mes "Done, have a nice Day on exRO.";
  1331. close;
  1332. } else {
  1333. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1334. mes "Fertig, viel Spaß noch auf exRO.";
  1335. close;
  1336. }
  1337.  
  1338. Lnogetskills:
  1339. if (#language == 0){
  1340. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1341. mes "Okay, come back again if you want your Platinum Skills.";
  1342. close;
  1343. } else {
  1344. mes "[ ^000088Platinium Skill NPC^000000 ]";
  1345. mes "Okay, komm wieder wenn du dich umentscheidest";
  1346. close;
  1347. }
  1348.  
  1349. NO_TICKET:
  1350. mes "Tut mir leid...";
  1351. mes "Du hast nicht genug ^CC0000exCoins^000000 bei dir.";
  1352. close;
  1353.  
  1354. L_End:
  1355.     mes @n$;
  1356.     mes "Vielen Dank...";
  1357. close;
  1358.  
  1359. NEED_PREM:
  1360.     mes @n$;
  1361.     mes "Tut mir leid...";
  1362.     mes "Du hast bereits alle deine Free Resets aufgebraucht, werde nun Premium um meinen Service weiter zu nutzen.";
  1363.     next;
  1364.     menu "Beenden.",L_End,"Premium werden.",-;
  1365.     if (countitem(26000) < .@coin_cost){
  1366.     mes .@n$;
  1367.     mes "^B22222Du hast nicht genug exCoins bei dir!!^000000";
  1368.     close;
  1369.     }else{
  1370.     delitem 26000,.@coin_cost;
  1371.     mes .@n$;
  1372.     mes "Vielen Dank. Du kannst mich nun jederzeit ansprechen um den Service weiter zu nutzen.";
  1373.     set RESET_PREM,1;
  1374.     close;
  1375.     }
  1376.    
  1377. }
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!