viewing paste Unknown #429 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
- script rates -1,{
 
OnSpawn:
monster .Map$,0,0,"Coin",1002,1,strnpcinfo(0)+"::OnItemGet";
end;
 
OnItemGet:
if( rand(101) < .Rate ) getitem 674,1;
if( rand(101) < .Rate ) getitem 512,1;
doevent strnpcinfo(0)+"::OnSpawn";
end;
 
OnInit:
// What Map for Event to take Place ?
set .Map$,"dic_dun02";
// How many % in order to get Item upon killed Monster ?
set .Rate,15;
//Summons monster
monster .Map$,0,0,"Coin",1002,1,strnpcinfo(0)+"::OnItemGet";
end;
}
 
//Mapflags
dic_dun02   mapflag noskill
dic_dun02   mapflag noloot
Viewed 1550 times, submitted by Streusel.