viewing paste Unknown #49124 | 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 26 27 28 29 30 31 32 33 34 35 36 37
prontera.gat,159,185,5 script PVP Warper 802,{
mes "[PVP Warper]";
mes "Blah";
close2;
warp anthell01,0,0;
end;
OnPCLoginEvent:
if(Karma1 == 0){
set Karma2,Karma2+0; set Karma1,1;} else{
end;}
OnInit:
setarray .MapName$[0],"anthell01";
end;
OnPCLoadMapEvent:
if(Karma2 >= 100){
bonus bAllStats,3;
bonus bAtkRate,10;
bonus bMatkRate,10;
}
end;
OnPCDieEvent:
if( strcharinfo(3) == .MapName$[0]){
dispbottom rid2name(killerrid)+" just killed you.";
dispbottom  "You have lost 5 Karma Points.";
set Karma2, Karma2 -5;
dispbottom ""+Karma2+" Karma Points";
}
end;
OnPCKillEvent:
if( strcharinfo(3) == .MapName$[0]){
dispbottom  "You have gained 1 Karma Point.";
atcommand "@mute 5 "+strcharinfo(0)+"";
set Karma2, Karma2 +1;
dispbottom ""+Karma2+" Karma Points";
}
end;
}
Viewed 1205 times, submitted by Pneuma.