diff options
| author | Ben Longbons <b.r.longbons@gmail.com> | 2011-06-18 21:58:47 -0700 |
|---|---|---|
| committer | Ben Longbons <b.r.longbons@gmail.com> | 2011-06-19 14:19:55 -0700 |
| commit | bae4b92e560c2694eaaf0e8b4d9e95e56204471b (patch) | |
| tree | 4acc120f6a94cfbf9694bf344658493de5aaa67b /world/map/npc/020-1/rockscissor.txt | |
| parent | 319f80526f8585ecadaec986e37c9bd326f4d363 (diff) | |
| download | serverdata-bae4b92e560c2694eaaf0e8b4d9e95e56204471b.tar.gz serverdata-bae4b92e560c2694eaaf0e8b4d9e95e56204471b.tar.bz2 serverdata-bae4b92e560c2694eaaf0e8b4d9e95e56204471b.tar.xz serverdata-bae4b92e560c2694eaaf0e8b4d9e95e56204471b.zip | |
Move to a subdirectory
Diffstat (limited to 'world/map/npc/020-1/rockscissor.txt')
| -rw-r--r-- | world/map/npc/020-1/rockscissor.txt | 96 |
1 files changed, 96 insertions, 0 deletions
diff --git a/world/map/npc/020-1/rockscissor.txt b/world/map/npc/020-1/rockscissor.txt new file mode 100644 index 00000000..d4a9d6f6 --- /dev/null +++ b/world/map/npc/020-1/rockscissor.txt @@ -0,0 +1,96 @@ +// 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; +} + |