Event Pac-man

[cumbe11 1]

someone still has that old Pac-Man event eAthena ...

 

as has the video ..

 

also I put a Pac-Man map to perhaps reformulate the event

 

 

 

 

Mapa: http://www.mediafire.com/download/dmywjciyoil/pacmanlv1.7z

 

 

 

video-

[minx123 2]

 

someone still has that old Pac-Man event eAthena ...

 

as has the video ..

 

also I put a Pac-Man map to perhaps reformulate the event

 

 

 

 

Mapa: http://www.mediafire.com/download/dmywjciyoil/pacmanlv1.7z

 

 

 

video-

 

 

 

here the script i found.. but need to fix for compatible with hercules.

 

prontera,216,165,4	script Pacman	736,{if ( getarraysize($@pb_aidlist) >= 100 ) {mes "I'm sorry, the room is full";close;}percentheal 100, 100;warp "turbo_n_4", 12, 267;set $@pb_aidlist[ getarraysize($@pb_aidlist) ], getcharid(3);end;}- script Pacman -1,{OnInit:disablenpc "Pacman";end;OnWhisperGlobal:if ( getgmlevel() < 99 ) end;OnClock0145: // these are time to start eventOnClock0445:OnClock0745:OnClock1045:OnClock1345:OnClock1645:OnClock1945:OnClock2245:announce "Pacman!!!: Are you ready to join Pacman event???", 0;enablenpc "Pacman";mapwarp "turbo_n_4", "prontera", 163,192;sleep 4000;announce "Pacman: Come join at the center of the Prontera (163, 192)", 0;sleep 6000;announce "Pacman: This Npc will hide after this 1 minute", 0;sleep 20000;announce "Pacman: Last 30 second", 0;sleep 10000;announce "Pacman: Last chance for you to join...", 0;sleep 10000;announce "Pacman: Last 10 second to register", 0;sleep 5000;announce "Pacman: 5", 0;sleep 1000;announce "Pacman: 4", 0;sleep 1000;announce "Pacman: 3", 0;sleep 1000;announce "Pacman: 2", 0;sleep 1000;announce "Pacman: 1", 0;sleep 1000;announce "Pacman: Time is up...I will come again 3 hour later..", 0;disablenpc "Pacman";mapannounce "turbo_n_4", "Welcome to Pacman event", 0;sleep 3000;mapannounce "turbo_n_4", "This is an insane event", 0;sleep 3000;mapannounce "turbo_n_4", "Just don't get eaten by Pacman!!", 0;sleep 3000;mapannounce "turbo_n_4", "Stay here as long as YOU can!!!!", 0;sleep 3000;mapannounce "turbo_n_4", "The LAST MAN STANDING will be the WINNER", 0;sleep 3000;mapannounce "turbo_n_4", "event will start in 3", 0;sleep 1000;mapannounce "turbo_n_4", "2...", 0;sleep 1000;mapannounce "turbo_n_4", "1...", 0;sleep 1000;mapannounce "turbo_n_4", "Its time to hide !!", 0;initnpctimer;set .stop, 0;while (1) {monster "turbo_n_4", 0,0, "Pacman!!!", 1929, 25 + .@extra;sleep 5000;if ( .stop ) end;set .@extra, .@extra + rand(1,5);set .@round, .@round +1;}end;OnTimer500:stopnpctimer;while ( getarraysize($@pb_aidlist) > 1 ) {sleep 500;for ( set .@i, 0; .@i < getarraysize($@pb_aidlist); set .@i, .@i +1 ) {if ( isloggedin(.aidlist[.@i] == 0 ) ) {deletearray $@pb_aidlist[.@i], 1;set .@i, .@i -1;}else {attachrid $@pb_aidlist[.@i];if ( strcharinfo(3) != "turbo_n_4" || hp == 0 ) {deletearray $@pb_aidlist[.@i], 1;set .@i, .@i -1;}}}}detachrid;set .stop, 1;killmonsterall "turbo_n_4";if ( getarraysize($@pb_aidlist) == 1 ) {announce "congratulations ~ the winner is "+ rid2name($@pb_aidlist), 0;sleep 5000;announce rid2name($@pb_aidlist) +" Win 1 Splendide Coin", 0;attachrid $@pb_aidlist;getitem 6081, 1;warp "prontera", 148,172;deletearray $@pb_aidlist;}else {announce "nobody is a winner, too bad", 0;}end;}turbo_n_4 mapflag nowarpturbo_n_4 mapflag nowarptoturbo_n_4 mapflag noteleportturbo_n_4 mapflag nosave SavePointturbo_n_4 mapflag noskillturbo_n_4 mapflag nomemo

[REKT 10]

@@AnnieRuru

[AnnieRuru 957]

not interested

its just a game can be play by 1 person

 

I prefer to write pvp/bg/event scripts that can enjoy by many players play together,

that's the true spirit of MMO

 

 

also this map

https://www.eathena.ws/board/index.php?showtopic=205672

actually do feels more like a pac-man map ...