Browse Source

a bit cleanup

slanon 4 years ago
parent
commit
672da8fec0
2 changed files with 4 additions and 5 deletions
  1. 1 3
      locations/balkon2.qsrc
  2. 3 2
      locations/bank.qsrc

+ 1 - 3
locations/balkon2.qsrc

@@ -142,10 +142,8 @@ if $ARGS[0] = 'masopt':
 			cla
 			*clr
 			pcs_vag += rand(0, 2)
-			badildo = rand(1, 2)
 
-			if badildo = 1:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_dildo1.jpg"></center>'
-			if badildo = 2:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_dildo2.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/balcony_dildo<<rand(1, 2)>>.jpg"></center>'
 
 			'You begin to rub yourself, having your hand moving in small circles as you feel your wetness growing. Feeling aroused enough you take out your dildo and begin teasing your clit by gently rubbing the area.'
 			'As you stop teasing yourself, you slowly push the head inside your vagina. You slowly begin to fuck yourself picking up the pace. The feeling of your inside being stretched out is great and you let out a quiet wimp as you keep on playing with the dildo.'

+ 3 - 2
locations/bank.qsrc

@@ -74,9 +74,9 @@ if $ARGS[0] = 'start':
 					bankDebtLimit = 5000
 				end
 				
-				'<br>You deposited <<kartaIN>> <b>₽</b>, your account balance is now <<karta>> <b>₽</b>.'
+				'<br>You deposited <<kartaIN>> <b>₽</b>, your account balance is now ' + iif(karta >= 0,'<<karta>>','<font color="red"><<karta>></font>') + ' <b>₽</b>.'
 			end
-
+			killvar 'kartaIN'
 			act 'Walk away':gt 'bank', 'start'
 		end
 	end
@@ -100,6 +100,7 @@ if $ARGS[0] = 'start':
 					'<br>You withdraw <<kartaOUT>> <b>₽</b>. <font color="red">Your bank account is overdrawn by <b><<karta>> ₽</b>.</font>'
 				end
 			end
+			killvar 'kartaOUT'
 			act 'Walk away':gt 'bank', 'start'
 		end
 	end