-
Posts
794 -
Joined
-
Last visited
-
Days Won
3
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Everything posted by AinsLord
-
Next NPC doesnt show after completion of BTS 1st NPC QUest
AinsLord posted a question in Scripting Support
here is the code (c) to owner of this code //=============Valkyrie Quest============== //===================== BTS ===================================================== prontera.gat,154,198,6 script Jemz The Great 580,{ if(bry_bry >= 1) goto L_taposme; if(hen_hen >= 1) goto L_taposna; if(hen_hen < 1) mes "[ Jemz ]"; mes "I will foretell you about Breaking the Seal Quest"; mes "I am the guardian of the seal, break it and recieve my treasure."; next; mes "[ Jemz ]"; mes "These are what I need"; mes "100 Pieces of Ancient Lips"; mes "25 Pieces of Peridot"; mes "25 Pieces of Biotite"; next; mes "20 Pieces of Young Twig"; mes "20 Pieces of Mother's Nightmare"; mes "15 Pieces of Matchstick"; mes "200 Pieces of Hand of God"; mes "100 Pieces of Cursed Seal"; next; mes "So, are you up to my quest dear child?"; menu "Yes!.",-, "No, I'm sorry.",L_later; mes "[ Jemz ]"; mes "Are the items ready? Let me check."; next; if(countitem(1054) < 100 || countitem(7289) < 25 || countitem(7297) < 25 || countitem(7018) < 20 ||countitem(7020) < 20 ||countitem(7035) < 15 || countitem(1009) < 200 || countitem(7442) < 100) goto L_later2; delitem 1054,100; delitem 7289,25; delitem 7297,25; delitem 7018,20; delitem 7020,20; delitem 7035,15; delitem 1009,200; delitem 7442,100; mes "[ Jemz ]"; mes "Another brave one succeded."; set ron_ron,1; next; switch (select("Your Welcome")) { case 1: // Castle Drops set .@gamble1,rand(1,500); if ((.@gamble1 > 200) && (.@gamble1 < 205)) { set .@gamble2,rand(1,10); if ((.@gamble2 > 0) && (.@gamble2 < 3)) set .@item,7086; // esg else if ((.@gamble2 > 2) && (.@gamble2 < 5)) set .@item,7090; // ripple else if ((.@gamble2 > 4) && (.@gamble2 < 7)) set .@item,7091; // billow else if ((.@gamble2 > 6) && (.@gamble2 < 9)) set .@item,7077; // silver else if ((.@gamble2 > 8) && (.@gamble2 < 11)) set .@item,7078; // wov } else if ((.@gamble1 > 0) && (.@gamble1 < 201)) set .@item,7086; // esg else if ((.@gamble1 > 204) && (.@gamble1 < 301)) set .@item,7090; // ripple else if ((.@gamble1 > 300) && (.@gamble1 < 401)) set .@item,7091; // billow else if ((.@gamble1 > 401) && (.@gamble1 < 481)) set .@item,7077; // silver else if ((.@gamble1 > 480) && (.@gamble1 < 501)) set .@item,7078; // wov break; } getitem .@item,1; mes "[ Jemz ]"; mes "Ah, you have out done your self!"; mes "Thank you for your aid."; mes "Now start your journey to find my Nephews who hold the Valkyries"; announce "Wow! The Seal has been annihilated by "+strcharinfo(0)+" He has just broken the seal and will start the quest of Valkyrie!","0x33FF66"; close2; end; L_taposna: mes "[ Jemz ]"; mes "Go out and search the Fields of Payon the Fields of Geffen and the Towns of Lighthalzen and Comodo for the Valkyrie Equipments"; close; L_taposme: mes "[ Jemz ]"; mes "You've already surpassed this quest and there is no point in doing it again."; close; L_later: mes "[ Jemz ]"; mes "Well too bad"; mes "Child, I don't like to call you a coward, but you are."; close; L_later2: mes "[ Jemz ]"; mes "*piff*"; mes "You lack some items."; mes "I do not accept cowardice, come back to me when you're brave enough."; close; } pay_fild10.gat,182,157,5 script Kimuel 900,{ if(bry_bry >= 1) goto L_udone; if(kim_kim >= 1) goto L_tapospopo; if(ron_ron >= 1) goto continueq; if(ron_ron < 1) { mes "[ Kimuel ]"; mes "Are you the delivery boy of Pizza Hut?"; mes "If not go away I don't need you!"; close; } continueq: mes "[ Kimuel ]"; mes "Oh Grasya Santisimo!!"; mes "You have spoken to Uncle Ronnel!?"; next; mes "[ Kimuel ]"; mes "By the way I am Kimuel of Payon the Crafter of the Valkyrie Armor"; mes "Would you like to possess it?"; menu "Yes, I deserve it!",-,"No, I'm not good enough.",L_ayaw; next; mes "[ Kimuel ]"; mes "This Great Armor is very complicated, it needs very rare materials to craft it. If you really want to possess it gather these items for me"; next; mes "100 Three-Headed Dragon's head"; mes "7 Emblem of Sun God"; mes "1 Chain Mail[1]"; mes "100 Treasure Box"; next; mes "[ Kimuel ]"; mes "I will be waiting for you chosen one!"; if(countitem(7443) < 100 || countitem(7086) < 7 || countitem(7444) < 100 || countitem(2315) < 1) goto koolang; if(countitem(7443) >= 100 || countitem(7086) >= 7 || countitem(7444) >= 100 || countitem(2315) >= 1) goto kontinueq; close; L_ayaw: mes "[ Kimuel ]"; mes "Wacha Wachi Wacho... Go! Shoooo"; mes "Just speak to me if you want it already"; close; koolang: next; mes "[ Kimuel ]"; mes "As I said, one missing material and all the others go to waste"; close; kontinueq: next; mes "[ Kimuel ]"; mes "Very well done my friend you have finished the quest and acquired the Valkyrie Armor."; delitem 7443,100; delitem 7086,7; delitem 7444,100; delitem 2315,1; next; getitem 2357,1; set kim_kim,1; next; mes "[ Kimuel ]"; mes "Good Job! Enjoy your precious item."; mes "Now, go ahead and seek my Brothers and Cousins to finish the quest"; mes "And when you gain the Valkyrie Set speak to Bryan"; mes "If you have no clue about their location, my brothers and cousins are scattered around Rune-Midgard and Bryan is in Valkyrie"; announce "Wow!"+strcharinfo(0)+" has just acquired the mystical Valkyrie Armor.",8; close; L_tapospopo: mes "[ Kimuel ]"; mes "As I said, complete the Valkyrie Quest"; mes "And then speak to Bryan"; close; L_udone: mes "[ Kimuel ]"; mes "This quest, once done there is no more repeating"; close; } gef_fild07.gat,185,249,5 script Jhep 899,{ if(bry_bry >=1) goto L_bulmadone; if(jhe_jhe >=1) goto L_bulmatapos; if(ron_ron >=1) goto B_ulma; if(ron_ron < 1) { mes "[ Jhep ]"; mes "I am sight seeing, don't disturb me"; mes "Go far far away from me!!"; close; } B_ulma: mes "[ Jhep ]"; mes "Oh, you know my Uncle?"; mes "Well, nice to meet you. I'm Jhep"; mes "I craft the Valkyrie Shield"; mes "Would you like me to craft the said shield for you?"; menu "Okay",-,"Nope",M_ofo; next; mes "[ Jhep ]"; mes "The Valkyrie Shield is a very difficult item to craft and the materials are rare. Well if you're sure you want to make it.."; mes "Then these are the items I need."; next; mes "50 Fire Dragon Scale"; mes "7 Ripple"; mes "1 Buckler[1]"; mes "100 Treasure Box"; next; if(bulma >= 1 || countitem(7451) < 50 || countitem(7090) < 7 || countitem(2104) < 1 || countitem(7444) < 100) goto K_ulangot; if(bulma >= 1 || countitem(7451) >= 50 || countitem(7090) >= 7 || countitem(2104) >= 1 || countitem(7444) >= 100) goto K_umpleto; close; M_ofo: mes "[ Jhep ]"; mes "Okay, talk to me later."; close; K_ulangot: mes "[ Jhep ]"; mes "You don't have the items!"; close; K_umpleto: mes "[ Jhep ]"; mes "Wow, thanks!"; delitem 7451,50; delitem 7090,7; delitem 2104,1; delitem 7444,100; getitem 2115,1; next; mes "[ Jhep ]"; mes "Nicely done isn't? Enjoy the shield"; mes "So now, continue to search for my friends."; mes "And when you gain the Valkyrie Set speak to Bryan"; mes "If you have no clue about their location, my brothers and cousins are scattered around Rune-Midgard and Bryan is in Valkyrie"; announce "Wow! "+strcharinfo(0)+" has just acquired the mystical Valkyrie Shield.",8; set jhep_jhe,1; close; L_bulmatapos: mes "[ Jhep ]"; mes "Complete the Valkyrie Quest and speak to Bryan"; close; L_bulmadone: mes "[ Jhep ]"; mes "Dude, you can only do this quest once!"; close; } lighthalzen.gat,189,297,5 script Frame 904,{ if(bry_bry >=1) goto L_chichix; if(fra_fra >=1) goto L_chichi; if(ron_ron >= 1) goto tsitsi; if(ron_ron < 1) { mes "[ Frame ]"; mes "I miss Donna"; mes "I wish I could see her again"; close; } tsitsi: mes "[ Frame ]"; mes "You have spoken to my great Uncle Ronnel?"; mes "I am Frame, the crafter of Valkyrie Shoes"; mes "Would you like me to craft you the shoes?"; next; menu "Sure",-,"Maybe Later",L_basho; next; mes "[ Frame ]"; mes "The shoe is quite brittle."; mes "So it needs some items to harness it."; mes "I require you to give me these items"; next; mes "20 Skeletal Armor Piece"; mes "7 Billow"; mes "1 Boots[1]"; mes "100 Treasure Box"; next; if(countitem(7450) < 20 || countitem(7091) < 7 || countitem(7444) < 100 || countitem(2406) < 1) goto M_wala; if(countitem(7450) >= 20 || countitem(7091) >= 7 || countitem(7444) >= 100 || countitem(2406) >= 1) goto M_eron; mes "[ Frame ]"; mes "Hurry up! I have something to do."; close; L_basho: mes "[ Frame ]"; mes "Talk to me when you want it already."; close; M_wala: mes "[ Frame ]"; mes "You lack some few items."; close; M_eron: mes "[ Frame ]"; mes "Oh thank you!"; delitem 7450,20; delitem 7091,7; delitem 2406,1; delitem 7444,100; getitem 2421,1; set fra_fra,1; next; mes "[ Frame ]"; mes "Good one boy! Enjoy the shoes"; mes "And continue the holy Valkyrie Quest"; mes "And when you gain the Valkyrie Set speak to Bryan"; mes "If you have no clue about their location, my brothers and cousins are scattered around Rune-Midgard and Bryan is in Valkyrie"; announce "Wow! "+strcharinfo(0)+" has just acquired the mystical Valkyrie Shoes.",8; close; L_chichi: mes "[ Frame ]"; mes "Search my cousins and after that, find Bryan!"; close; L_chichix: mes "[ Frame ]"; mes "Nice to meet you again brave warrior. How is life treating you with your new godly equips?"; close; } comodo.gat,172,229,5 script JmKhov 731,{ if(bry_bry >=1) goto L_puten; if(jmk_jmk >=1) goto L_buten; if(ron_ron >=1) goto M_buten; if(ron_ron < 1) { mes "[ JmKhov ]"; mes "Hi?."; mes "Now fly, you noob!"; close; } M_buten: mes "[ JmKhov ]"; mes "So you know my uncle Ronnel? Wow that's great!"; mes "I can make the Valkyrie Manteau for you!"; mes "You surely want it noob?"; menu "Yeye",-,"Nevermind, thanks.",karpenter; next; mes "[ JmKhov ]"; mes "Oh, holy! Give me these items right away!"; next; mes "50 Matchstick"; mes "7 Silver Ornament"; mes "1 Manteau[1]"; mes "100 Treasure Box"; next; mes "[ JmKhov ]"; mes "Don't miss your chance, I will be waiting for you."; if (countitem(7035) < 50 || countitem(7077) < 7 || countitem(2506) < 1 || countitem(7444) < 100) goto Kewlung; if (countitem(7035) >= 50 || countitem(7077) >= 7 || countitem(2506) >= 1 || countitem(7444) >= 100) goto Kempleto; close; karpenter: next; mes "[ JmKhov ]"; mes "Huhu *sob*! You've wasted my time! Get lost noob!"; close; Kewlung: next; mes "[ JmKhov ]"; mes "Incomplete items, noob!"; close; Kempleto: next; mes "[ JmKhov ]"; mes "I see, you're a trustworthy one."; delitem 7444,100; delitem 2506,1; delitem 7077,7; delitem 7035,50; getitem 2524,1; set jmk_jmk,1; next; mes "[ JmKhov ]"; mes "Rawr! Take this robe and continue the Valkyrie Quest,"; mes "And when you gain the Valkyrie Set speak to Bryan."; mes "If you have no clue about their location, my brothers and cousins are scattered around Rune-Midgard and Bryan is in Valkyrie"; announce "Wow! "+strcharinfo(0)+" has just acquired the mystical Valkyrie Manteau.",8; close; L_buten: mes "[ JmKhov ]"; mes "Finish my Uncle's quest and speak to Bryan at the Valkyrie"; close; L_puten: mes "[ JmKhov ]"; mes "Wow, you're one of the Mega-Warrior! How is life treating you my friend?"; close; } valkyrie.gat,49,49,5 script Bryan 733,{ mes "[ Bryan ]"; mes "Hello there child, I am Bryan."; next; if(bry_bry >= 1) goto L_kalbo; if(countitem(2524) < 1 || countitem(2421) < 1 || countitem(2357) < 1 || countitem(2115) < 1) goto Bryan; mes "[ Bryan ]"; mes "Good you have the Valkyrie Set if you must know I am the crafter of the Sleipnir."; next; if(jmk_jmk >= 1) goto Bryanquest; if(jmk_jmk < 1) goto Bryan; Bryanquest: mes "[ Bryan ]"; mes "I see, You really have spoken to my brothers."; mes "Very well then!"; next; mes "[ Bryan ]"; mes "By the way I am Bryan of the Valkyries and you already know what I make."; mes "Do you desire to have the Sleipnir?"; menu "Yes",-,"No",L_nono; next; mes "[ Bryan ]"; mes "The Great Sleipnir named after Odin's trustee"; mes "Steed, is the most powerful shoe in the land"; mes "Gather these items so I may craft it"; next; mes "300 Handcuffs"; mes "9 Emblem of Sun God"; mes "10 Matchstick"; mes "100 Gold"; next; mes "[ Bryan ]"; mes "I will be waiting for you great one."; if(countitem(7345) < 300 || countitem(7086) < 9 || countitem(7035) < 10 || countitem(969) < 100) goto kikiki; if(countitem(7345) >= 300 || countitem(7086) >= 9 || countitem(7035) >= 10 || countitem(969) >= 100) goto killhim; close; L_nono: mes "[ Bryan ]"; mes "Go away! If you don't want it. You're wasting my time already."; mes "Just speak to me if you're ready."; close; kikiki: next; mes "[ Bryan ]"; mes "You lack of items, complete it!"; close; killhim: next; mes "[ Bryan ]"; mes "Very well done child."; mes "You are very good!"; delitem 7345,300; delitem 7086,9; delitem 969,100; delitem 7035,10; getitem2 2410,1,1,@ref,0,254,0,getcharid(0)&0xffff,(getcharid(0)>>16)&0xffff; set bry_bry,1; next; mes "[ Bryan ]"; mes "As for my excellency, take care of that Sleipnir"; mes "You are now a Mega-Warrior of Temptation Ragnarok Online"; mes "Go wild and free, you noble man"; announce "Raise the Roof! "+strcharinfo(0)+" has just become the Mega-Warrior and gained Sleipnir.",8; close; L_kalbo: mes "[ Bryan ]"; mes "You have already gained Sleipnir"; mes "How dare you speak to me again!? Now, I order you to go back to Prontera!"; next; percentheal -100,0; warp "prontera.gat",0,0; close; Bryan: mes "[ Bryan ]"; mes "Oh my bad, I see you are just another newbie."; mes "Go fly away"; close; } the NPC on the pay_fild doesnt show up and the rest of the nxt NPC no errors found on the script but i dunno how this script works thnx in advance -
incorrect use of close command error showed on putty
AinsLord replied to AinsLord's question in Scripting Support
bump -
incorrect use of close command error showed on putty
AinsLord posted a question in Scripting Support
heres the NPC script // _______ __ ____ ____ __ __ ____ __ __ __ __ __ __ __ ____ _ ____ // /__ __/ / / / __ \ / __ \ / / / / /__ \ / / /_/ __/ /_ / // / / /__/ / /__ \ / /__ / __ \ _____ // / / / /_ / /_/ / / / / / / / / / ____/ / / / __ /_ __// // / / _ _ / ____/ / / // / / /_/ / / __ \ // / / / __ \ / ____/ / / / / / / / / / __ / / / / / / / \_ / / // /// / __ / / __/ / ____/ / / /_/ // / / / / / / / /__ / /_/ /_ / /_/ / / /_/ / / / / / / / __/ / / // /// / /_/ / / _ \ / /__ / / ///_/ /_/ /_/ \____/ \_______/ \____/ \____/ /_/ /_/ /_/ \__/ /_//_/// \____/ /_/ \_\ \____/ /_/ //============================================================================= // // Gold Room Advance Script - Mining Gold for wealth - Please Leave Credit \\ //============================================================================= //POWERED by: rudolp //[The Quality Maker] //Time Finished :6:28 PM 6/7/2009 //Please Report any bug and suggestions. //===== Compatible With: ================================================================= //= Any eAthena Version //=============Gold Room Settings=================== //This should always be enable for a better Gold Room System. //================================================== ordeal_1-2.gat mapflag noskill ordeal_1-2.gat mapflag nomemo ordeal_1-2.gat mapflag nobranch ordeal_1-2.gat mapflag noloot ordeal_1-2.gat mapflag noexp ordeal_1-2.gat mapflag nodrop ordeal_1-2.gat mapflag novending ordeal_1-2.gat mapflag nowarp ordeal_1-2.gat mapflag nowarpto ordeal_1-2.gat mapflag noreturn ordeal_1-2.gat mapflag nosave //================================================= ordeal_1-2,0,0,0 script Gold Room -1,{ OnInit: //No. of Mine Guardian. //For golden peko it is default to 100 and 4 seconds~2 seconds spawn rate. set .guardian,50; //Type of guardian. 0 = normal 1 = extreme set .@guardiantype,1; if(.@guardiantype == 0){ monster "ordeal_1-2",0,0,"Guardian",1039,.guardian,""; }else{ monster "ordeal_1-2",0,0,"Guardian",1039,.guardian,""; } end; OnNPCKillEvent: //===== Configurations: ======================================================================== //Max gold can a player get after killing 1 golden peko (default 5 note:this will increase if luk bonus is enable). set .@maxgaingold,5; //Apply gold penalty. 0 = no 1 = yes set .@penalty1,1; //The Maximum no. of gold Penalty. set .@maxpenalty1,3; //Apply speed & HP penalty. 0 = no 1 = yes set .@penalty2,1; //Gold limitation penalty must be enable set .@maxgold,1000; //The maximum no. of hp penalty by %. set .@maxpenalty2,98; //Enable luk bonus. 0=no 1=yes set .@lukbonus,0; //If luk Bonus is enable,luk divider default 49 w/ 99 max parameter. Note: the quotient of your max parameter and .@lukdiv must not grater than 5 to avoid over mining. set .@lukdiv,49; //Show Server Name. 0=no 1=yes set .@showservername,1; //Name of your Server set .@servername$,"[New World RO]"; //========================================================================================= if (getmapxy(@mapname$,@mapx,@mapy,0) == -1) goto L_Finish; if (@mapname$ == "ordeal_1-2"){ set @bonus,0; set @deduction,0; set @gain,rand (.@maxgaingold); //Luk bonus if (.@lukbonus != 0){ set @bonus,readparam(bLuk)/.@lukdiv; } //Gold Penalty if (.@penalty1 != 0){ set @deduction,rand(.@maxpenalty1); if(@deduction == 0) set @deduction,1; } set @gain, @gain + @bonus - @deduction; set gold, gold + @gain ; //Displaying Gained Gold if(.@showservername != 0){ if(gold%5 == 0){ //Show Server Name every 10 gold gain. dispbottom "===============Brought to you by==============="; dispbottom "==============" + .@servername$ +"=============="; } } if(@gain){ dispbottom "-|You got: " +@gain+ " gold| - |Total: " +gold+ " gold|- "; }else{ dispbottom "-|You got: NOTHING! |- "; } if (.@penalty2 != 0){ if (gold >= .@maxgold/2 && gold <=.@maxgold/2+20){ sc_start SC_DECREASEAGI,240000,10; }else if(gold >.@maxgold){ sc_start SC_CURSE,240000,10; percentheal (.@maxpenalty2*-1),(.@maxpenalty2*-1); heal -50,0; //For him to die } } if(paid == 0){ mapannounce "ordeal_1-2"," x( "+strcharinfo(0)+" is a cheater!",bc_map; dispbottom "Go out you bastard!"; set gold,0; warp "prontera", 173, 160; } end; } OnPCDieEvent: if (getmapxy(@mapname$,@mapx,@mapy,0) == -1) goto L_Finish; if (@mapname$ == "ordeal_1-2"){ dispbottom "Holy Shit you died!"; dispbottom "All of your gold will gone!"; set alive, 0; set paid, 0; end; } L_Finish: close; } //=============================================== //warper //=============================================== ordeal_1-2,154,156,5 script Gold Miner 813,{ mes "[Gold Miner]"; if(gold >=50){ goto wa; } mes "Want to go now?"; mes "Your gold is just "+gold+" you can still get more."; close; wa: mes "Want to go now?"; if(select("Yes", "No") == 1) { set alive,1; warp "prontera", 173, 160; } close; } prontera,164,173,4 script Gold Room Warperer#pront 813,{ set @name$,"que_temsky"; callfunc "goldmain"; end; } aldebaran,133,116,4 script Gold Room Warperer#alde 813,{ set @name$,"aldebaran"; callfunc "goldmain"; end; } alberta,23,247,4 script Gold Room Warperer#alb 813,{ set @name$,"alberta"; callfunc "goldmain"; end; } payon,151,182,4 script Gold Room Warperer#pay 813,{ set @name$,"payon"; callfunc "goldmain"; end; } geffen,115,74,4 script Gold Room Warperer#gef 813,{ set @name$,"geffen"; callfunc "goldmain"; end; } function script goldmain { if (getgmlevel() >= 90){ mes "[Gold Room Warperer]"; if(sex != 0){ mes "Hello Sir what can I do for you?"; }else{ mes "Hello Maam what can I do for you?"; } next; menu "Enter Mining Site",start,"Please close the mine Site. Now!",-,"Please Open the mine Site. Now!",G_open,"Nothing",C_s; next; mes "[Gold Room Warperer]"; mapannounce "ordeal_1-2","Excuse me Miners.",bc_map; mes "Ok."; next; mapannounce "ordeal_1-2",strcharinfo(0) +" wants to close the Gold Room for a while",bc_map; mes "Just a second I will just ask them to"; mes "go out in the mining site"; next; mapannounce "ordeal_1-2","Please settle your things and move quitely",bc_map; mes "[Gold Room Warperer]"; mes "............."; mes "........"; next; mes "[Gold Room Warperer]"; mes "Ok your done"; set .opengoldroom,1; areawarp "ordeal_1-2",21,286,286,22,"prontera", 173, 160; close; } if(.opengoldroom == 0){ goto start; }else{ mes "[Gold Room Warperer]"; mes "Sorry!"; mes "The Mining Site is closed."; close; } G_open: mes "[Gold Room Warperer]"; mes "Ok."; mes "Mining Site is Already Available."; announce " Gold Room is open for public!",bc_map; set .opengoldroom,0; close; start: if ( alive == 0){ set gold,0; } mes "[Gold Room Warperer]"; mes "What do you want?"; next; menu "To the Gold Room",-,"Exchange Gold",exchange,"Nothing",C_s; mes "[Gold Room Warperer]"; mes "Hmm.."; mes "It cost 100,000z"; mes "Would you like to go now to the gold room?"; if(select("Yes", "No") == 1) { if(@name$ == "prontera") savepoint "prontera", 173, 160; if(@name$ == "aldebaran") savepoint "aldebaran",166, 163; if(@name$ == "alberta") savepoint "alberta",16, 246; if(@name$ == "payon") savepoint "payon",160, 179; if(@name$ == "geffen") savepoint "geffen",124, 85; if (Zeny < 100000) goto nomoney; set Zeny, Zeny - 100000; set alive, 1; set paid, 1; warp "ordeal_1-2", 156, 155; } close; nomoney: mes "[Gold Room Warperer]"; mes "Sorry insufficient balance"; close; exchange: mes "[Gold Room Warperer]"; mes "Hmm...let me see"; mes "You have " +gold+ "."; if (gold == 0) goto nogold; mes "Ok get this."; next; if (checkweight(969,gold) == 0) goto L_OverWeight; getitem 969, gold; set gold, 0; emotion e_gg; close; L_OverWeight: mes "[Gold Room Warperer]"; mes "Sorry your overweight"; close; nogold: close; C_s: close; } //============================================================ //=========================================================== //======================================== //warps you may edit this one for your convenience //======================================== ordeal_1-2,73,265,0 warp ord500 1,1,prontera,173,160 ordeal_1-2,129,194,0 warp ord501 1,1,prontera,173,160 ordeal_1-2,130,194,0 warp ord502 1,1,prontera,173,160 ordeal_1-2,178,193,0 warp ord503 1,1,prontera,173,160 ordeal_1-2,290,130,0 warp ord504 1,1,prontera,173,160 ordeal_1-2,241,281,0 warp ord505 1,1,prontera,173,160 ordeal_1-2,66,25,0 warp ord506 1,1,prontera,173,160 ordeal_1-2,202,129,0 warp ord509 1,1,prontera,173,160 ordeal_1-2,105,154,0 warp ord510 1,1,prontera,173,160 //============Spawns================= ordeal_1-2,0,0,0,0 monster Golden Pecopeco 1369,200,40000,20000,0 heres the image of the error thnx in advance -
yey it works thnx
-
as shown on the image dunno why??? this is the NPC Script i used //===== eAthena Script ======================================================= //= Donation Refine ( TXT & SQL ) //===== By: eJay================================================================== //= Credit goes to whoever made this xD //===== Current Version: ===================================================== //= Verion 1.1 //===== Compatible With: ===================================================== //= Any eAthena Version/Rathena Version //===== Description: ========================================================= //= Donation Refine Script //============================================================================ prontera,159,183,4 script +10 Refiner 821,{ mes "[+10 Refiner]"; mes "Good day "+strcharinfo(0); mes "If you want to refine your items to +10, please give me 10 ^3355FFProof of Donation^000000 so I can refine it without failing."; next; mes "[+10 Refiner]"; mes "Now, what do you want to refine?"; next; function Refine; set @itemid, 7179; //Proof of Donation set @itemquantity, 10; // item quantity set @maxrefine, 10; // Max Refine menu "Refine equipment",REFIN,"Nothing at all",QUIT; REFIN: next; mes "[+10 Refiner]"; mes "To refine a item you need:"; mes "^FF0000 "+@itemquantity+" "+getitemname(@itemid)+"^000000"; set @headtop$, getequipname(1); set @armor$, getequipname(2); set @handl$, getequipname(3); set @handr$, getequipname(4); set @garment$, getequipname(5); set @shoes$, getequipname(6); set @accl$, getequipname(7); set @accr$, getequipname(8); set @headmid$, getequipname(9); set @headlow$, getequipname(10); menu "[Head - Top] "+@headtop$,HEADTOP, "[Head - Mid] "+@headmid$,HEADMID, "[Head - Low] "+@headlow$,HEADLOW, "[Armor] "+@armor$,ARMOR, "[Garment] "+@garment$,GARMENT, "[Left Hand] "+@handl$,HANDL, "[Right Hand] "+@handr$,HANDR, "[Left Acc] "+@accl$,ACCL, "[Right Acc] "+@accr$,ACCR, "[shoes] "+@shoes$,SHOES, "Cancel",QUIT; HEADTOP: set @slot, 1; callfunc Refine; HEADMID: set @slot, 9; callfunc Refine; HEADLOW: set @slot, 10; callfunc Refine; ARMOR: set @slot, 2; callfunc Refine; GARMENT: set @slot, 5; callfunc Refine; HANDL: set @slot, 3; callfunc Refine; HANDR: set @slot, 4; callfunc Refine; ACCL: set @slot, 7; callfunc Refine; ACCR: set @slot, 8; callfunc Refine; SHOES: set @slot, 6; callfunc Refine; QUIT: next; mes "[+10 Refiner]"; mes "Okay, see you."; close; LATER: next; mes "[+10 Refiner]"; mes "Thanks, have a nice day."; close; CANCEL: next; mes "[+10 Refiner]"; mes "Okay, come back another time."; close; MAXX: next; mes "[+10 Refiner]"; mes "Sorry, but I can't refine this anymore."; close; NOWAY: next; mes "[+10 Refiner]"; mes "Oh my, I can't refine this item!!!"; close; NOREQ: next; mes "[+10 Refiner]"; mes "Sorry, but you don't have the items I need"; close; // ---------------Refine Equipment function Refine { if (getequiprefinerycnt(@slot) >= @maxrefine) goto MAXX; menu "Do it!",-,"Cancel",CANCEL; if (countitem(@itemid) < @itemquantity) goto NOREQ; delitem @itemid, @itemquantity; set @repeat, (@maxrefine - getequiprefinerycnt(@slot)); while (@repeat > 0) { successrefitem(@slot); set @repeat, @repeat - 1; } goto LATER; } }
-
Help on putting how many player inside the PVP room PUB
AinsLord posted a question in Scripting Support
prontera,147,196,5 script PVP Room 403,{ warp "guild_vs3",0,0; end; } guild_vs3 mapflag nowarpto guild_vs3 mapflag nowarp guild_vs3 mapflag noreturn can anyone modify this that shows in PUB how many player is inside the PVP room and announce if someone entered the PVP room thnx in advance -
error running the game after encrypting using GRF editor
AinsLord posted a question in General Support
this is the error after encrypting the GRF file with the GRF encryption dunno what to do can anyone help me with this i didnt use the secure grf on this just the GRF editor encryption feature -
every monster kill the simple bot checker applies
AinsLord replied to AinsLord's question in Scripting Support
thnx for suggesting but i want script anyone -
- script antibot -1,{ function GetString; OnNPCKillEvent: if( rand(100) > 30 ) end; // 30% trigger OnPCLoginEvent: switch( rand(2) ){ Case 0: sc_start sc_berserk, 1000000000, 1; set .@String$,GetString( 15,rand(5,10) ); mes "Input the ^FF0000RED COLOUR^000000 part"; mes "^0000FF"+GetString( 15,rand(5,10) )+"^FF0000"+.@String$+"^0000FF"+GetString( 15,rand(3,10) )+"^000000"; input .@Input$; if( .@Input$ != .@String$ ){ mes "Wrong.."; atcommand "@kick "+strcharinfo(0); } sc_end sc_berserk; break; Case 1: sc_start sc_berserk, 1000000000, 1; set .@A,rand(1000); set .@B,rand(1000); mes "If A = "+.@A+" B = "+.@B; switch( rand(4) ){ Case 0: set .@Answer,.@A + .@B; mes "How many is A + B ?"; break; Case 1: set .@Answer,.@A - .@B; mes "How many is A - B ?"; break; Case 2: set .@Answer,.@A * .@B; mes "How many is A * B ?"; break; Case 3: set .@Answer,.@A / .@B; mes "How many is A / B ?"; break; } input .@Input; if( .@Input != .@Answer ){ mes "Wrong"; atcommand "@kick "+strcharinfo(0); } sc_end sc_berserk; break; } close; function GetString { if( getarg(0) & 1 ) setarray .@List$[ getarraysize( .@List$ ) ],"1","2","3","4","5","6","7","8","9"; if( getarg(0) & 2 ) setarray .@List$[ getarraysize( .@List$ ) ],"A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"; if( getarg(0) & 4 ) setarray .@List$[ getarraysize( .@List$ ) ],"a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"; if( getarg(0) & 8 ) setarray .@List$[ getarraysize( .@List$ ) ],"!","@","#","$","%","^","&","*","(",")","-","=","/","+"; set .@Str$,""; while( getstrlen( .@Str$ ) < getarg(1) ) set .@Str$,.@Str$ + .@List$[ rand( getarraysize( .@List$ ) ) ]; return .@Str$; } } this is the NPC script every time a monster killed it will pop up can anyone modify this like it will activate an hour to check if the player is a bot or not Thnx in advance
-
aura doesnt change in game after changing it on grf
AinsLord replied to AinsLord's question in Graphics Support
yea texture/effect and paste the files/ replace with the same file name -
-
nothing follows after i typed that command well thnx for all your help guys ill try to figure this thing up ill bump here sometime if i got some more questions
-
or if you are gm use @mount2 command to have it
-
what do u mean by mount in all jobs?? are you talking about then lion mount for knight class etc?
-
help me please to modify this for this one equipment for normal monster will be at 10% and for boss/MVP will be 5% // The rate at which equipment is dropped. item_rate_equip: 1000 item_rate_equip_boss: 2500 item_rate_equip_mvp: 100 item_drop_equip_min: 1 item_drop_equip_max: 5000 and for this one cards for normal monsters will be 20% and for boss/MVP will be 5% // The rate at which cards are dropped item_rate_card: 100000 item_rate_card_boss: 10000 item_rate_card_mvp: 50000 item_drop_card_min: 100 item_drop_card_max: 10000 ive tried my best to modify this but i cant every mobs shows different % of droprates please help me PS: i dunno if the Title is informative i kept on receiving warning for uninformative title for it T_T
-
same sir
-
thnx mate i tried to remove getrefine(d)>8 it worked thnx
-
,4,20,,300,,3,,0,0xFFFFFFFF,7,2,256,,1,1,618,{ bonus2 bSubEle,Ele_Fire,7; bonus bDex,2; bonus bMdef,3;} if(getrefine()>6) { bonus bCastrate,-3;} if(getrefine()>7) { bonus5 bAutoSpell,"WZ_SIGHTRASHER",1,10,BF_MAGIC,0;} if(getrefined()>8) { bonus bCastrate,-2;} if(getrefine()>9) { bonus bMatkRate,4;} },{},{} the if(getrefine()>9) { bonus bMatkRate,4;} doesnt apply what i mean is the matk doesnt increase after i made the gear +10
-
all maps are full all of it even there is a 0/50 capacity it will say room is full as far as i know this arrays are // Max Players Per Map setarray .MaxPlayers,0,50,10,36,50; based on this map arrays and 0 will be no limit setarray .MapName$,"guild_vs1","guild_vs2","guild_vs3","guild_vs4","guild_vs5"; ive tried already to set it at 100 all of those number still same proble no errors on the console or script
-
yea thats what i did 1st this one said it was invalid spec : 'www-data:' chown -R www-data: /var/www/html 2nd this one nothing follows after i typed that chmod -R 755 /var/www/html
-
-
-
this is what is shown after configuring server.php and the application did is do something wrong??
-
lemme try this sorry akkarin im having net issue i dunno i posted 2 bumps im suppose to edit my latest post EDIT: is this correct??? i made a sub folder in var/www/http or i just paste the whole fluxCP file inside HTTP folder???
-
and yea i already have apache installed in my VPS EDIT: it will show like this if you have apache installed ryt??