viewing paste reloadscript + free cash | 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
-       script  sample_reloadscript     -1,{
 
        OnInit:
                bindatcmd "reloadscript",strnpcinfo(0)+"::OnAtcommand";
                end;
               
        OnAtcommand:
                if ( getgmlevel() >= 99 ) {
                        $reloadscript = 1;
                        atcommand "@reloadscript";
                }
                end;
               
        OnInit:
                if ( $reloadscript ) {
                        $reloadscript = 0;
                        addrid( 0 );
                        #CASHPOINTS += 12345;
                        dispbottom "You gained 12345 Point.";
                }
                end;
}
Viewed 967 times, submitted by Emistry.