[fixes] missing action and cla's in casino

locations/casino.qsrc

@@ -141,24 +141,28 @@ if $ARGS[0] = 'roulette_bet2':
 	end
 	
 	act 'Red / Black':
+		cla
 		act 'Reconsider': gt 'casino', 'roulette_bet2'
 		act 'Red': kh = 1 & gt 'casino', 'roulette_result'
 		act 'Black': kh = 2 & gt 'casino', 'roulette_result'
 	end
 
 	act 'Even / Odd':
+		cla
 		act 'Reconsider': gt 'casino', 'roulette_bet2'
 		act 'Even':	chnch = 1 & gt 'casino', 'roulette_result'
 		act 'Odd': chnch = 2 & gt 'casino', 'roulette_result'
 	end
 
 	act 'Small / Large':
+		cla
 		act 'Reconsider': gt 'casino', 'roulette_bet2'
 		act 'Small: 1-18': mb = 1 & gt 'casino', 'roulette_result'
 		act 'Large: 19-36':	mb = 2 & gt 'casino', 'roulette_result'
 	end
 
 	act 'Dozen':
+		cla
 		act 'Reconsider': gt 'casino', 'roulette_bet2'
 		act 'First dozen: 1-12': du = 1 & gt 'casino', 'roulette_result'
 		act 'Second dozen: 13-24': du = 2 & gt 'casino', 'roulette_result'
@@ -166,6 +170,7 @@ if $ARGS[0] = 'roulette_bet2':
 	end
 
 	act 'Series':
+		cla
 		act 'Reconsider': gt 'casino', 'roulette_bet2'
 		act 'First row: 1, 4, 7, 10, 13, 16, 19, 22, 25, 28, 31, 34': series = 1 & gt 'casino', 'roulette_result'
 		act 'Second row: 2, 5, 8, 11, 14, 17, 20, 23, 26, 29, 32, 35': series = 2 & gt 'casino', 'roulette_result'
@@ -173,13 +178,17 @@ if $ARGS[0] = 'roulette_bet2':
 	end
 
 	act 'Number':
-		chi = input 'Enter a number from 0-36'
+		cla
+		act 'Reconsider': gt 'casino', 'roulette_bet2'
+		act 'Choose a number':
+			chi = input 'Enter a number from 0-36'
 
-		if chi < 0 and chi > 36:
-			msg 'You need to choose a number between 0 and 36.'
-			gt 'casino', 'roulette_bet2'
-		else
-			gt 'casino', 'roulette_result'
+			if chi < 0 and chi > 36:
+				msg 'You need to choose a number between 0 and 36.'
+				gt 'casino', 'roulette_bet2'
+			else
+				gt 'casino', 'roulette_result'
+			end
 		end
 	end
 end