summaryrefslogtreecommitdiff
path: root/npc/tulimshar/casino.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/tulimshar/casino.txt')
-rw-r--r--npc/tulimshar/casino.txt360
1 files changed, 0 insertions, 360 deletions
diff --git a/npc/tulimshar/casino.txt b/npc/tulimshar/casino.txt
deleted file mode 100644
index 3c611554..00000000
--- a/npc/tulimshar/casino.txt
+++ /dev/null
@@ -1,360 +0,0 @@
-// 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,64,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;
-}
-
-