1 files changed, 35 insertions, 0 deletions
diff --git a/world/map/npc/functions/slot_machine.txt b/world/map/npc/functions/slot_machine.txt
new file mode 100644
index 00000000..8f4482cc
--- /dev/null
+++ b/world/map/npc/functions/slot_machine.txt
@@ -0,0 +1,35 @@
+//
+
+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;
+}