error for automated events

[Mootie]

//===== rAthena Script =======================================
//= Poring Summoner
//===== By: ==================================================
//= Bahmut (Made it automated)
//= MoonlightRO (Original)
//===== Current Version: =====================================
//= 1.4
//===== Compatible With: =====================================
//= TXT & SQL
//===== Link to orginal: =====================================
//= http://www.eathena.ws/board/index.php?showtopic=236779
//============================================================
- script Poring Summoner -1,{
OnInit:
 //---- NPC Config -----
 set .ItemID,1000;
 set .SpecialPorings,2;
 set .NormalPorings,2;
 //---------------------
 initnpctimer;
 end;

OnSpecialKill:
 set .SpecialPorings[1],.SpecialPorings[1]-1;
 announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map;
 getitem .ItemID,1;
 goto PoringCount;

OnNormalKill:
 set .NormalPorings[1],.NormalPorings[1]-1;
 goto PoringCount;

PoringCount:
 announce "Special Poring: " + .SpecialPorings[1] + " || Normal Poring: " + .NormalPorings[1],bc_map;
 if(!.SpecialPorings[1]) goto EndEvent;
 end;

OnTimer216000000:
RestartEvent:
 killmonster .Map$,"All";
 set .Event,0;
 set .SpecialPorings[1],0;
 set .NormalPorings[1],0;

 removemapflag .Map$,mf_noskill;
 set $@ran, rand(1,10);
 if ($@ran == 10) set .Map$,"lighthalzen";
 if ($@ran == 9) set .Map$,"louyang";
 if ($@ran == 8) set .Map$,"comodo";
 if ($@ran == 7) set .Map$,"xmas";
 if ($@ran == 6) set .Map$,"aldebaran";
 if ($@ran == 5) set .Map$,"izlude";
 if ($@ran == 4) set .Map$,"payon";
 if ($@ran == 3) set .Map$,"geffen";
 if ($@ran == 2) set .Map$,"morocc";
 if ($@ran == 1) set .Map$,"prontera";
 setmapflag .Map$,mf_noskill;
 monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill";
 monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill";
 set .SpecialPorings[1],.SpecialPorings;
 set .NormalPorings[1],.NormalPorings;
 announce "The Poring Event has begun!",bc_all;
 announce "Location: " + .Map$,bc_all;
 announce "Special Poring: " + .SpecialPorings,bc_all;
 announce "Normal Poring: " + .NormalPorings,bc_all;

 setnpctimer 0;
 end;
}

if not can you guys help me to make this RA

Edited November 9, 2012 by Emistry
Please use [CODEBOX] or Attachments for long contents.

[Mystery]

Seems like your script is really outdated since I have the most recent one for rAthena without any errors going on (owner). Since this script isn't really up to part with my most recent one, I should add more new features to my recent one :> Though, I think it'll be a little complicated :<

[Ryokem]

At whom are you talking to?

I just optimized his script without even worry if it was up-to-date or not, honestly.

Just post your own "featured" script if you think ours is odd. Maybe he will like your customizations.

Edited November 9, 2012 by Ryokem

[Mystery]

At whom are you talking to?

I just optimized his script without even worry if it was up-to-date or not, honestly.

Just post your own "featured" script if you think ours is odd. Maybe he will like your customizations.

No, not to worry . I was referring to Mootie when he first posted the script (first post) saying that it was outdated but everyone helped him to get it to work <3

[Ryokem]

Hopefully it works, 'cause it's pretty late here, can be I still made typos or stupid errors with ease, also 'cause I can't really try script on my own lacking of a server test.

[Mootie]

At whom are you talking to?

I just optimized his script without even worry if it was up-to-date or not, honestly.

Just post your own "featured" script if you think ours is odd. Maybe he will like your customizations.

No, not to worry . I was referring to Mootie when he first posted the script (first post) saying that it was outdated but everyone helped him to get it to work <3

Hopefully it works, 'cause it's pretty late here, can be I still made typos or stupid errors with ease, also 'cause I can't really try script on my own lacking of a server test.

thx for the help guys really appreciate it. i found bunch of script likes this in many forum sites that was only compatible in eathena or 3ceam so far so i manage to try to compatible such a simple script like this to rathena