viewing paste Unknown #9761 | Athena

Posted on the | Last edited on
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
prontera,100,100,3      script  Broadcaster     -1,{
set .@name$,"Broadcaster";
set .@cost,100000;
 
mes .@name$;
mes "El servicio quest "+.@cost+"";
mes .@name$;
mes "Estas dispuesto a pagarlo?";
        switch(select("~ Si: ~ No")){
        case 1:
        if (zeny < .@cost){
                mes .@name$;
                mes "Tienes "+.@cost+", no es suficiente..";
                close;
       
        }
                input .@mensaje$;
                next;
                atcommand "@broadcast "+ .@mensaje$;
                        end;
        case 2:
                mes .@name$;
                mes "";
                close;
        }
 
}
Viewed 971 times, submitted by Dynasty.