diff options
Diffstat (limited to 'npc/020-1/rockscissor.txt')
-rw-r--r-- | npc/020-1/rockscissor.txt | 96 |
1 files changed, 0 insertions, 96 deletions
diff --git a/npc/020-1/rockscissor.txt b/npc/020-1/rockscissor.txt deleted file mode 100644 index d4a9d6f6..00000000 --- a/npc/020-1/rockscissor.txt +++ /dev/null @@ -1,96 +0,0 @@ -// author: Lien -// reviewed by Pjotr Orial and Jenalya -//##################################### -//== NPC [Player] # -// anyone want to do a funny bet # -// ------------------------ # -// Rock-Paper-Scissors can be playing # -// I hope that'll make fun # -// ------------------------ # -//##################################### - -//020-1.gat,74,78,0 script Gobmel 189, { - //var - set @NPC_name$, "[Gobmel]"; - set @NPC_point, 0; - set @PC_point, 0; - set @gamblerun, 0; - setarray @CHOOSE_PC$, "Scissors", "Paper", "Rock"; - setarray @CHOSE_ID, 0, 1, 2; - //0 : scissors; 1: Paper; 2: Rock; - // 0 cut 1 and 1 cover 3 and break 0 ... - //var ends - - mes @NPC_name$; - mes "\"Hello " + strcharinfo(0) + "! Do you want to do a little party of Rock-Paper-Scissors and bet some gold?\""; - menu - "Yes, I want.", L_RPS, - "Well, maybe later.", -; - close; - -L_RPS: - - mes @NPC_name$; - mes "\"How much money do you want to bet?\""; - input @MONEY_BET; - if(zeny < @MONEY_BET) goto L_poor; - set zeny, zeny - @MONEY_BET; - -L_Start: - if(@gamblerun == 3) goto L_finish; - //what chose the NPC ? - - set @CHOOSE_NPCID, rand(2); - - mes @NPC_name$; - mes "[ " + @gamblerun + "/3 ]"; - mes "\"1... 2... 3...\""; - mes ""; - mes"[chose what sign you do]"; - mes ""; - menu - @CHOOSE_PC$[0], -, - @CHOOSE_PC$[1], -, - @CHOOSE_PC$[2], -; - - set @CHOSEN, @menu -1; - mes "Gobmal: " + @CHOOSE_PC$[@CHOOSE_NPCID]; - mes strcharinfo(0)+" " + strcharinfo(0)+ ": " +@CHOOSE_PC$[@CHOSEN]; - mes ""; - if(@CHOSEN == @CHOOSE_NPCID) goto L_Start; - if(@CHOSEN == 0 && @CHOOSE_NPCID == 2) goto L_Lost; - if(@CHOSEN == 1 && @CHOOSE_NPCID == 0) goto L_Lost; - if(@CHOSEN == 2 && @CHOOSE_NPCID == 1) goto L_Lost; -L_Win: - set @PC_point, @PC_point + 1; - set @gamblerun, @gamblerun + 1; - mes "Oh no! I have lost."; - mes ""; - next; - goto L_Start; - -L_poor: - mes @NPC_name$; - mes "\"Go away from me...\""; - close; - -L_Lost: - set @NPC_point, @NPC_point + 1; - set @gamblerun, @gamblerun + 1; - mes "I have won!"; - mes ""; - next; - goto L_Start; - -L_finish: - if(@PC_point > @NPC_point ) goto L_Won; - mes @NPC_name$; - mes "\"Nice! I have won, give me your gp!\""; - close; -L_Won: - mes @NPC_name$; - mes "\"Here is my money.\""; - set zeny, zeny + @MONEY_BET*2; - close; -} - |