-
Posts
354 -
Joined
-
Last visited
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Everything posted by Rage Guy
-
i sware its not working with me . but i made a idea xD i made the prize man that say talk to me -1 and i removing his annoincment and i used some of ur ideas and it worked xD Done //= Poring Catcher - Auto Event Script //===== By: ================================================================================ //= Washi - www.EarthBound-RO.com //===== Compatible With: ==================================================================== //= Any eAthena Version //===== Description: ======================================================================== //= Single NPC that starts automatically starts every hour. //===== Additional Comments: ================================================================ //= This script is a combenation of the Dice Event by [Mahina] //= and the origonal Poring Catcher Event by [Wild Karrd] //================================================================================ //=========== //= OnMinute - Change this to the minute you would like this script to load. [ LINE 22 ] //= getitem - Change this to the Item ID of your prize. [ LINE 118 ] //================================================================================ //=========== - script poring#announcer -1,{ OnInit: disablenpc "Poring Catcher Warper"; hideonnpc "Poring Catcher#evnt2"; end; OnMinute30: // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR. OnGMStart: announce "Poring Catcher : انه الوقت للعب البحث عن البورينج",0; killmonster "poring_w01","All"; sleep2 10000; announce "Poring Catcher : توجه الي برونتيرا اذا كنت تريد التسجيل",0; sleep2 10000; announce "Poring Catcher : بعد دقيقة 1 سوف يتوقف التسجيل",0; sleep2 10000; announce "Poring Catcher : ادخل البوابة الان اذا كنت تريد الدخول",0; enablenpc "Poring Catcher Warper"; initnpctimer; end; OnTimer30000: announce "Poring Catcher : تبقي 30 ثانية علي نهاية التسجيل",0; sleep2 5000; announce "Poring Catcher : توجه الي بورنتيرا سريعا للدخول",0; end; OnTimer50000: announce "Poring Catcher : تبقي 10 ثواني",0; end; OnTimer55000: announce "Poring Catcher : 5.",0; end; OnTimer56000: announce "Poring Catcher : 4.",0; end; OnTimer57000: announce "Poring Catcher : 3.",0; end; OnTimer58000: announce "Poring Catcher : 2.",0; end; OnTimer59000: announce "Poring Catcher : 1.",0; end; OnTimer60000: announce "Poring Catcher : انتهي الوقت",0; end; OnTimer61000: disablenpc "Poring Catcher Warper"; donpcevent "Poring Catcher#evnt2::OnEnable"; stopnpctimer; end; } prontera,147,165,0 warp Poring Catcher Warper 0,0,poring_w01,106,129 //-------------------------------------------------- pvp_n_4-5,101,96,6 script Poring Catcher 909,{ if (getgmlevel()<50) { player_here: mes "^FF0000[Poring Catcher Schedule]^000000"; mes "^0000FF[ 00:30AM ]^000000"; mes "^0000FF[ 04:30AM ]^000000"; mes "^0000FF[ 08:30AM ]^000000"; mes "^0000FF[ 12:30PM ]^000000"; mes "^0000FF[ 04:30PM ]^000000"; mes "^0000FF[ 08:30PM ]^000000"; next; mes "^FF0000[Poring Catcher]^000000"; mes "Current Prize:"; mes "----------------------"; mes "^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; close; } gm_only: if (getgmlevel() < 80) goto player_here; mes "^FF0000Poring Catcher Warper^000000"; mes "Yes, master?"; mes "What can I do for you today, master?"; next; switch(select("Start Event:Stop Event:Check Prize:Set Prize:Nothing")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Hello, GM ^008000"+strcharinfo(0)+"^000000!"; mes "Do you want to start the event?"; next; switch(select("Yes:Leave")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Here we go!"; close2; announce "GM "+strcharinfo(0)+" has started the Poring Catcher Event!",0; sleep 2000; donpcevent "poring#announcer::OnGMStart"; end; case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Ok, nothing changed!"; close; } case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Hello, GM ^008000"+strcharinfo(0)+"^000000!"; mes "Do you want to stop the event?"; mes " "; mes "^FF0000Note that you can only stop the event if it is already starting."; mes "If the event is still on the giving of directions, it couldn't be stopped!^000000"; next; switch(select("Yes:No")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Close this window to stop the event!"; close2; goto stopbygm; case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Ok, nothing changed!"; close; } case 3: next; mes "^FF0000Poring Catcher^000000"; mes "Current Prize :"; mes "-------------------"; mes "^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; next; goto gm_only; case 4: next; mes "^FF0000Poring Catcher^000000"; mes "What will be the new reward?"; input .@itemid; if (getitemname(.@itemid) == "null" || getitemname(.@itemid) == "") {next; mes "^FF0000Poring Catcher^000000"; mes "The item is not found in the database.."; next; goto gm_only; } set $rewarditem, .@itemid; next; mes "^FF0000Poring Catcher^000000"; mes "How many ^008000"+getitemname($rewarditem)+"s^000000 should we give?"; input .@itemamount; if(.@itemamount <= 0) {next; mes "^FF0000Poring Catcher^000000"; mes "Please input a # greater than 0"; next; goto gm_only; } set $rewardamount,.@itemamount; next; mes "^FF0000Poring Catcher^000000"; mes "So, the winner will get ^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; next; goto gm_only; case 5: next; mes "^FF0000Poring Catcher^000000"; mes "Nothing Changed!"; close; } stopbygm: stopnpctimer; killmonster "poring_w01","All"; announce "Poring Catcher Event was stopped by GM "+strcharinfo(0)+"!",0; sleep 2000; mapwarp "poring_w01","prontera",149,160; end; } //-------------------------------------------------- poring_w01,100,127,4 script Poring Catcher#evnt2 -1,{ //-------------------------------------------------- mes "[المهرج]"; if(PORING == 1) goto L_PORING; mes "تعال و قل لي اسمك"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[المهرج]"; mes "هل انت متئكد ان هذا اسم شخصيتك ؟"; close; } mes "[المهرج]"; mes "اذهب الي منزلك"; close2; announce "Poring Catcher : الكل يضحك , "+.@name$+". - هذا اللاعب حاول غش النظام",0; warp "prontera",155,177; end; L_PORING: mes "تعال و قل لي اسمك"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[المهرج]"; mes "هل انت متئكد ان هذا اسمك ؟"; close; } mes "[Poring Catcher]"; mes "مبروك لقد فذت"; close2; if (getitemname($rewarditem) == "null"){ set $rewarditem, 674; set $rewardamount, 4; } announce "Poring Catcher : لدينا فائذ, "+.@name$+". with "+$rewardamount+" "+getitemname($rewarditem)+"s",0; getitem $rewarditem, $rewardamount; // SET THE 20085 TO THE ITEM ID OF YOUR PRIZE warp "prontera",155,177; hideonnpc "Poring Catcher#evnt2"; end; OnEnable: mapannounce "poring_w01","Poring Catcher : في 10 دقائق . سوف استدعي 100 بورينج مختلف",0; initnpctimer; sleep2 10000; mapannounce "poring_w01","Poring Catcher : واحد فقط فيهم هو الحقيقي",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : الحقيقي اسمه [ Poring ] و الباقي جميهم مزورين",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : اذا قتلت البورينج الخاطء سوف يتم طردك من اللعبة",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : أول من يقتل البورينج الحقيقي هو الفائذ",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : هذا فقط هيا بنا نبدء .",0; goto L_Start; end; OnTimer570000: mapannounce "poring_w01","Poring Catcher : الوقت يمر . تبقي 30 ثانية",0; end; OnTimer600000: stopnpctimer; mapannounce "poring_w01","Poring Catcher : انتهي الوقت لم يجد احد البورينج الحقيقي",0; atcommand "@doommap"; killmonster "poring_w01","All"; sleep 3000; mapwarp "poring_w01","prontera",155,177; end; L_Start: mapannounce "poring_w01","Poring Catcher : 5",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 4",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 3",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 2",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 1",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : سوف نبدء الان",0; areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Pouring",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Proing",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poiring",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poing",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porning",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"PoriNg",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porong",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled"; end; } - script poringwin -1,{ OnMobKilled: dispbottom "Poring : مبروك لقد نلت مني ^^"; announce strcharinfo(0)+" فاذ في مسابقة البحث عن البورينج",bc_all; getitem 674, 4; set PORING,1; atcommand "@doommap"; killmonster "poring_w01","All"; mapwarp "poring_w01","prontera",156,180; hideoffnpc "Poring Catcher#evnt2"; end; } - script poringlose -1,{ OnMobKilled: dispbottom "Poring Catcher : واهاهاه. يا لك من فاشل - انا لست البورينج الحقيقي"; warp "prontera",156,180; end; } // -- Mapflags poring_w01 mapflag nowarp poring_w01 mapflag nowarpto poring_w01 mapflag noteleport poring_w01 mapflag nosave poring_w01 mapflag nomemo poring_w01 mapflag nobranch poring_w01 mapflag noloot poring_w01 mapflag noskill poring_w01 mapflag nopenalty Thanks Alottttttttttttttttttttttttttttttttttt. Anakid sorry for wasting ur time with me ^^
-
not working == but written the error on line 17 wait i coppyied something wrong i will try again not working ==
-
am going to try it now but thise lang is arabic xD if any thing u couldn't read copy it to me then i will translate not working to ==
-
i didnt try the event yet but when i just used @reloadscript the manual poring catcher starter has disapeared == he was on pvp_n_4-5 now the time came and the event didn't work it stoped working 100% == any help pls?
-
are u sure? //= Poring Catcher - Auto Event Script //===== By: ================================================================================ //= Washi - www.EarthBound-RO.com //===== Compatible With: ==================================================================== //= Any eAthena Version //===== Description: ======================================================================== //= Single NPC that starts automatically starts every hour. //===== Additional Comments: ================================================================ //= This script is a combenation of the Dice Event by [Mahina] //= and the origonal Poring Catcher Event by [Wild Karrd] //================================================================================ //=========== //= OnMinute - Change this to the minute you would like this script to load. [ LINE 22 ] //= getitem - Change this to the Item ID of your prize. [ LINE 118 ] //================================================================================ //=========== - script poring#announcer -1,{ OnInit: disablenpc "Poring Catcher Warper"; hideonnpc "Poring Catcher#evnt2"; end; OnMinute30: // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR. OnGMStart: announce "Poring Catcher : انه الوقت للعب البحث عن البورينج",0; killmonster "poring_w01","All"; sleep2 10000; announce "Poring Catcher : توجه الي برونتيرا اذا كنت تريد التسجيل",0; sleep2 10000; announce "Poring Catcher : بعد دقيقة 1 سوف يتوقف التسجيل",0; sleep2 10000; announce "Poring Catcher : ادخل البوابة الان اذا كنت تريد الدخول",0; enablenpc "Poring Catcher Warper"; initnpctimer; end; OnTimer30000: announce "Poring Catcher : تبقي 30 ثانية علي نهاية التسجيل",0; sleep2 5000; announce "Poring Catcher : توجه الي بورنتيرا سريعا للدخول",0; end; OnTimer50000: announce "Poring Catcher : تبقي 10 ثواني",0; end; OnTimer55000: announce "Poring Catcher : 5.",0; end; OnTimer56000: announce "Poring Catcher : 4.",0; end; OnTimer57000: announce "Poring Catcher : 3.",0; end; OnTimer58000: announce "Poring Catcher : 2.",0; end; OnTimer59000: announce "Poring Catcher : 1.",0; end; OnTimer60000: announce "Poring Catcher : انتهي الوقت",0; end; OnTimer61000: disablenpc "Poring Catcher Warper"; donpcevent "Poring Catcher#evnt2::OnEnable"; stopnpctimer; end; } prontera,147,165,0 warp Poring Catcher Warper 0,0,poring_w01,106,129 //-------------------------------------------------- pvp_n_4-5,101,96,6 script Poring Catcher 909,{ if (getgmlevel()<50) { player_here: mes "^FF0000[Poring Catcher Schedule]^000000"; mes "^0000FF[ 00:30AM ]^000000"; mes "^0000FF[ 04:30AM ]^000000"; mes "^0000FF[ 08:30AM ]^000000"; mes "^0000FF[ 12:30PM ]^000000"; mes "^0000FF[ 04:30PM ]^000000"; mes "^0000FF[ 08:30PM ]^000000"; next; mes "^FF0000[Poring Catcher]^000000"; mes "Current Prize:"; mes "----------------------"; mes "^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; close; } gm_only: if (getgmlevel() < 80) goto player_here; mes "^FF0000Poring Catcher Warper^000000"; mes "Yes, master?"; mes "What can I do for you today, master?"; next; switch(select("Start Event:Stop Event:Check Prize:Set Prize:Nothing")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Hello, GM ^008000"+strcharinfo(0)+"^000000!"; mes "Do you want to start the event?"; next; switch(select("Yes:Leave")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Here we go!"; close2; announce "GM "+strcharinfo(0)+" has started the Poring Catcher Event!",0; sleep 2000; donpcevent "poring#announcer::OnGMStart"; end; case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Ok, nothing changed!"; close; } case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Hello, GM ^008000"+strcharinfo(0)+"^000000!"; mes "Do you want to stop the event?"; mes " "; mes "^FF0000Note that you can only stop the event if it is already starting."; mes "If the event is still on the giving of directions, it couldn't be stopped!^000000"; next; switch(select("Yes:No")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Close this window to stop the event!"; close2; goto stopbygm; case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Ok, nothing changed!"; close; } case 3: next; mes "^FF0000Poring Catcher^000000"; mes "Current Prize :"; mes "-------------------"; mes "^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; next; goto gm_only; case 4: next; mes "^FF0000Poring Catcher^000000"; mes "What will be the new reward?"; input .@itemid; if (getitemname(.@itemid) == "null" || getitemname(.@itemid) == "") {next; mes "^FF0000Poring Catcher^000000"; mes "The item is not found in the database.."; next; goto gm_only; } set $rewarditem, .@itemid; next; mes "^FF0000Poring Catcher^000000"; mes "How many ^008000"+getitemname($rewarditem)+"s^000000 should we give?"; input .@itemamount; if(.@itemamount <= 0) {next; mes "^FF0000Poring Catcher^000000"; mes "Please input a # greater than 0"; next; goto gm_only; } set $rewardamount,.@itemamount; next; mes "^FF0000Poring Catcher^000000"; mes "So, the winner will get ^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; next; goto gm_only; case 5: next; mes "^FF0000Poring Catcher^000000"; mes "Nothing Changed!"; close; } stopbygm: stopnpctimer; killmonster "poring_w01","All"; announce "Poring Catcher Event was stopped by GM "+strcharinfo(0)+"!",0; sleep 2000; mapwarp "poring_w01","prontera",149,160; end; } L_PORING: mes "تعال و قل لي اسمك"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[المهرج]"; mes "هل انت متئكد ان هذا اسمك ؟"; close; } mes "[Poring Catcher]"; mes "مبروك لقد فذت"; close2; if (getitemname($rewarditem) == "null"){ set $rewarditem, 674; set $rewardamount, 4; } announce "Poring Catcher : لدينا فائذ, "+.@name$+". with "+$rewardamount+" "+getitemname($rewarditem)+"s",0; getitem $rewarditem, $rewardamount; // SET THE 20085 TO THE ITEM ID OF YOUR PRIZE warp "prontera",155,177; hideonnpc "Poring Catcher#evnt2"; end; OnEnable: mapannounce "poring_w01","Poring Catcher : في 10 دقائق . سوف استدعي 100 بورينج مختلف",0; initnpctimer; sleep2 10000; mapannounce "poring_w01","Poring Catcher : واحد فقط فيهم هو الحقيقي",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : الحقيقي اسمه [ Poring ] و الباقي جميهم مزورين",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : اذا قتلت البورينج الخاطء سوف يتم طردك من اللعبة",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : أول من يقتل البورينج الحقيقي هو الفائذ",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : هذا فقط هيا بنا نبدء .",0; goto L_Start; end; OnTimer570000: mapannounce "poring_w01","Poring Catcher : الوقت يمر . تبقي 30 ثانية",0; end; OnTimer600000: stopnpctimer; mapannounce "poring_w01","Poring Catcher : انتهي الوقت لم يجد احد البورينج الحقيقي",0; atcommand "@doommap"; killmonster "poring_w01","All"; sleep 3000; mapwarp "poring_w01","prontera",155,177; end; L_Start: mapannounce "poring_w01","Poring Catcher : 5",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 4",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 3",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 2",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 1",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : سوف نبدء الان",0; areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Pouring",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Proing",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poiring",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poing",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porning",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"PoriNg",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porong",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled"; end; } - script poringwin -1,{ OnMobKilled: dispbottom "Poring : مبروك لقد نلت مني ^^"; announce strcharinfo(0)+" won the Poring Catcher Event!",bc_all; getitem $rewarditem, $rewardamount; set PORING,1; atcommand "@doommap"; killmonster "poring_w01","All"; mapwarp "poring_w01","prontera",0,0; end; } - script poringlose -1,{ OnMobKilled: dispbottom "Poring Catcher : واهاهاه. يا لك من فاشل - انا لست البورينج الحقيقي"; percentheal -100,-100; end; } // -- Mapflags poring_w01 mapflag nowarp poring_w01 mapflag nowarpto poring_w01 mapflag noteleport poring_w01 mapflag nosave poring_w01 mapflag nomemo poring_w01 mapflag nobranch poring_w01 mapflag noloot poring_w01 mapflag noskill poring_w01 mapflag nopenalty Like that ? now the event is not working ==
-
so i remove mapannounce "poring_w01","Poring Catcher : تعال و قل لي أسمك",0; and the npc that give this prize?
-
now the prize auto go to the winner ? cuz mapannounce "poring_w01","Poring Catcher : تعال و قل لي أسمك",0; means come and tell me ur name for the prize to remove it . tell me ^^
-
now he never tell the winner's name and i dont see the prize o.o
-
could u make when the player find the real poring every one on the game go back automatic to prontera city? if no one was dead so every one can take a prize ==
-
am talking about the End t his one is when some one kill wrong poring == i think there is something on atcommand "@doommap"; mayby
-
First of all thats my bugged script //= Poring Catcher - Auto Event Script //===== By: ================================================================================ //= Washi - www.EarthBound-RO.com //===== Compatible With: ==================================================================== //= Any eAthena Version //===== Description: ======================================================================== //= Single NPC that starts automatically starts every hour. //===== Additional Comments: ================================================================ //= This script is a combenation of the Dice Event by [Mahina] //= and the origonal Poring Catcher Event by [Wild Karrd] //================================================================================ //=========== //= OnMinute - Change this to the minute you would like this script to load. [ LINE 22 ] //= getitem - Change this to the Item ID of your prize. [ LINE 118 ] //================================================================================ //=========== - script poring#announcer -1,{ OnInit: disablenpc "Poring Catcher Warper"; hideonnpc "Poring Catcher#evnt2"; end; OnMinute30: // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR. OnGMStart: announce "Poring Catcher : انه الوقت للعب البحث عن البورينج",0; killmonster "poring_w01","All"; sleep2 10000; announce "Poring Catcher : توجه الي برونتيرا اذا كنت تريد التسجيل",0; sleep2 10000; announce "Poring Catcher : بعد دقيقة 1 سوف يتوقف التسجيل",0; sleep2 10000; announce "Poring Catcher : ادخل البوابة الان اذا كنت تريد الدخول",0; enablenpc "Poring Catcher Warper"; initnpctimer; end; OnTimer30000: announce "Poring Catcher : تبقي 30 ثانية علي نهاية التسجيل",0; sleep2 5000; announce "Poring Catcher : توجه الي بورنتيرا سريعا للدخول",0; end; OnTimer50000: announce "Poring Catcher : تبقي 10 ثواني",0; end; OnTimer55000: announce "Poring Catcher : 5.",0; end; OnTimer56000: announce "Poring Catcher : 4.",0; end; OnTimer57000: announce "Poring Catcher : 3.",0; end; OnTimer58000: announce "Poring Catcher : 2.",0; end; OnTimer59000: announce "Poring Catcher : 1.",0; end; OnTimer60000: announce "Poring Catcher : انتهي الوقت",0; end; OnTimer61000: disablenpc "Poring Catcher Warper"; donpcevent "Poring Catcher#evnt2::OnEnable"; stopnpctimer; end; } prontera,147,165,0 warp Poring Catcher Warper 0,0,poring_w01,106,129 //-------------------------------------------------- pvp_n_4-5,101,96,6 script Poring Catcher 909,{ if (getgmlevel()<50) { player_here: mes "^FF0000[Poring Catcher Schedule]^000000"; mes "^0000FF[ 00:30AM ]^000000"; mes "^0000FF[ 04:30AM ]^000000"; mes "^0000FF[ 08:30AM ]^000000"; mes "^0000FF[ 12:30PM ]^000000"; mes "^0000FF[ 04:30PM ]^000000"; mes "^0000FF[ 08:30PM ]^000000"; next; mes "^FF0000[Poring Catcher]^000000"; mes "Current Prize:"; mes "----------------------"; mes "^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; close; } gm_only: if (getgmlevel() < 80) goto player_here; mes "^FF0000Poring Catcher Warper^000000"; mes "Yes, master?"; mes "What can I do for you today, master?"; next; switch(select("Start Event:Stop Event:Check Prize:Set Prize:Nothing")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Hello, GM ^008000"+strcharinfo(0)+"^000000!"; mes "Do you want to start the event?"; next; switch(select("Yes:Leave")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Here we go!"; close2; announce "GM "+strcharinfo(0)+" has started the Poring Catcher Event!",0; sleep 2000; donpcevent "poring#announcer::OnGMStart"; end; case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Ok, nothing changed!"; close; } case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Hello, GM ^008000"+strcharinfo(0)+"^000000!"; mes "Do you want to stop the event?"; mes " "; mes "^FF0000Note that you can only stop the event if it is already starting."; mes "If the event is still on the giving of directions, it couldn't be stopped!^000000"; next; switch(select("Yes:No")) { case 1: next; mes "^FF0000Poring Catcher^000000"; mes "Close this window to stop the event!"; close2; goto stopbygm; case 2: next; mes "^FF0000Poring Catcher^000000"; mes "Ok, nothing changed!"; close; } case 3: next; mes "^FF0000Poring Catcher^000000"; mes "Current Prize :"; mes "-------------------"; mes "^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; next; goto gm_only; case 4: next; mes "^FF0000Poring Catcher^000000"; mes "What will be the new reward?"; input .@itemid; if (getitemname(.@itemid) == "null" || getitemname(.@itemid) == "") {next; mes "^FF0000Poring Catcher^000000"; mes "The item is not found in the database.."; next; goto gm_only; } set $rewarditem, .@itemid; next; mes "^FF0000Poring Catcher^000000"; mes "How many ^008000"+getitemname($rewarditem)+"s^000000 should we give?"; input .@itemamount; if(.@itemamount <= 0) {next; mes "^FF0000Poring Catcher^000000"; mes "Please input a # greater than 0"; next; goto gm_only; } set $rewardamount,.@itemamount; next; mes "^FF0000Poring Catcher^000000"; mes "So, the winner will get ^008000"+$rewardamount+" "+getitemname($rewarditem)+"s"; next; goto gm_only; case 5: next; mes "^FF0000Poring Catcher^000000"; mes "Nothing Changed!"; close; } stopbygm: stopnpctimer; killmonster "poring_w01","All"; announce "Poring Catcher Event was stopped by GM "+strcharinfo(0)+"!",0; sleep 2000; mapwarp "poring_w01","prontera",149,160; end; } //-------------------------------------------------- poring_w01,100,127,4 script Poring Catcher#evnt2 715,{ //-------------------------------------------------- mes "[المهرج]"; if(PORING == 1) goto L_PORING; mes "تعال و قل لي اسمك"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[المهرج]"; mes "هل انت متئكد ان هذا اسم شخصيتك ؟"; close; } mes "[المهرج]"; mes "اذهب الي منزلك"; close2; announce "Poring Catcher : الكل يضحك , "+.@name$+". - هذا اللاعب حاول غش النظام",0; warp "prontera",155,177; end; L_PORING: mes "تعال و قل لي اسمك"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[المهرج]"; mes "هل انت متئكد ان هذا اسمك ؟"; close; } mes "[Poring Catcher]"; mes "مبروك لقد فذت"; close2; if (getitemname($rewarditem) == "null"){ set $rewarditem, 674; set $rewardamount, 4; } announce "Poring Catcher : لدينا فائذ, "+.@name$+". with "+$rewardamount+" "+getitemname($rewarditem)+"s",0; getitem $rewarditem, $rewardamount; // SET THE 20085 TO THE ITEM ID OF YOUR PRIZE warp "prontera",155,177; hideonnpc "Poring Catcher#evnt2"; end; OnEnable: mapannounce "poring_w01","Poring Catcher : في 10 دقائق . سوف استدعي 100 بورينج مختلف",0; initnpctimer; sleep2 10000; mapannounce "poring_w01","Poring Catcher : واحد فقط فيهم هو الحقيقي",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : الحقيقي اسمه [ Poring ] و الباقي جميهم مزورين",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : اذا قتلت البورينج الخاطء سوف يتم طردك من اللعبة",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : أول من يقتل البورينج الحقيقي هو الفائذ",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : هذا فقط هيا بنا نبدء .",0; goto L_Start; end; OnTimer570000: mapannounce "poring_w01","Poring Catcher : الوقت يمر . تبقي 30 ثانية",0; end; OnTimer600000: stopnpctimer; mapannounce "poring_w01","Poring Catcher : انتهي الوقت لم يجد احد البورينج الحقيقي",0; atcommand "@doommap"; killmonster "poring_w01","All"; sleep 3000; mapwarp "poring_w01","prontera",155,177; end; L_Start: mapannounce "poring_w01","Poring Catcher : 5",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 4",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 3",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 2",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 1",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : سوف نبدء الان",0; areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Pouring",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Proing",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poiring",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poing",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porning",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"PoriNg",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porong",1002,20,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled"; end; } - script poringwin -1,{ OnMobKilled: dispbottom "Poring : مبروك لقد نلت مني ^^"; set PORING,1; atcommand "@doommap"; killmonster "poring_w01","All"; mapannounce "poring_w01","Poring Catcher : تعال و قل لي أسمك",0; hideoffnpc "Poring Catcher#evnt2"; end; } - script poringlose -1,{ OnMobKilled: dispbottom "Poring Catcher : واهاهاه. يا لك من فاشل - انا لست البورينج الحقيقي"; warp "prontera",155,177; end; } // -- Mapflags poring_w01 mapflag nowarp poring_w01 mapflag nowarpto poring_w01 mapflag noteleport poring_w01 mapflag nosave poring_w01 mapflag nomemo poring_w01 mapflag nobranch poring_w01 mapflag noloot poring_w01 mapflag noskill poring_w01 mapflag nopenalty after the winner kills the right poring . ppl never die they could talk to the gift npc and take a winner prize to i want them when some one kill the right poring every one else die
-
i need a auto annoincment . simple one just every 30 min
-
Great Work
-
nice i will use it
-
If u can send it to me it will be better cuz u have alot of refiners
-
nothing happend ==
-
O.o can u send me it edited cuz am new on that things i will bug it
-
nothing happend o.O i want him refine any thing!!
-
Thanks alot how to make it wihout waiting 3 seconds ?
-
where ? == if i can add it to me cuz i rlly dont know where to add it cuz maybe i can bug the script
-
my tcg refiner is working good but he just refine the normal items . i want him able to refine every thing , accesorys , any thing // -- Script by Emistry, // -- 100% Success Per Refine NPC. // -- Cost 10 Poring Coins [ Default ] moc_para01,25,23,4 script Safe Refine 100% 826,{ set @npcname$,"[^FF0000 الحداد المحترف^000000 ]"; set @items,7227; // Item ID set @amount,15; // Amount E_Refiner: mes @npcname$; mes "اي أدا تريد أن تطورهة ؟ "; mes " "; mes "تكلف : ^FF0000"+@amount+" "+getitemname(@items)+"^000000"; mes "من أجل ^FF0000100% نجاح^000000 التطويرة الواحدة"; dispbottom "أقصي تطوير ألي + 10"; next; switch(select((getequiprefinerycnt(EQI_HEAD_TOP) == 10 || getequipisenableref(EQI_HEAD_TOP) == 0)?"":"قبعة [ ^0000FF"+getequipname(EQI_HEAD_TOP)+"^000000 ]", // Case 1: (getequiprefinerycnt(EQI_ARMOR) == 10 || getequipisenableref(EQI_ARMOR) == 0)?"":"درع صدر [ ^0000FF"+getequipname(EQI_ARMOR)+"^000000 ]", // Case 2: (getequiprefinerycnt(EQI_HAND_L) == 10 || getequipisenableref(EQI_HAND_L) == 0)?"":"اليد اليسري [ ^0000FF"+getequipname(EQI_HAND_L)+"^000000 ]", // Case 3: (getequiprefinerycnt(EQI_HAND_R) == 10 || getequipisenableref(EQI_HAND_R) == 0)?"":"اليد اليمني [ ^0000FF"+getequipname(EQI_HAND_R)+"^000000 ]", // Case 4: (getequiprefinerycnt(EQI_GARMENT) == 10 || getequipisenableref(EQI_GARMENT) == 0)?"":"الوشاح [ ^0000FF"+getequipname(EQI_GARMENT)+"^000000 ]", // Case 5: (getequiprefinerycnt(EQI_SHOES) == 10 || getequipisenableref(EQI_SHOES) == 0)?"":"خذاء [ ^0000FF"+getequipname(EQI_SHOES)+"^000000 ]", // Case 6: "^RR0000ألغاء^000000")) { Case 1: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_HEAD_TOP; delitem @items,@amount; next; goto E_Refiner; Case 2: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_ARMOR; delitem @items,@amount; next; goto E_Refiner; Case 3: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين.."; successrefitem EQI_HAND_L; delitem @items,@amount; next; goto E_Refiner; Case 4: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_HAND_R; delitem @items,@amount; next; goto E_Refiner; Case 5: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 to use my services.."; close; } mes "تين تين تين ..."; successrefitem EQI_GARMENT; delitem @items,@amount; next; goto E_Refiner; Case 6: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين ..."; successrefitem EQI_SHOES; delitem @items,@amount; next; goto E_Refiner; Case 7: mes @npcname$; mes "تعال مجددا عندما تغير رئيك"; close; } } ^^
-
i need a player service npc that the player could save and storage ,reset, and more things than kafra when saving he save on his standing point
-
prontera,200,180,4 script Prize Sender Test 123,{ if(!getgmlevel())end; set .@itemtoonlineplayers$,strcharinfo(0); mes "Input an item ID."; input .@item; if (getitemname(.@item) == "null") { mes "Invalid item "+.@item+"."; close; } mes "Input an amount."; input .@amount; if (.@amount == 0 || .@amount > 30000) { mes "Invalid amount "+.@amount+"."; close; } mes " "; mes "Giving "+.@amount+"x "+getitemname(.@item)+" to all players."; close2; set .@size, query_sql("SELECT `account_id` FROM `char` WHERE `online` = 1",.@aid); for(set .@i,0; .@i<.@size; set .@i,.@i+1) { getitem .@item,.@amount,.@aid[.@i]; } end; not working with me both didn't work no no its working thannks guys