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 1317 times, submitted by Emistry.