diff options
author | Dennis Friis <peavey@placid.dk> | 2008-04-02 15:09:18 +0000 |
---|---|---|
committer | Dennis Friis <peavey@placid.dk> | 2008-04-02 15:09:18 +0000 |
commit | 97bb21a79949779df76269b087f3bce7ef8179ee (patch) | |
tree | 08b3bdee2f3596581dd8d8f051afd37ee648cee7 /npc/tulimshar-casino | |
parent | dafdbbe9f1db3e6943003a79a6e23c00da2f2fe1 (diff) | |
download | tmwa-97bb21a79949779df76269b087f3bce7ef8179ee.tar.gz tmwa-97bb21a79949779df76269b087f3bce7ef8179ee.tar.bz2 tmwa-97bb21a79949779df76269b087f3bce7ef8179ee.tar.xz tmwa-97bb21a79949779df76269b087f3bce7ef8179ee.zip |
initial checkin
Diffstat (limited to 'npc/tulimshar-casino')
-rw-r--r-- | npc/tulimshar-casino/casino.txt | 360 |
1 files changed, 360 insertions, 0 deletions
diff --git a/npc/tulimshar-casino/casino.txt b/npc/tulimshar-casino/casino.txt new file mode 100644 index 0000000..dae9324 --- /dev/null +++ b/npc/tulimshar-casino/casino.txt @@ -0,0 +1,360 @@ +// Warps room 1 +new_8-1.gat,45,24 warp upstairs 0,2,new_8-1.gat,65,25 +new_8-1.gat,25,36 warp outside 0,2,new_3-1.gat,33,73 +new_3-1.gat,32,72 warp inside 1,0,new_8-1.gat,25,34 +// Warps room 2 +new_8-1.gat,65,25 warp downstairs 0,1,new_8-1.gat,42,25 +new_8-1.gat,68,22 warp tocasino 2,0,new_8-1.gat,32,72 +new_8-1.gat,67,31 warp tobedroom1 1,1,new_8-1.gat,102,23 +new_8-1.gat,76,31 warp tobedroom2 1,1,new_8-1.gat,130,23 +// Warps room 3 +new_8-1.gat,102,22 warp bedroom1tohall 2,0,new_8-1.gat,67,29 +// Warps room 4 +new_8-1.gat,130,22 warp bedroom2tohall 2,0,new_8-1.gat,76,29 +// Warps room 5 +new_8-1.gat,32,74 warp tohall 1,0,new_8-1.gat,68,23 + +new_8-1.gat,26,26,0 shop InnKeeper 112,539:175,513:20,519 + +new_8-1.gat,103,26,0 script Waitress 118,{ + mes "[Rebecca]"; + mes "Would you like to rest? It's only 100 gp."; + next; + + menu "Yes",-,"No",L_No; + mes "Sleep well!"; + next; + + if (zeny < 100) goto L_NoMoney; + set zeny,zeny-100; + heal 10000,10000; + close; + +L_No: + mes "See you."; + close; + +L_NoMoney: + mes "Hey! You don't have enough money!"; + close; +} + +new_8-1.gat,134,23,0 script Worker 117,{ + mes "[Valdo]"; + mes "Please let me work, I'm really in a hurry!"; + close; +} + +new_8-1.gat,37,65,0 script Slot1 127,{ + mes "Pull the lever..."; + next; + + if(countitem(503) < 1) goto L_NoCoin; + delitem 503,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 503,10; + close; + +L_Lost: + mes "You lost!"; + close; + +L_NoCoin: + mes "Insert coin"; + close; +} + +new_8-1.gat,39,65,0 script Slot2 127,{ + mes "Pull the lever..."; + next; + + if(countitem(503) < 1) goto L_NoCoin; + delitem 503,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 503,10; + close; + +L_Lost: + mes "You lost!"; + close; + +L_NoCoin: + mes "Insert coin"; + close; +} + +new_8-1.gat,41,65,0 script Slot3 127,{ + mes "Pull the lever..."; + next; + + if(countitem(503) < 1) goto L_NoCoin; + delitem 503,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 503,10; + close; + +L_Lost: + mes "You lost!"; + close; + +L_NoCoin: + mes "Insert coin"; + close; +} + +new_8-1.gat,32,67,0 shop MoneyChanger 124,503:10 + +new_8-1.gat,28,63,0 script BlackJack 107,{ + mes "[Croupier]"; + mes "Would you like to play Black Jack?"; + mes "You will need 15 casino coins"; + next; + + menu "Yes",-,"No",L_No; + if(countitem(503) < 15) goto L_NoCoin; + delitem 503,15; + set @croupier,rand(0, 4); + set @croupier,@croupier + 17; + set @player,rand(4, 20); + mes "You got " + @player + " with your cards."; + mes "Do you want another card?"; + next; + + menu "Yes",L_Another,"No",L_End; + +L_Another: + set @player,@player+rand(2, 11); + if (@player > 21) goto L_Lost; + mes "You got " + @player + " with your cards."; + mes "Do you want another card?"; + next; + + menu "Yes",L_Another,"No",L_End; +L_End: + if (@player < @croupier) goto L_Lost; + mes "Congratulations, you won!"; + mes "I had " + @croupier + ""; + mes "You get 50 casino coins"; + getitem 503,50; + close; + +L_No: + mes "As you wish"; + close; + +L_NoCoin: + mes "You need at least 15 coins"; + close; + +L_Lost: + mes "I'm sorry but you lost"; + mes "You got " + @player + " with your cards."; + mes "I had " + @croupier + ""; + close; +} + +new_8-1.gat,22,69,0 script Roulette 107,{ + mes "Good evening monsieur..."; + mes "How much would you like to bet?"; + next; + + menu "Maybe I'll play later",L_Later,"1 coin",-,"5 coins",L_b5,"10 coins",L_b10,"50 coins",L_b50,"100 coins",L_b100; + set @bet,1; + goto L_Check; +L_b5: + set @bet,5; + goto L_Check; +L_b10: + set @bet,10; + goto L_Check; +L_b50: + set @bet,50; + goto L_Check; +L_b100: + set @bet,100; + goto L_Check; + +L_Check: + if(countitem(503) < @bet) goto L_NoCoin; + delitem 503,@bet; + menu "Choose a color",-,"Choose a number",L_Number; + menu "Black",-,"Red",-; + set @color,rand(2); + if(@color == 1) goto L_Lost; + mes "You won!"; + getitem 503,@bet * 2; + close; + +L_Number: + menu "0",-,"00",L00,"1",L1,"2",L2,"3",L3,"4",L4,"5",L5,"6",L6,"7",L7, + "8",L8,"9",L9,"10",L10,"11",L11,"12",L12,"13",L13,"14",L14,"15",L15, + "16",L16,"17",L17,"18",L18,"19",L19,"20",L20,"21",L21,"22",L22, + "23",L23,"24",L24,"25",L25,"26",L26,"27",L27,"28",L28,"29",L29, + "30",L30,"31",L31,"32",L32,"33",L33,"34",L34,"35",L35,"36",L36; + set @number,0; + goto L_CheckNumber; +L00: + set @number,37; + goto L_CheckNumber; +L1: + set @number,1; + goto L_CheckNumber; +L2: + set @number,2; + goto L_CheckNumber; +L3: + set @number,3; + goto L_CheckNumber; +L4: + set @number,4; + goto L_CheckNumber; +L5: + set @number,5; + goto L_CheckNumber; +L6: + set @number,6; + goto L_CheckNumber; +L7: + set @number,7; + goto L_CheckNumber; +L8: + set @number,8; + goto L_CheckNumber; +L9: + set @number,9; + goto L_CheckNumber; +L10: + set @number,10; + goto L_CheckNumber; +L11: + set @number,11; + goto L_CheckNumber; +L12: + set @number,12; + goto L_CheckNumber; +L13: + set @number,13; + goto L_CheckNumber; +L14: + set @number,14; + goto L_CheckNumber; +L15: + set @number,15; + goto L_CheckNumber; +L16: + set @number,16; + goto L_CheckNumber; +L17: + set @number,17; + goto L_CheckNumber; +L18: + set @number,18; + goto L_CheckNumber; +L19: + set @number,19; + goto L_CheckNumber; +L20: + set @number,20; + goto L_CheckNumber; +L21: + set @number,21; + goto L_CheckNumber; +L22: + set @number,22; + goto L_CheckNumber; +L23: + set @number,23; + goto L_CheckNumber; +L24: + set @number,24; + goto L_CheckNumber; +L25: + set @number,25; + goto L_CheckNumber; +L26: + set @number,26; + goto L_CheckNumber; +L27: + set @number,27; + goto L_CheckNumber; +L28: + set @number,28; + goto L_CheckNumber; +L29: + set @number,29; + goto L_CheckNumber; +L30: + set @number,30; + goto L_CheckNumber; +L31: + set @number,31; + goto L_CheckNumber; +L32: + set @number,32; + goto L_CheckNumber; +L33: + set @number,33; + goto L_CheckNumber; +L34: + set @number,34; + goto L_CheckNumber; +L35: + set @number,35; + goto L_CheckNumber; +L36: + set @number,36; + goto L_CheckNumber; + +L_CheckNumber: + set @roulette,rand(38); + if (@roulette == 37) mes "We got a 00"; + if (@roulette < 37) mes "We got a " + @roulette; + if (@number != @roulette) goto L_Lost; + mes "You won!"; + getitem 503,@bet * 10; + close; + +L_Later: + mes "Rien ne va plus..."; + close; + +L_NoCoin: + mes "You don't have enough coins"; + close; + +L_Lost: + mes "I'm sorry, you lost"; + close; +} + + |