Jump to content

Jaburak

Members
  • Posts

    1125
  • Joined

  • Days Won

    31

Everything posted by Jaburak

  1. skill_db.txt 405,7,6,2,0,0x1,0,1,1,no,0,0,4,magic,0, PF_SPIDERWEB,Fiber Lock skill_unit_db.txt 405,0xb7, , 0, 1,1000,enemy, 0x000 //PF_SPIDERWEB
  2. Yes, I did that and checked it out. I added a pvp-map to restriction-zone 1 ( in restrict.txt ) and set the item to 46 ( see below ). // The equipment/items/cards restriction file // here you define which items may not be used at PvP / GvG // format: <item id>,<mode> // mode // 1 - restricted in normal maps // 2 - restricted in PVP // 4 - restricted in GVG // 8 - restricted in Battlegrounds // Restricted zones - they're configured by 'restricted <number>' mapflag // 32 - restricted in zone 1 // 64 - restricted in zone 2 // 128 - restricted in zone 3 // 256 - restricted in zone 4 // 512 - restricted in zone 5 // 1024 - restricted in zone 6 // 2048 - restricted in zone 7 //Examples: //1201,1 you can't use KNIFE(ID 1201) on normal maps //608,4 you can't use Yggdrasil Seed(ID 608) on both GvG and WoE Castles //4174,6 Forbid Deviling Card in every PVP or GVG map, and during woes. //501,32 you can't use Red Potion on map marked as 'restricted zone 1' //502,64 you can't use Orange Potion on map marked as 'restricted zone 2' //503,128 you can't use Yellow Potion on map marked as 'restricted zone 3' // you can even mix modes //519,322 (256+64+2) you can't use Milk on PVP, and maps marked as 'restricted zone 2' and 'restricted zone 4' Equipment is not stripped, its bonus and effects are only disabled. I need a code that fits to Rev.: 17205 and higher and an explanation where to put it. Best Regards UPDATE: Just checked it again with a bonus of 500 to all stats in the costume headgear to make myself sure. The bonus is disabled but the costume headgear is not stripped. Best Regards Yes it's official, item effect will disabled inside the map.
  3. Jaburak

    map

    If you're going to add it in new script then +$@PlayerKiller$+" has pwned +$@PlayerKilled$+! is for what?
  4. Jaburak

    map

    announce ""+$@PlayerKiller$+" has pwned "+$@PlayerKilled$+" !!",bc_map; Or mapannounce "prontera",""+$@PlayerKiller$+" has pwned "+$@PlayerKilled$+" !!",bc_all;
  5. How about adding 'Enlarge Weight Limit' skill in the item script?
  6. Did you set the map in trunk/conf/mapflag/restricted.txt?
  7. db/item_db.txt // Items Database // // Structure of Database: // ID,AegisName,Name,Type,Price,Sell,Weight,ATK,DEF,Range,Slot,Job,Upper,Gender,Loc,wLV,eLV,Refineable,View,{ Script },{ OnEquip_Script },{ OnUnequip_Script } For example; Apple has 20 weights. 512,Apple,Apple,0,15,,20,,,,,0xFFFFFFFF,7,2,,,2,,,{ itemheal rand(16,22),0; },{},{} If I want to change the weight to 99; it will become. 512,Apple,Apple,0,15,,99,,,,,0xFFFFFFFF,7,2,,,2,,,{ itemheal rand(16,22),0; },{},{}
  8. Srsly? It works fine on my test server.
  9. Final; //= 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,{ 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
  10. Sorry, it's really hard to understand the language in your script. But try this one; //= 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 : مبروك لقد نلت مني ^^"; 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
  11. This; //= 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; } 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
  12. Remove these lines; hideoffnpc "Poring Catcher#evnt2"; mapannounce "poring_w01","Poring Catcher : تعال و قل لي أسمك",0; //-------------------------------------------------- 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;
  13. Yes; the winner will received the prize automatically and warp him/her to prontera.
  14. - 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"; mapannounce "poring_w01","Poring Catcher : تعال و قل لي أسمك",0; mapwarp "poring_w01","prontera",0,0; hideoffnpc "Poring Catcher#evnt2"; end; }
  15. - script poringwin -1,{ OnMobKilled: dispbottom "Poring : مبروك لقد نلت مني ^^"; set PORING,1; atcommand "@doommap"; killmonster "poring_w01","All"; mapannounce "poring_w01","Poring Catcher : تعال و قل لي أسمك",0; mapwarp "poring_w01","prontera",0,0; hideoffnpc "Poring Catcher#evnt2"; end; }
  16. Hello sir, have you tried cell_basilica?
  17. Then remove; atcommand "@doommap";
  18. How to diffed a client? http://rathena.org/board/topic/53421-weediffgen/
  19. OnMobKilled: dispbottom "Poring Catcher : واهاهاه. يا لك من فاشل - انا لست البورينج الحقيقي"; percentheal -100,-100; end; }
  20. - script autoannouncer -,{ OnMinute00: OnMinute30: announce "Your Message Here!",bc_all; sleep2 10000; announce "Put Your Message Here!",bc_all; }
  21. http://rathena.org/board/topic/82352-vip-manager/?p=197718
  22. Please try to refrain from double posting. If someone knows how to do your request; they will reply asap. Check out my reply here; http://rathena.org/board/topic/82352-vip-manager/?p=197718
×
×
  • Create New...