Wandering Poring v1.0

Just set an additional label in which you do all necessary calculations and then fire the OnAtcommand label.

Or even better: make the OnAtcommand label just process if there's been a map specified and your additional label set the map, then call a new label called OnEvent or so. Example:

Code:
-	script	poringbind	-1,{OnInit:    unbindatcmd "poring";    bindatcmd("poring","poringbind::OnAtcommand",20,90);    end;    OnAtcommand:if(getgroupid() < 20) { end; }set .map$,.@atcmd_parameters$[0];  if(@map$ == "") {dispbottom "Syntax: @poring <mapname>";dispbottom "Five Porings will spawn on the map you choose. Recommended usage for this event is 3-5 times per day.";dispbottom "NOTE: Do NOT use capitals in the map name otherwise no Poring will spawn!";end;}donpcevent strnpcinfo(3)+"::OnEvent";end; OnMinute01: // Put your custom triggers hereset .map$, "yourmapname";donpcevent strnpcinfo(3)+"::OnEvent";end;OnEvent:monster .map$,0,0,"Wandering Poring",1002,5,"poringbind::OnKill";announce "[Wandering Poring] : 5x Wandering Porings have been sighted on the map: "+.map$+". The first person to find and kill each will receive an award!",0;end; OnKill:// Update Here!set .@prize,rand(1,5);announce "[Wandering Poring] : "+strcharinfo(0)+" has captured a Wandering Poring on the map "+strcharinfo(3)+"!",0;// Syntax: Item ID / Quantityif(.@prize == 1) { getitem 501,1; }if(.@prize == 2) { getitem 502,1; }if(.@prize == 3) { getitem 503,1; }if(.@prize == 4) { getitem 504,1; }if(.@prize == 5) { getitem 505,1; }// 25 Poring Coins Base Prizegetitem 7539,25;end; }
 
I can't start the event typing @poring <mapname>

and map server shows: 

erro.jpg


How can i fix it?

 
You haven't separed the NPC header in tabs. Correct separation is (change any <TAB> to a tabulation space):

Code:
-<TAB>script<TAB>poringbind<TAB>-1,{
 
i have poring when using @poring invek the monster got.

but when auto i set it at invek the monster no respawn

and how to set to 5 hour?

this my script @@jaBote

Code:
-	script	poringbind	-1,{OnInit:    unbindatcmd "poring";    bindatcmd("poring","poringbind::OnAtcommand",20,90);    end;    OnAtcommand:if(getgroupid() < 20) { end; }set .map$,.@atcmd_parameters$[0];  if(@map$ == "") {dispbottom "Syntax: @poring <mapname>";dispbottom "Five Porings will spawn on the map you choose. Recommended usage for this event is 3-5 times per day.";dispbottom "NOTE: Do NOT use capitals in the map name otherwise no Poring will spawn!";end;}donpcevent strnpcinfo(3)+"::OnEvent";end; OnMinute30: // Put your custom triggers hereset .map$, "payon";donpcevent strnpcinfo(3)+"::OnEvent";end;OnEvent:monster .map$,0,0,"Wandering Poring",1502,1,"poringbind::OnKill";announce "[Wandering Poring] : Pori Pori have been sighted on the map: "+.map$+" . The first person to find and kill each will receive an award! x5 TCG @ Event Card , x3 Bronze Coin , x3k Gold",0;end; OnKill:// Update Here!set .@prize,rand(1,5);announce "[Wandering Poring] : "+strcharinfo(0)+" has captured a Wandering Poring on the map "+strcharinfo(3)+"!",0;// Syntax: Item ID / Quantityif(.@prize == 1) { getitem 501,1; }if(.@prize == 2) { getitem 502,1; }if(.@prize == 3) { getitem 503,1; }if(.@prize == 4) { getitem 504,1; }if(.@prize == 5) { getitem 505,1; }// 25 Poring Coins Base Prizegetitem 673,3;getitem 7227,5;getitem 696,3000;end; }
ej0uw.png

 
Last edited by a moderator:
Back
Top