summaryrefslogblamecommitdiff
path: root/world/map/npc/functions/slot_machine.txt
blob: 4081adcaec2f4bd9a44574d958382b240fca4b58 (plain) (tree)
1
2
3
4
5
6
7
8
9
10

  

                            





                            

       



















                                                                 
       


                    
         

                      
 
//

function|script|SlotMachine|
{
    mes "Pull the lever...";
    next;
    menu
        "Pull", L_Play,
        "Maybe later", -;
    close;

L_Play:
    if(countitem("CasinoCoins") < 1)
        goto L_NoCoin;
    delitem "CasinoCoins", 1;
    set @Temp1,rand(7);
    set @Temp2,rand(7);
    set @Temp3,rand(7);
    mes "Numbers: " + @Temp1 + "/" + @Temp2 + "/" + @Temp3 + ".";
    next;

    if(@Temp1 != @Temp2)
        goto L_Lost;
    if(@Temp2 != @Temp3)
        goto L_Lost;
    if(@Temp1 != @Temp3)
        goto L_Lost;
    mes "Congratulations! You won!";
    mes "You get 10 casino coins";
    getitem "CasinoCoins", 10;
    close;

L_Lost:
    mes "You lost!";
    close;

L_NoCoin:
    mes "Insert coin";
    close;
}