Jump to content

mrlongshen

Members
  • Content Count

    1126
  • Joined

  • Last visited

  • Days Won

    3

Everything posted by mrlongshen

  1. can i add multiple map on set .map$, "prontera"; ? set .map$, "prontera,payon,geffen";
  2. [Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '157'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Novice Sets * w4=-,5125:100,2420:100,2521:100,2116:100,2355:100 //Angelic Guard[1] , Angelic Protection[1] , Angel's Reincarnation[1] , Angelic Cardigan[1] & Angel's Kiss[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '158'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Wizard Sets * w4=-,2860:150,15026:150,2468:150,2008:300 //Aqua Staff[2] , Aqua Shoes[1] , Aqua Orb[1] & Aqua Robe[Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '160'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Bakunawa Sets * w4=-,15051:500,2590:500,2169:500,2491:500 //Kalasag, Nightmare Bangungot Boots, Buwaya Skin Clothes & Bakunawa Scale Armor[Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '161'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Ranger Sets * w4=-,2480:400,2891:400,2581:400,15043:1000 //Black Wing Boots[1] , Black Wing Manteau, Black Wing Brooch & Black Wing Suit[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '162'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=High Wizard Sets * w4=-,15027:200,2009:1000,2861:200,2469:200 //Crimson Staff[2] , Crimson Shoes[1] , Crimson Orb[1] & Crimson Robe[Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '163'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Captain Sets * w4=-,2435:100,2538:100,2377:200 //Elite Engineer Armor[1] , Battle Greaves[1] & Captain's Manteau[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '164'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Rebellion Sets * w4=-,2437:100,2382:100,2540:100 //Elite Shooter Suit[1] , Battle Boots[1] & Sheriff's Manteau[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '165'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Warlock Sets * w4=-,2862:200,15028:200,2470:200,2010:1000 //Forest Staff[2] , Forest Shoes[1] , Forest Orb[1] & Forest Robe[Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '166'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Golden Sets * w4=-,2859:200,15025:200,2469:200,2007:1000 //Golden Lord Staff[2] , Golden Lord Shoes[1] , Golden Lord Orb[1] & Golden Lord Robe[Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '167'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Acolyte Sets * w4=-,2436:100,2539:100,2380:100 //Medic's Robe[1] , Combat Boots[1] & Commander's Manteau[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '168'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Assasin Sets * w4=-,2578:250,2886:250,2478:250,15039:250 //Nab's Shoes[1] , Nab's Hood, Nab's Seal & Nab's Cloth[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '169'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Rune Knight Sets * w4=-,2476:300,2575:300,15037:900,2884:300 //Pertz Greaves[1] , Pertz Manteau, Pertz Seal[1] & Pertz Plate[Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '170'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Priest Sets * w4=-,15029:100,2569:100,2471:100,1657:300 //Staff of Affection[2] , Affection Shoes, Affection Shawl & Affection Robe[Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '171'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=High Priest Sets * w4=-,16013:100,15030:100,2570:100,2472:100 //Judgement Shoes, Judgement Shawl, Judgement Robe & Mace of Judgement[2][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '172'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Sinx Sets * w4=-,2577:180,2886:180,2477:180,15038,300 //Sabath Shoes[1] , Sabath Hood, Sabath Seal & Sabath's Cloth[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '173'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=White Sets * w4=-,2479:170,2890:200,2580:130,15042:700 //White Wing Boots[1] , White Wing Manteau, White Wing Brooch & White Wing Suit[1][Error]: npc_parse_shop: Invalid item definition in file 'npc/ro/mall/costumeseller.txt', line '174'. Ignoring the rest of the line... * w1=- * w2=cashshop * w3=Vk Sets * w4=-,2537:100,2524:100,2421:100,5171:300 //Valkyrja's Armor[1] , Valkyrja's Shoes[1] , Valkyrja's Manteau[1] & Valkyrie Helm[1] im using a script from rathena.. the script works but why this error appear on map server ?
  3. erm. if i choose mine conflict what happen ?
  4. oit @seventh im using hercules lol. hahaa please give alternative link to download your afk plugin. the staff not approving yet !!
  5. @seventh, no permission to download.. i have update to latest version of rathena. i got this error. im using this plugin HPExport struct hplugin_info pinfo = { "afk", // Plugin name SERVER_TYPE_MAP,// Which server types this plugin works with? "1.0", // Plugin version HPM_VERSION, // HPM Version (don't change, macro is automatically updated)
  6. sir, can you add broadcast, An [TCG card] has been drop from the sky in map [Prontera]. Lets get it before it gone.. for the map name, i hope it can be multiple chose..
  7. Conflict discovered in 'npc/merchants/refine.txt'. Select: (p) postpone, (df) diff-full, (e) edit, (mc) mine-conflict, (tc) theirs-conflict, (s) show all options: mc can someone explain to me, what should i choose ? because i update to latest svn. please help me ...
  8. [Error]: script error in file 'npc/ro/event/marathon.txt' line 238 column 3 parse_line: expect command, missing function name or calling undeclared function 235: dispbottom "Magicians turn you into Peco."; 236: set @ep7_JMarapl,2; 237: set @ep7_JMaratour,1;* 238: disguise 1369; ~~~~~~~~~~~~~~~~^ 239: end; 240: } 241:[Error]: script error in file 'npc/ro/event/marathon.txt' line 333 column 3 parse_line: expect command, missing function name or calling undeclared function 330: set @ep7_JMarapl,6; 331: mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [5] Point of Passage.",0,0x00CCFF; 332: dispbottom "Magicians turn you in Seal.";* 333: disguise 1317; ~~~~~~~~~~~~~~~~^ 334: end;} 335: 336: if (@ep7_JMarapl == 6) {end;} I think same problem sir.. use atcommand "@disguise 1317"; - disguise "1317";+ atcommand "@disguise 1317"; now its works thx bro
  9. lol. i am pretty sure my server running default hercules sir
  10. [Error]: script error in file 'npc/ro/event/marathon.txt' line 238 column 3 parse_line: expect command, missing function name or calling undeclared function 235: dispbottom "Magicians turn you into Peco."; 236: set @ep7_JMarapl,2; 237: set @ep7_JMaratour,1;* 238: disguise 1369; ~~~~~~~~~~~~~~~~^ 239: end; 240: } 241:[Error]: script error in file 'npc/ro/event/marathon.txt' line 333 column 3 parse_line: expect command, missing function name or calling undeclared function 330: set @ep7_JMarapl,6; 331: mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [5] Point of Passage.",0,0x00CCFF; 332: dispbottom "Magicians turn you in Seal.";* 333: disguise 1317; ~~~~~~~~~~~~~~~~^ 334: end;} 335: 336: if (@ep7_JMarapl == 6) {end;} I think same problem sir..
  11. //===== eAthena Script =======================================//= Euhéméria Marathon//===== By: ==================================================//= AeriePinkPanther//===== Current Version: =====================================//= 1.0//===== Compatible With: =====================================//= eAthena SVN 14000+//===== Description: =========================================//= RaceWay with traps//============================================================event,97,98,5 script Marathon Event 989,{ warp "ars_dun31.gat" ,37,78;}ars_dun31,43,82,1 script Azheila#ep7 951,{set @name$,"Azheila";if($@ep7mara==0) { mes "[" + @name$ + "]"; mes "Well " + strcharinfo(0) + ","; mes "You can now participate in the Marathon of Euhéméria!"; close;}if($@ep7mara==1) { mes "[" + @name$ + "]"; mes "Well " + strcharinfo(0) + ","; mes "You can register at this time."; close;}if($@ep7mara>=2) { mes "[" + @name$ + "]"; mes "Well " + strcharinfo(0) + ","; mes "The marathon is over, you can watch the race talking to Xzian."; close;}OnBG: waitingroom "Marathon - WaitingRoom",3,"EP7_mara::OnBGJoin",1; end;}//========================================================================================================ars_dun31,79,78,0 script #arsdun31a 45,1,1,{ set @name$,"Inscripitons"; if ($@ep7mara == 0) goto sub1; if ($@ep7mara == 1) goto sub2; if ($@ep7mara >= 2) goto sub3; sub1: mes "[" + @name$ + "]"; mes "You can't register yet."; close; sub2: mes "[" + @name$ + "]"; mes "Would you sign?"; next; menu "Yes !",submenu1,"No",-; close; submenu1: if(checkcart() == 1 || (countitem(12016)>0) || (countitem(662)>0) || checkriding() == 1){ mes "[" + @name$ + "]"; mes "You must don't have a Cart, a Peco, the Authoritative Badges and Speed Potion with you."; close;} if ($@ep7_Maranb >= 10) {mes "[" + @name$ + "]";mes "Sorry, but there are already 10 registered!";close;} setarray $MaraJoueur$[$@ep7_Maranb],strcharinfo(0); set $@ep7_Maranb,$@ep7_Maranb+1; mes "[" + @name$ + "]"; mes "" + strcharinfo(0) + " here you are registered! !"; close2; mapannounce "ars_dun31",""+strcharinfo(0)+" has just registered!",1,0x66FF00; sc_end SC_ALL; set @ep7_JMarapl,1; warp "ars_dun31",73,114; end; sub3: mes "[" + @name$ + "]"; mes "The marathon is over, so you can't register."; close; }//_________________________________________________________________//___________________Marathon : Script ____________________________//_________________________________________________________________- script EP7_mara -1,{OnInit://=================================================//Configure//================================================= //Rewards, last one is for the record setarray $@MaraRec[0],675,675,675,675,675,675,675,675,675,675,675; setarray $@MaraNb[0],150,100,80,70,60,50,40,30,20,10,800; //================================================= //Temps stopnpctimer; setnpctimer 0; if ($MaraRecord == 0){ set $MaraRecord,50000;} //Fenêtre donpcevent "Azheila#ep7::OnBG"; //Ligne de Départ setcell "ars_dun31",81,130,73,130,cell_walkable,0; //non walkable : Ligne de Départ //Variables set $@ep7mara,0; //off 1= inscriptions en cours / 2= event en cours set $@ep7_Maranb,0; //Nb de joueurs à l'inscription à zéro set $@MaranEnd,0; //Nb d'arrivées à zéro //NPC disablenpc "#arsdun31a"; end; OnBGJoin: if( $@ep7mara == 1 || $@ep7mara == 2 ) {end;} if( $EP7Annonce == 0 ) {mapannounce "ars_dun31","The Marathon Euhéméria has just started, you have two minutes to register!",1,0xFF6600;} if( $EP7Annonce == 1 ) {announce "The Marathon Euhéméria has just started, you have two minutes to register!",0,0xFF6600;} //Inscriptions Ouvertes set $@ep7mara,1; //Noms des derniers participants deletearray $MaraJoueur$[0],9; //Suppr les 10 noms participants deletearray $MaranEnd$[0],9; //Suppr les 10 noms arrivées deletearray $MaranTime[0],9; //Suppr les 10 temps deletearray $MaranTimeS[0],9; //temps //Vers les inscriptions enablenpc "#arsdun31a"; sleep2 120000; //2 Minutes pour s'inscrire mapannounce "ars_dun31","Entries are closed, we will soon begin!",bc_map,"0xFF3333",FW_NORMAL,20,0,40; set $@ep7mara,2; //Inscriptions closes sleep2 15000; mapannounce "ars_dun31","5",bc_map,"0xFF3333",FW_NORMAL,20,0,40; sleep2 1000; mapannounce "ars_dun31","4",bc_map,"0xFF3333",FW_NORMAL,20,0,40; sleep2 1000; mapannounce "ars_dun31","3",bc_map,"0xFF3333",FW_NORMAL,20,0,40; sleep2 1000; mapannounce "ars_dun31","2",bc_map,"0xFF3333",FW_NORMAL,20,0,40; sleep2 1000; mapannounce "ars_dun31","1",bc_map,"0xFF3333",FW_NORMAL,20,0,40; sleep2 1000; mapannounce "ars_dun31","Let's go !",bc_map,"0xFF3333",FW_NORMAL,20,0,40; setcell "ars_dun31",81,130,73,130,cell_walkable,1; //walkable : Ligne de Départ initnpctimer; sleep2 10000; mapannounce "ars_dun31","You have 20 minutes to finish the race!",bc_map,"0xFF3333",FW_NORMAL,20,0,40; end;//=========================================OnTimer300000: mapannounce "ars_dun31","15 minutes left!",bc_map,"0xFF3333",FW_NORMAL,20,0,40; end;OnTimer600000: mapannounce "ars_dun31","10 minutes left!",bc_map,"0xFF3333",FW_NORMAL,20,0,40; end;OnTimer900000: mapannounce "ars_dun31","5 minutes left!",bc_map,"0xFF3333",FW_NORMAL,20,0,40; end;OnTimer1200000: mapannounce "ars_dun31","Let's go !",bc_map,"0xFF3333",FW_NORMAL,20,0,40; sleep2 5000; areawarp "ars_dun31",0,400,400,0,"ars_dun31",31,78; sleep2 5000; donpcevent "EP7_mara::OnInit"; end; //=========================================OnPCLoginEvent: getmapxy @map$,@x,@y,0; if ( @map$ == "ars_dun31" && @ep7_JMarapl == 0) {dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;} end;OnPCDieEvent: //Point de respawn//=========================================OnEnd: setarray $MaranTime[$@MaranEnd],getnpctimer(0);//Temps end; }//_________________________________________________________________//___________________Marathon : Arène _____________________________//_________________________________________________________________//Entréears_dun31,73,246,5 script #arsdun31b 45,2,2,{if (@ep7_JMarapl == 1) { mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [1] Point of Passage.",0,0x00CCFF; mapannounce "ars_dun31",""+strcharinfo(0)+" : You must perform 8 Stadium Tours.",0,0x9966CC|bc_self; dispbottom "Magicians turn you into Peco."; set @ep7_JMarapl,2; set @ep7_JMaratour,1; disguise 1369; end; }if (@ep7_JMarapl == 2) {end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//=========================================//Tourars_dun31,59,225,5 script #arsdun31c 45,1,1,{if (@ep7_JMaratour == 8) {dispbottom "You've already made your point eight turns.";end;}if (@ep7_JMarapl == 2) { set @ep7_JMaratour,@ep7_JMaratour+1; dispbottom ""+strcharinfo(0)+" : You will be in your ["+@ep7_JMaratour+"] Round !"; warp "ars_dun31",59,230; end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//=========================================//Sortiears_dun31,74,185,5 script #arsdun31d 45,1,1,{if (@ep7_JMaratour == 8 && @ep7_JMarapl == 2) { undisguise; set @ep7_JMarapl,3; mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [2] Point of Passage.",0,0x00CCFF; warp "ars_dun31",74,181; end;} dispbottom "You have not done your 8 laps.";end;}//_________________________________________________________________//___________________Marathon : Planches __________________________//_________________________________________________________________//Sortiears_dun31,149,189,5 script #arsdun31e 45,3,3,{if (@ep7_JMarapl == 3) { set @ep7_JMarapl,4; mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [3] Point of Passage.",0,0x00CCFF; end;}if (@ep7_JMarapl == 4) {end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//_________________________________________________________________//___________________Marathon : Montée ____________________________//_________________________________________________________________ars_dun31,194,245,5 script #arsdun31f 45,1,1,{if (@ep7_JMarapl == 4) { set @ep7_JMarapl,5; mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [4] Point of Passage.",0,0x00CCFF; end;}if (@ep7_JMarapl == 5) {end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//=================================================================ars_dun31,229,261,5 script #ep7piege1a -1,5,5,{OnTouch: set @rand, rand(100); if(@rand <= 80) {end;} dispbottom "Vous venez de chuter ! Il va falloir remonter !"; warp "ars_dun31",202,249; end;}ars_dun31,262,236,4 duplicate(#ep7piege1a) #ep7piege1b -1,5,5ars_dun31,282,259,4 duplicate(#ep7piege1a) #ep7piege1c -1,5,5ars_dun31,282,191,4 duplicate(#ep7piege1a) #ep7piege1d -1,5,5//_________________________________________________________________//___________________Marathon : Glace ____________________________//_________________________________________________________________ars_dun31,277,171,5 script #arsdun31g 45,1,1,{if (@ep7_JMarapl == 5) { set @ep7_JMarapl,6; mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [5] Point of Passage.",0,0x00CCFF; dispbottom "Magicians turn you in Seal."; disguise "1317"; end;}if (@ep7_JMarapl == 6) {end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//=================================================================//ars_dun31,262,135,5 script #ep7piege2a -1,9,9,{//OnTouch: // set @rand, rand(100);// if(@rand <= 75) {end;}// sc_start SC_MATKFood,120000,10;// dispbottom "Vous venez de tomber dans une crevasse !";// specialeffect 108;// end;//}//ars_dun31,239,115,4 duplicate(#ep7piege2a) #ep7piege2b -1,9,9//ars_dun31,223,105,4 duplicate(#ep7piege2a) #ep7piege2c -1,9,9//ars_dun31,253,88,4 duplicate(#ep7piege2a) #ep7piege2d -1,9,9//ars_dun31,272,42,4 duplicate(#ep7piege2a) #ep7piege2e -1,9,9//_________________________________________________________________//___________________Marathon : Descente __________________________//_________________________________________________________________ars_dun31,246,25,5 script #arsdun31h 45,1,1,{if (@ep7_JMarapl == 6) { set @ep7_JMarapl,7; //Global set @ep7_JMaraDS,1; //Portes pour la descente mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [6] Point of Passage.",0,0x00CCFF; end;}if (@ep7_JMarapl == 7) {end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//=================================================================ars_dun31,240,53,5 script #ep7piege3a -1,3,3,{OnTouch: if (@ep7_JMaraDS == 1) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [1] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,225,45,5 script #ep7piege3b -1,3,3,{OnTouch: if (@ep7_JMaraDS == 2) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [2] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,212,34,5 script #ep7piege3c -1,3,3,{OnTouch: if (@ep7_JMaraDS == 3) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [3] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,200,25,5 script #ep7piege3d -1,3,3,{OnTouch: if (@ep7_JMaraDS == 4) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [4] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,189,29,5 script #ep7piege3e -1,3,3,{OnTouch: if (@ep7_JMaraDS == 5) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [5] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,179,40,5 script #ep7piege3f -1,3,3,{OnTouch: if (@ep7_JMaraDS == 6) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [6] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,173,52,5 script #ep7piege3g -1,3,3,{OnTouch: if (@ep7_JMaraDS == 7) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [7] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,161,50,5 script #ep7piege3h -1,3,3,{OnTouch: if (@ep7_JMaraDS == 8) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [8] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,156,36,5 script #ep7piege3i -1,3,3,{OnTouch: if (@ep7_JMaraDS == 9) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [9] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,146,32,5 script #ep7piege3j -1,3,3,{OnTouch: if (@ep7_JMaraDS == 10) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [10] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,134,33,5 script #ep7piege3k -1,3,3,{OnTouch: if (@ep7_JMaraDS == 11) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [11] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,128,46,5 script #ep7piege3l -1,3,3,{OnTouch: if (@ep7_JMaraDS == 12) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [12] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,131,57,5 script #ep7piege3m -1,3,3,{OnTouch: if (@ep7_JMaraDS == 13) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [13] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,141,68,5 script #ep7piege3n -1,3,3,{OnTouch: if (@ep7_JMaraDS == 14) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [14] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//=================================================================ars_dun31,137,84,5 script #ep7piege3o -1,3,3,{OnTouch: if (@ep7_JMaraDS == 15) { set @ep7_JMaraDS,@ep7_JMaraDS+1;dispbottom "You just passed the [15] Gate.";end;} dispbottom "You must pass the gates in order!";end;}//_________________________________________________________________//___________________Marathon : Château ___________________________//_________________________________________________________________ars_dun31,170,104,5 script #arsdun31i 45,3,3,{if (@ep7_JMarapl == 7 && @ep7_JMaraDS == 16) { set @ep7_JMarapl,8; mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [7] Point of Passage.",0,0x00CCFF; undisguise; end;}if (@ep7_JMarapl == 8) {end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//=================================================================- script EP7_MaraBomb -1,{OnInit: monster "ars_dun31",170,124,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie1"; monster "ars_dun31",159,154,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie2"; monster "ars_dun31",186,177,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie3"; monster "ars_dun31",202,192,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie4"; monster "ars_dun31",180,142,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie5"; monster "ars_dun31",216,178,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie6"; set $@monster_ep7Mara1,3; set $@monster_ep7Mara2,3; set $@monster_ep7Mara3,3; set $@monster_ep7Mara4,3; set $@monster_ep7Mara5,3; set $@monster_ep7Mara6,3; end;OnDie1: set $@monster_ep7Mara1, $@monster_ep7Mara1-1; if($@monster_ep7Mara1==0) {sleep2 8000; set $@monster_ep7Mara1,3; monster "ars_dun31",170,124,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie1";}end;OnDie2: set $@monster_ep7Mara2, $@monster_ep7Mara2-1; if($@monster_ep7Mara2==0) {sleep2 8000; set $@monster_ep7Mara2,3; monster "ars_dun31",159,154,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie2";}end;OnDie3: set $@monster_ep7Mara3, $@monster_ep7Mara3-1; if($@monster_ep7Mara3==0) {sleep2 8000; set $@monster_ep7Mara3,3; monster "ars_dun31",186,177,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie3";}end;OnDie4: set $@monster_ep7Mara4, $@monster_ep7Mara4-1; if($@monster_ep7Mara4==0) {sleep2 8000; set $@monster_ep7Mara4,3; monster "ars_dun31",202,192,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie4";}end;OnDie5: set $@monster_ep7Mara5, $@monster_ep7Mara5-1; if($@monster_ep7Mara5==0) {sleep2 8000; set $@monster_ep7Mara5,3; monster "ars_dun31",180,142,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie5";}end;OnDie6: set $@monster_ep7Mara6, $@monster_ep7Mara6-1; if($@monster_ep7Mara6==0) {sleep2 8000; set $@monster_ep7Mara6,3; monster "ars_dun31",216,178,"Bomb Poring",3908,3,"EP7_MaraBomb::OnDie6";}end; }//_________________________________________________________________//___________________Marathon : Portes ____________________________//_________________________________________________________________ars_dun31,236,179,5 script #arsdun31j 45,1,1,{if (@ep7_JMarapl == 8) { set @ep7_JMarapl,9; mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [8] Point de Passage.",0,0x00CCFF; warp "ars_dun31",51,39; end;}if (@ep7_JMarapl == 9) {end;} dispbottom "You don't follow the rules.";warp "ars_dun31",31,78;end;}//=================================================================ars_dun31,67,46,5 script #ep7piege5a 45,1,1,{OnTouch: set @rand, rand(100); if(@rand <= 60) {specialeffect 108;sc_start SC_FREEZE,4000,0;end;} if(@rand <= 75) {specialeffect 109;sc_start SC_CONFUSION,5000,0;end;} warp "ars_dun31",90,40;end;}//=================================================================ars_dun31,67,41,5 script #ep7piege5b 45,1,1,{OnTouch: set @rand, rand(100); if(@rand <= 40) {specialeffect 108;sc_start SC_FREEZE,4000,0;end;} if(@rand <= 65) {specialeffect 109;sc_start SC_CONFUSION,5000,0;end;} warp "ars_dun31",90,40;end;}//=================================================================ars_dun31,67,36,5 script #ep7piege5c 45,1,1,{OnTouch: set @rand, rand(100); if(@rand <= 60) {specialeffect 108;sc_start SC_FREEZE,4000,0;end;} if(@rand <= 100) {specialeffect 109;sc_start SC_CONFUSION,5000,0;end;} }//=================================================================ars_dun31,67,32,5 script #ep7piege5d 45,1,1,{OnTouch: set @rand, rand(100); if(@rand <= 60) {specialeffect 108;sc_start SC_FREEZE,4000,0;end;} if(@rand <= 100) {specialeffect 109;sc_start SC_CONFUSION,5000,0;end;} }//_________________________________________________________________//___________________Marathon : Fin _______________________________//_________________________________________________________________ars_dun31,36,125,5 script #arsdun31k 45,1,1,{if (@ep7_JMarapl == 9) { if ($@ep7_MaranEnd >= 10) {mes "[" + @name$ + "]";mes "Sorry, but there have been [10] arrived !";close2;warp "ars_dun31",31,78;end;} setarray $MaranEnd$[$@MaranEnd],strcharinfo(0); //Nom donpcevent "EP7_mara::OnEnd"; getitem $@MaraRec[$@MaranEnd],$@MaraNb[$@MaranEnd]; set .@MaraplaceT,$@MaranEnd+1; mapannounce "ars_dun31",""+$MaranEnd$[$@MaranEnd]+" has just arrived at ["+ .@MaraplaceT +"] Place !",0,0x00CCFF; warp "ars_dun31",31,78; //Calcul du Temps set $MaranTimeS[$@MaranEnd], $MaranTime[$@MaranEnd]/1000; //Si Record if($MaranTime[$@MaranEnd] < $MaraRecord) { set $MaraRecNom$,$MaranEnd$[$@MaranEnd]; set $MaraRecord,$MaranTime[$@MaranEnd]; set $MaraRecordS,$MaranTimeS[$@MaranEnd]; getitem $@MaraRec[10],$@MaraNb[10]; sleep2 5000; mapannounce "ars_dun31",""+$MaranEnd$[$@MaranEnd]+" just beat the record time of Marathon with ["+$MaraRecordS+"] seconds !",0,0x00CCFF; } //Passage au suivant set $@MaranEnd,$@MaranEnd+1; end;} dispbottom "You are not following the rules.";warp "ars_dun31",31,78;end;}//set @ep7_JMarapl,1; = 0 rien / 1 = inscriptions / 2 = arène / 3 = planches//_________________________________________________________________//___________________Marathon : Panneaux __________________________//_________________________________________________________________ars_dun31,43,74,3 script Informations#ep7a 857,{set @name$,"Informations"; mes "[" + @name$ + "]"; mes "Hello sir, may I help you ?"; next; switch( select("Participants:Classement:Spectator:Record:Quitter") ){ case 1: mes "^FF0000~ Participants of the Marathon of Euhéméria ~^000000"; mes "- First Participant : ^4d4dff - " + $MaraJoueur$[0] + "^000000 -"; mes "- Second Participant : ^4d4dff - " + $MaraJoueur$[1] + "^000000 -"; mes "- Third Participant : ^4d4dff - " + $MaraJoueur$[2] + "^000000 -"; mes "- Fourth Participant : ^4d4dff - " + $MaraJoueur$[3] + "^000000 -"; mes "- Fifth Participant : ^4d4dff - " + $MaraJoueur$[4] + "^000000 -"; mes "- Sixth Participant : ^4d4dff - " + $MaraJoueur$[5] + "^000000 -"; mes "- Seventh Participant : ^4d4dff - " + $MaraJoueur$[6] + "^000000 -"; mes "- Eighth Participant : ^4d4dff - " + $MaraJoueur$[7] + "^000000 -"; mes "- Ninth Participant : ^4d4dff - " + $MaraJoueur$[8] + "^000000 -"; mes "- Tenth Participant : ^4d4dff - " + $MaraJoueur$[9] + "^000000 -"; close2; set @ep7_JMarapl,9; end; case 2: mes "^FF0000~ Winners of the Marathon of Euhéméria ~^000000"; mes "- 1 : ^4d4dff - " + $MaranEnd$[0] + "^000000 / ^4d4dffTime : "+$MaranTimeS[0]+" secondes^000000 -"; mes "- 2 : ^4d4dff - " + $MaranEnd$[1] + "^000000 / ^4d4dffTime : "+$MaranTimeS[1]+" secondes^000000 -"; mes "- 3 : ^4d4dff - " + $MaranEnd$[2] + "^000000 / ^4d4dffTime : "+$MaranTimeS[2]+" secondes^000000 -"; mes "- 4 : ^4d4dff - " + $MaranEnd$[3] + "^000000 / ^4d4dffTime : "+$MaranTimeS[3]+" secondes^000000 --"; mes "- 5 : ^4d4dff - " + $MaranEnd$[4] + "^000000 / ^4d4dffTime : "+$MaranTimeS[4]+" secondes^000000 --"; mes "- 6 : ^4d4dff - " + $MaranEnd$[5] + "^000000 / ^4d4dffTime : "+$MaranTimeS[5]+" secondes^000000 --"; mes "- 7 : ^4d4dff - " + $MaranEnd$[6] + "^000000 / ^4d4dffTime : "+$MaranTimeS[6]+" secondes^000000 --"; mes "- 8 : ^4d4dff - " + $MaranEnd$[7] + "^000000 / ^4d4dffTime : "+$MaranTimeS[7]+" secondes^000000 --"; mes "- 9 : ^4d4dff - " + $MaranEnd$[8] + "^000000 / ^4d4dffTime : "+$MaranTimeS[8]+" secondes^000000 --"; mes "- 10 : ^4d4dff - " + $MaranEnd$[9] + "^000000 / ^4d4dffTime : "+$MaranTimeS[9]+" secondes^000000 --"; close;//=========================================== case 3: mes "[" + @name$ + "]"; mes "Where do you want to go ?"; next; switch( select("Entrance:Start/Finish:Arena:Lake:Zeppelin-Ascent:Zeppelin-Ice:Castle:Doors:Cancel") ){ case 1:close2;warp "ars_dun31",32,79;end; case 2:close2;warp "ars_dun31",50,121;end; case 3:close2;warp "ars_dun31",69,217;end; case 4:close2;warp "ars_dun31",169,228;end; case 5:close2;warp "ars_dun31",261,199;end; case 6:close2;warp "ars_dun31",200,79;end; case 7:close2;warp "ars_dun31",172,152;end; case 8:close2;warp "ars_dun31",74,40;end; case 9:close;}//=========================================== case 4: mes "[" + @name$ + "]"; mes "The record is currently held by "+$MaraRecNom$+"."; mes "With a time: "+$MaraRecordS+" seconds."; close;//=========================================== case 5: close;}}ars_dun31,51,123,4 duplicate(Informations#ep7a) Informations#ep7b 857ars_dun31,173,234,4 duplicate(Informations#ep7a) Informations#ep7c 857ars_dun31,267,203,4 duplicate(Informations#ep7a) Informations#ep7d 857ars_dun31,194,80,4 duplicate(Informations#ep7a) Informations#ep7e 857ars_dun31,202,150,4 duplicate(Informations#ep7a) Informations#ep7f 857ars_dun31,72,47,4 duplicate(Informations#ep7a) Informations#ep7g 857ars_dun31,68,224,4 duplicate(Informations#ep7a) Informations#ep7h 857 i got the error on this script. can someone fix it for me ? this is the log.... [Error]: script error in file 'npc/ro/event/marathon.txt' line 237 column 3 parse_line: expect command, missing function name or calling undeclared function 234: dispbottom "Magicians turn you into Peco."; 235: set @ep7_JMarapl,2; 236: set @ep7_JMaratour,1;* 237: disguise 1369; ~~~~~~~~~~~~~~~~^ 238: end;} 239: 240: if (@ep7_JMarapl == 2) {end;}[Error]: script error in file 'npc/ro/event/marathon.txt' line 331 column 3 parse_line: expect command, missing function name or calling undeclared function 328: set @ep7_JMarapl,6; 329: mapannounce "ars_dun31",""+strcharinfo(0)+" has just arrived at [5] Point of Passage.",0,0x00CCFF; 330: dispbottom "Magicians turn you in Seal.";* 331: disguise "1317"; ~~~~~~~~~~~~~~~~^ 332: end;} 333: 334: if (@ep7_JMarapl == 6) {end;}
  12. prontera,164,171,4 script Gold Room 10005,{ mes "Do you want to enter Gold Room ?"; mes "This gold room is sponsor by Maybank2u"; menu "Ok",-,"No thanks.",L_No; warp "sakura.gat",0,0; close;OnInit: waitingroom "[ Gold Room ]",0;end;L_No:close;}- script GoldRoom -1,{OnInit: monster "sakura",0,0,"Gold Resident 1",3113,30,"GoldRoom::OnMobKilled"; monster "sakura",0,0,"Gold Resident 2",3142,30,"GoldRoom::OnMobKilled"; monster "sakura",0,0,"Gold Resident 3",3119,30,"GoldRoom::OnMobKilled"; monster "sakura",0,0,"Gold Resident 4",3133,30,"GoldRoom::OnMobKilled"; monster "sakura",0,0,"Gold Resident 5",3122,30,"GoldRoom::OnMobKilled"; end;OnMobKilled: set $@ran, rand(1,3); if ($@ran == 1) getitem 969,1; if ($@ran == 2) getitem 969,2; if ($@ran == 3) getitem 969,5; } can someone take look on this script, why its not automatic respawn the mobs after kill the mobs ?
  13. @seventh i see the problem is happen, on increase agility ! rathena use specialeffect2 EF_INCAGILITY; sc_start SC_INCREASEAGI,240000,10; then i change to specialeffect2 EF_INCAGILITY; sc_start SC_INC_AGI,240000,10; now its works like charm bro ! hahahahah awesome ! wakakkakaa
  14. @seventh. thanks alot.. which one on the constant.txt is get more exp on base and job ? i have load this script. when leveling up nothing happen.
  15. why i cant use the latest one ? THe link you provide me is no buffer sir. huhu
  16. Hard to find the key words haha ^ no problem. bro. still same. cannot use buffer
  17. @sevenz i have try google but dont see the result. btw thx alot
  18. thx alot bro. topic solve.
  19. on click on the NPC sir. its seem like directly click... please help why this script is not working on hercules ?
  20. I try to use this script. but when I click on its, my char stuck, because its seem like the black one. cannot moving.. can someone help me ? //===== rAthena Script =======================================//= All-in-One NPC//===== By: ==================================================//= Euphy//===== Current Version: =====================================//= 1.7//===== Description: =========================================//= A compilation of commonly-used NPC scripts.//== Includes job changer, stylist, refiner, card remover,//== coin exchanger, rentals, resetter, platinum skills,//== sex changer, identifier, healer, buffer, and repairman.//============================================================prontera,159,188,4 script All-in-One NPC 953,{function Get_Platinum; function Equip_Menu; function Cm; if (getarraysize(.OnClick)) { if (.OnClick[0]) { specialeffect2 EF_HEAL2; percentheal 100,100; } if (.OnClick[1]) { specialeffect2 EF_BLESSING; sc_start SC_BLESSING,600000,10; specialeffect2 EF_INCAGILITY; sc_start SC_INCREASEAGI,600000,10; } if (.OnClick[2]) repairall; } mes .n$; set .@time, gettime(3); mes "Good "+((.@time < 5 || .@time > 17)?"evening":((.@time < 12)?"morning":"afternoon"))+", "+strcharinfo(0)+"!"; mes "What can I do for you?"; emotion e_ho; next; disable_items; switch(select(.menu$)) { case 1: function Job_Menu; function A_An; mes .n$; if (Class > 4049) { mes "No more jobs are available."; close; } if (checkfalcon() || checkcart() || checkriding() || ismounting()) { mes "Please remove your "+((checkfalcon())?"falcon":"")+((checkcart())?"cart":"")+((checkriding())?"Peco":"")+((ismounting())?"mount":"")+" before proceeding."; close; } if (.SkillPointCheck && SkillPoint) { mes "Please use all your skill points before proceeding."; close; } set .@eac, eaclass(); set .@i, ((.ThirdClass)?roclass(.@eac&EAJ_UPPERMASK):Class); if (.@i > 6 && .@i < 22) { if (BaseLevel < .Rebirth[0] || JobLevel < .Rebirth[1]) { set .@blvl, .Rebirth[0]-BaseLevel; set .@jlvl, .Rebirth[1]-JobLevel; mes "You need "+((.@blvl>0)?.@blvl+" more base levels "+((.@jlvl>0)?"/ ":""):"")+((.@jlvl>0)?.@jlvl+" more job levels ":"")+"to continue."; close; } if (Class > 21) { mes "Switch to third class?"; next; Job_Menu(roclass(.@eac|EAJL_THIRD)); close; } while(1) { mes "Select an option."; next; set .@i, select(" ~ ^0055FFRebirth^000000:"+((.ThirdClass)?" ~ ^FF0000Third Class^000000":"")+": ~ ^777777Cancel^000000"); if (.@i==3) close; mes .n$; mes "Are you sure?"; next; Job_Menu(((.@i==1)?4001:roclass(.@eac|EAJL_THIRD))); mes .n$; } } set .@j1, roclass(.@eac|EAJL_2_1); set .@j2,roclass(.@eac|EAJL_2_2); if ((.@eac&EAJ_UPPERMASK) == EAJ_SUPER_NOVICE) setarray .@exp[0],roclass(.@eac|EAJL_THIRD),99; if (Class == Job_Ninja) setarray .@exp[0],.@j1,70; if (.@exp[0] && .ThirdClass) { if (BaseLevel < .Rebirth[0] || JobLevel < .@exp[1]) { set .@blvl, .Rebirth[0]-BaseLevel; set .@jlvl, .@exp[1]-JobLevel; mes "You need "+((.@blvl>0)?.@blvl+" more base levels "+((.@jlvl>0)?"/ ":""):"")+((.@jlvl>0)?.@jlvl+" more job levels ":"")+"to continue."; close; } mes "Switch to "+jobname(.@exp[0])+"?"; next; Job_Menu(.@exp[0]); close; } if (.@eac&EAJL_2) if (.@eac&(EAJL_UPPER|EAJL_BABY) || roclass(.@eac|EAJL_UPPER) == -1) { mes "No more jobs are available."; close; } if ((.@eac&EAJ_BASEMASK) == EAJ_NOVICE) { if (JobLevel < .JobReq[0]) mes "A job level of "+.JobReq[0]+" is required to change into the 1st Class."; else if (Class == 4001 && .LastJob && lastJob) { mes "Switch classes now?"; next; Job_Menu(roclass((eaclass(lastJob)&EAJ_BASEMASK)|EAJL_UPPER)); } else switch(Class) { case 0: Job_Menu(1,2,3,4,5,6,23,4046,24,25,4023); case 4001: Job_Menu(4002,4003,4004,4005,4006,4007); case 4023: Job_Menu(4024,4025,4026,4027,4028,4029,4045); default: mes "An error has occurred."; break; } close; } if (roclass(.@eac|EAJL_2_1) == -1 || roclass(.@eac|EAJL_2_2) == -1) mes "No more jobs are available."; else if (!(.@eac&EAJL_2) && JobLevel < .JobReq[1]) mes "A job level of "+.JobReq[1]+" is required to change into the 2nd Class."; else if (.LastJob && lastJob && (.@eac&EAJL_UPPER)) { mes "Switch classes now?"; next; Job_Menu(lastJob+4001); } else Job_Menu(.@j1,.@j2); close; function Job_Menu { while(1) { if (getargcount() > 1) { mes "Select a job."; set .@menu$,""; for(set .@i,0; .@i<getargcount(); set .@i,.@i+1) set .@menu$, .@menu$+" ~ "+jobname(getarg(.@i))+":"; set .@menu$, .@menu$+" ~ ^777777Cancel^000000"; next; set .@i, getarg(select(.@menu$)-1,0); if (!.@i) close; if ((.@i == 23 || .@i == 4045) && BaseLevel < .SNovice) { mes .n$; mes "A base level of "+.SNovice+" is required to turn into a "+jobname(.@i)+"."; close; } mes .n$; mes "Are you sure?"; next; } else set .@i, getarg(0); if (select(" ~ Change into ^0055FF"+jobname(.@i)+"^000000 class: ~ ^777777"+((getargcount() > 1)?"Go back":"Cancel")+"^000000") == 1) { mes .n$; mes "You are now "+A_An(jobname(.@i))+"!"; if (.@i==4001 && .LastJob) set lastJob, Class; jobchange .@i; if (.@i==4001 || .@i==4023) resetlvl(1); specialeffect2 EF_ANGEL2; specialeffect2 EF_ELECTRIC; if (.Platinum) Get_Platinum; close; } if (getargcount() == 1) return; mes .n$; } end; } function Get_Platinum { skill 142,1,0; switch(BaseClass) { case 0: if (Class !=23) skill 143,1,0; break; case 1: skill 144,1,0; skill 145,1,0; skill 146,1,0; break; case 2: skill 157,1,0; break; case 3: skill 147,1,0; skill 148,1,0; break; case 4: skill 156,1,0; break; case 5: skill 153,1,0; skill 154,1,0; skill 155,1,0; break; case 6: skill 149,1,0; skill 150,1,0; skill 151,1,0; skill 152,1,0; break; default: break; } switch(BaseJob) { case 7: skill 1001,1,0; break; case 8: skill 1014,1,0; break; case 9: skill 1006,1,0; break; case 10: skill 1012,1,0; skill 1013,1,0; break; case 11: skill 1009,1,0; break; case 12: skill 1003,1,0; skill 1004,1,0; break; case 14: skill 1002,1,0; break; case 15: skill 1015,1,0; skill 1016,1,0; break; case 16: skill 1007,1,0; skill 1008,1,0; skill 1017,1,0; skill 1018,1,0; skill 1019,1,0; break; case 17: skill 1005,1,0; break; case 18: skill 238,1,0; break; case 19: skill 1010,1,0; break; case 20: skill 1011,1,0; break; default: break; } return; } function A_An { setarray .@A$[0],"a","e","i","o","u"; set .@B$, "_"+getarg(0); for(set .@i,0; .@i<5; set .@i,.@i+1) if (compare(.@B$,"_"+.@A$[.@i])) return "an "+getarg(0); return "a "+getarg(0); } case 2: mes .n$; mes "Select an option."; next; setarray .@Look[1],7,1,6; set .@s, select(" ~ Cloth color: ~ Hairstyle: ~ Hair color"); set .@Revert, getlook(.@Look[.@s]); set .@Style,1; mes .n$; mes "How does this look?"; while(1) { setlook .@Look[.@s], .@Style; message strcharinfo(0),"This is style #"+.@Style+"."; set .@menu$, " ~ Next (^0055FF"+((.@Style!=.Styles[.@s])?.@Style+1:1)+"^000000): ~ Previous (^0055FF"+((.@Style!=1)?.@Style-1:.Styles[.@s])+"^000000): ~ Jump to...: ~ Revert to original (^0055FF"+.@Revert+"^000000)"; switch(select(.@menu$)) { case 1: set .@Style, ((.@Style!=.Styles[.@s])?.@Style+1:1); break; case 2: set .@Style, ((.@Style!=1)?.@Style-1:.Styles[.@s]); break; case 3: next; mes .n$; mes "Choose a style between 1 - "+.Styles[.@s]+"."; input .@Style,0,.Styles[.@s]; if (!.@Style) set .@Style, rand(1,.Styles[.@s]); next; mes .n$; mes "How does this look?"; break; case 4: set .@Style, .@Revert; setlook .@Look[.@s], .@Revert; break; } } close; case 3: function Refine_Item; if (.EnrichedRefine) { mes .n$; mes "Select an option."; next; if (select(" ~ Normal Refiner: ~ Enriched Refiner") == 2) { mes .n$; mes "What do you want to refine?"; next; Equip_Menu(1); setarray .@Materials[0],7619,7620,7620,7620,7620; setarray .@Safe[0],4,7,6,5,4; set .@WLv, getequipweaponlv(@i); mes .n$; mes "Item: +"+getequiprefinerycnt(@i)+" "+getequipname(@i); next; if(select(" ~ Refine item (2 * ^0055FF"+getequippercentrefinery(@i)+"^000000% success): ~ ^777777Cancel^000000") == 2) close; Refine_Item(1, .@Materials[.@WLv], .RP[.@WLv], .@Safe[.@WLv], 1); close; } } mes .n$; mes "What do you want to refine?"; next; Equip_Menu(1); setarray .@Materials[0],985,1010,1011,984,984; setarray .@Safe[0],4,7,6,5,4; set .@WLv, getequipweaponlv(@i); set .@SafeCount, .@Safe[.@WLv]-getequiprefinerycnt(@i); mes .n$; mes "Item: +"+getequiprefinerycnt(@i)+" "+getequipname(@i); next; switch(select(" ~ Refine once (^0055FF"+getequippercentrefinery(@i)+"^000000% success): ~ Refine multiple times (up to "+(10-getequiprefinerycnt(@i))+"): ~ Refine to safe limit ("+((.@SafeCount>0)?.@SafeCount+" refines":"^777777disabled^000000")+"): ~ ^777777Cancel^000000")) { case 1: Refine_Item(1, .@Materials[.@WLv], .RP[.@WLv], .@Safe[.@WLv]); close; case 2: input .@Refines; if (.@Refines+getequiprefinerycnt(@i) > 10 || .@Refines < 1) { mes .n$; mes "Invalid number ("+.@Refines+")."; } else Refine_Item(.@Refines, .@Materials[.@WLv], .RP[.@WLv], .@Safe[.@WLv]); close; case 3: if (.@SafeCount < 1) { mes .n$; mes "The item has already reached the safe limit."; } else Refine_Item(.@SafeCount, .@Materials[.@WLv], .RP[.@WLv], .@Safe[.@WLv]); close; case 4: close; } function Equip_Menu { setarray .@pos$[1],"Upper Headgear","Armor","Left hand","Right hand","Garment","Footgear","Left Accessory","Right Accessory","Mid Headgear","Lower Headgear"; set .@menu$,""; for (set .@i,1; .@i <= 10; set .@i,.@i+1) { if (getequipisequiped(.@i)) set .@menu$, .@menu$+.@pos$[.@i]+" [^0055FF"+getequipname(.@i)+"^000000]"; set .@menu$, .@menu$+":"; } set @i, select(.@menu$); if (!getequipisequiped(@i)) { mes .n$; mes "Nothing is equipped there!"; close; } if (getarg(0)) { if (!getequipisenableref(@i)) { mes .n$; mes getequipname(@i)+" cannot be refined."; close; } if (getequiprefinerycnt(@i) >= 10 ) { mes .n$; mes "+"+getequiprefinerycnt(@i)+" "+getequipname(@i)+" cannot be refined any further."; close; } } return; } function Refine_Item { mes .n$; set .@price, getarg(0)*getarg(2); mes "I'll need "+getarg(0)+"x "+getitemname(getarg(1))+" and "+Cm(.@price)+" Zeny."; if (countitem(getarg(1)) < getarg(0) || Zeny < .@price) { mes "Come back when you have the required materials."; close; } if (getequiprefinerycnt(@i)+getarg(0) > getarg(3)) mes "The item will be refined above the safe limit. It may break."; next; if(select(" ~ ^0055FFContinue^000000: ~ ^777777Cancel^000000") == 2) close; mes .n$; set .@j, getarg(0); while(.@j) { delitem getarg(1),1; set Zeny, Zeny-getarg(2); if (getarg(4,0)) { if (getequippercentrefinery(@i) <= rand(100) && getequippercentrefinery(@i) <= rand(100)) { mes getequipname(@i)+" broke while refining."; failedrefitem @i; close; } } else { if (getequippercentrefinery(@i) <= rand(100)) { mes getequipname(@i)+" broke while refining."; failedrefitem @i; close; } } successrefitem @i; set .@j, .@j-1; } mes "All done!"; close; } function Cm { set .@str$, getarg(0); for(set .@i,getstrlen(.@str$)-3; .@i>0; set .@i,.@i-3) set .@str$, insertchar(.@str$,",",.@i); return .@str$; } case 4: mes .n$; if (.Prices[0]) mes "It costs "+Cm(.Prices[0])+" Zeny to remove cards."; mes "Please select an equipment."; next; Equip_Menu(0); mes .n$; if (Zeny < .Prices[0]) { mes "You don't have enough Zeny."; close; } set .@j,getequipcardcnt(@i); if (!.@j) { mes "There are no cards compounded to "+getequipname(@i)+"."; close; } if (!checkweight(4001,(.@j+1))) { mes "You're carrying too many items!"; close; } mes "Item: "+getequipname(@i); for(set .@i,0; .@i<.@j; set .@i,.@i+1) mes "Card "+(.@i+1)+": "+getitemname(getequipcardid(@i,.@i)); next; if (select(" ~ Remove "+.@j+" card(s): ~ ^777777Cancel^000000") == 2) close; set Zeny, Zeny-.Prices[0]; successremovecards @i; mes .n$; mes "Cards successfully removed!"; close; case 5: mes .n$; mes "Coins are worth "+Cm(.Coin[1])+" Zeny each."; next; switch(select(" ~ Zeny to coins: ~ Coins to Zeny: ~ Close")) { case 1: mes .n$; mes "How many coins do you want?"; next; input .@coins,0,(1000000000/.Coin[1]); mes .n$; if (.@coins*.Coin[1] > Zeny) { mes "You don't have enough Zeny."; close; } if (!checkweight(.Coin[0],.@coins)) { mes "You don't have enough inventory space."; close; } set Zeny, Zeny-(.Coin[1]*.@coins); getitem .Coin[0], .@coins; mes "Purchased "+Cm(.@coins)+" coins."; close; case 2: mes .n$; mes "How many coins do you want to trade in?"; next; input .@coins,0,(1000000000/.Coin[1]); mes .n$; if (countitem(.Coin[0]) < .@coins) { mes "You don't have that many coins!"; close; } if ((Zeny+(.Coin[1]*.@coins)) > 1000000000) { mes "You have too much Zeny!"; close; } delitem .Coin[0], .@coins; set Zeny, Zeny+(.Coin[1]*.@coins); mes "Exchanged "+Cm(.@coins)+" coins."; close; case 3: close; } case 6: if (Zeny < .Prices[2]) { mes .n$; mes "It costs "+Cm(.Prices[2])+" Zeny to rent."; close; } if (ismounting()) { mes .n$; mes "You must first remove your mount."; close; } else if ((eaclass()&EAJ_THIRDMASK==EAJ_RANGER) && !countitem(6124)) { if (!checkfalcon() && getskilllv("HT_FALCON") && !checkoption(Option_Wug) && !checkoption(Option_Wugrider)) { mes .n$; mes "Please select an option."; next; if(select(" ~ Falcon: ~ Warg") == 1) setfalcon; else getitem 6124,1; } else getitem 6124,1; } else if ((eaclass()&EAJ_THIRDMASK==EAJ_MECHANIC) && !checkcart() && getskilllv("MC_PUSHCART")) { if (!checkmadogear() && getskilllv("NC_MADOLICENCE")) { mes .n$; mes "Please select an option."; next; if(select(" ~ Cart: ~ Mado")==1) setcart; else setmadogear; } else setcart; } else if (!checkcart() && getskilllv("MC_PUSHCART")) setcart; else if (!checkfalcon() && getskilllv("HT_FALCON") && !checkoption(Option_Wug) && !checkoption(Option_Wugrider)) setfalcon; else if (!checkriding() && getskilllv("KN_RIDING")) { if (eaclass()&EAJ_THIRDMASK == EAJ_RUNE_KNIGHT) setdragon; else setriding; } else if (!checkmadogear() && getskilllv("NC_MADOLICENCE")) setmadogear; else { mes .n$; mes "You do not meet requirements to rent."; close; } set Zeny, Zeny-.Prices[2]; specialeffect2 EF_TEIHIT3; mes .n$; mes "Here you go."; emotion e_no1; close; case 7: mes .n$; if (.Prices[1]) mes "It costs "+Cm(.Prices[1])+" Zeny to reset stats or skills."; mes "Please select an option."; next; set .@i, select(" ~ Stat reset: ~ Skill reset: ~ Cancel"); if (.@i == 3) close; mes .n$; if (Zeny < .Prices[1]) { mes "You don't have enough Zeny."; close; } set Zeny, Zeny-.Prices[1]; if (.@i == 1) { resetstatus; mes "Stats reset!"; } else { resetskill; mes "Skills reset!"; } close; case 8: Get_Platinum; specialeffect2 EF_BLUECASTING; mes .n$; mes "Platinum skills received!"; close; case 9: set .@Var$, ".SexChange"+((Sex)?"F":"M"); if (getarraysize(getd(.@Var$))) { mes .n$; mes "To turn into a "+((Sex)?"female":"male")+" you need the following items:"; for(set .@i,0; .@i<getarraysize(getd(.@Var$)); set .@i,.@i+2) { mes " ~ "+getd(.@Var$+"["+(.@i+1)+"]")+"x "+getitemname(getd(.@Var$+"["+.@i+"]")); if (countitem(getd(.@Var$+"["+.@i+"]")) < getd(.@Var$+"["+(.@i+1)+"]")) set .@nreq,1; } if (.@nreq) close; next; } mes .n$; mes "Do you really want to change sex?"; next; if(select(" ~ Change into a "+((Sex)?"female":"male")+": ~ Cancel") == 1) { if (getarraysize(getd(.@Var$))) { for(set .@i,0; .@i<getarraysize(getd(.@Var$)); set .@i,.@i+2) delitem getd(.@Var$+"["+.@i+"]"), getd(.@Var$+"["+(.@i+1)+"]"); } changesex; } close; case 10: setarray .@Total[0],0,0; getinventorylist; mes .n$; for(set .@i,0; .@i<@inventorylist_count; set .@i,.@i+1) { if (@inventorylist_identify[.@i]) continue; if (Zeny < .Prices[3]) { if (!.@Total[0]) { mes "It costs "+Cm(.Prices[3])+" Zeny to identify an item."; close; } break; } set Zeny, Zeny-.Prices[3]; delitem2 @inventorylist_id[.@i],1,0,0,0,0,0,0,0; getitem @inventorylist_id[.@i],1; setarray .@Total[0], .@Total[0]+1, .@Total[1]+.Prices[3]; } if (!.@Total[0]) { mes "No items identified."; close; } specialeffect2 EF_REFINEOK; mes "Identified "+.@Total[0]+" items"+((.@Total[1])?" for "+Cm(.@Total[1])+" Zeny":"")+"."; close; }OnInit:// --------------------- Config --------------------- setarray .MainMenu$[0], // Set menu options! "Change Jobs", // [1] "Stylist", // [2] "Refiner", // [4] "Remove Cards", // [8] "Exchange Coins", // [16] "Rentals", // [32] "Reset Stats/Skills", // [64] "Platinum Skills", // [128] "Change Sex", // [256] "Identify All"; // [512] set .@MenuOption,1|2|4|8|16|32|64|128|256|512; setarray .OnClick[0],1,1,1; // When clicked: heal [0], buff [1], repair [2] (1: yes / 0: no) setarray .Styles[1], // Maximum dye, hair style, and hair color getbattleflag("max_cloth_color"),getbattleflag("max_hair_style"),getbattleflag("max_hair_color"); setarray .Coin[0],674,1000000; // Coin item ID, coin price setarray .Prices[0],50000,10000,0,100; // Zeny to remove cards [0], reset [1], rent [2], identify [3] setarray .Rebirth[0],99,50; // Minimum base level, job level to rebirth OR change to third class setarray .JobReq[0],10,40; // Minimum job level to turn into 1st class, 2nd class set .ThirdClass,1; // Enable third classes? (1: yes / 0: no) set .SNovice,45; // Minimum base level to turn into Super Novice set .LastJob,1; // Enforce linear class changes? (1: yes / 0: no) set .SkillPointCheck,0; // Force player to use up all skill points? (1: yes / 0: no) set .Platinum,1; // Get platinum skills automatically? (1: yes / 0: no) set .EnrichedRefine,1; // Allow enriched refiner option? (1: yes / 0: no) setarray .RP[0],2000,50,200,5000,20000; // Zeny for armor, lv1, lv2, lv3, lv4 refines setarray .SexChangeF[0],2213,1,1558,1,7152,50; // Items to turn into Female (ID,Count) setarray .SexChangeM[0],5016,1,2241,1,1017,50; // Items to turn into Male (ID,Count) set .n$, "[All-in-One NPC]"; // NPC Name// -------------------------------------------------- set .menu$,""; for (set .@i,0; .@i < getarraysize(.MainMenu$); set .@i,.@i+1) { if (.@MenuOption & (1<<.@i)) set .menu$, .menu$+" ~ "+.MainMenu$[.@i]; set .menu$, .menu$+":"; } end;}
  21. @quesoph Yes bro like that. btw. can you add when gm lvl more than 90, he can delete the message. since maybe some user will write a bad words ? is this script, its unlimited right sir ? means there are no delay or ??
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.