More cleanup in 001 - 199 #3

Regex: /(,)(?!\ )/\1\ /g

locations/005_onobjsel

@@ -402,7 +402,7 @@ $din_cheat = {
 	if intel > 0:pl 'Decrease intelligence by <a href="exec:intel -= 1 & dynamic $din_cheat">1</a> <a href="exec:intel -= 5 & dynamic $din_cheat">5</a> <a href="exec:intel -= 10 & dynamic $din_cheat">10</a>'
 
 	pl '<b>Cheats stats</b>'
-	pl 'Increase money by <a href="exec:money += 1,000 & dynamic $din_cheat">1000</a> <a href="exec:money += 5000 & dynamic $din_cheat">5,000</a> <a href="exec:money += 10000 & dynamic $din_cheat">10,000</a>'
+	pl 'Increase money by <a href="exec:money += 1, 000 & dynamic $din_cheat">1,000</a> <a href="exec:money += 5000 & dynamic $din_cheat">5,000</a> <a href="exec:money += 10000 & dynamic $din_cheat">10,000</a>'
 	pl'<a href="exec:money = 0 & dynamic $din_cheat">Throw away all money</a>'
 	pl 'Increase dominance by <a href="exec:dom += 1 & dynamic $din_cheat">1</a> <a href="exec:dom += 5 & dynamic $din_cheat">5</a> <a href="exec:dom += 10 & dynamic $din_cheat">10</a>'
 	pl 'Increase submission by <a href="exec:sub += 1 & dynamic $din_cheat">1</a> <a href="exec:sub += 5 & dynamic $din_cheat">5</a> <a href="exec:sub += 10 & dynamic $din_cheat">10</a>'
@@ -982,7 +982,7 @@ $objbloknot = {
 	if bfB > 1:pl 'Another boyfriend, <<$boyB>>, is a <<$boybodyB>> <<$boybodB>> <<$boyfaceB>>. He is usually <<$boyCloB>>. Our relationship is <<bfB>> and we have met <<dayB>> times.' & nl
 	if bfC > 1:pl 'My third boyfriend, <<$boyC>>, is a <<$boybodyC>> <<$boybodC>> <<$boyfaceC>>. He is usually <<$boyCloC>>. Our relationship is <<bfC>> and we have met <<dayC>> times.' & nl
 
-	GS 'Menu.Create','zapisMenu'
+	GS 'Menu.Create', 'zapisMenu'
 	GS 'Menu.Add', 'zapisMenu', 'Recording from avtodatoy', '', 'MenuLoc', 'zapisosn'
 	GS 'Menu.Add', 'zapisMenu', 'To record on 1th line', '', 'MenuLoc', 'zapis'
 	GS 'Menu.Add', 'zapisMenu', 'With a red line 1th line', '', 'MenuLoc', 'ot'

locations/013_dina

@@ -567,7 +567,7 @@ $butikreiqdi = {
 	'Starting to turn my head, you nobody unnoticed, but your actions have attracted prodovtsa, dealer young girl in a shirt with a little too narrow logotpom Boutique enough that her shirt was so testnovata and had to unbutton the top button (MDA-YOU think whether it is men´s boutique shirt obtyag would be understandable, but in the female? for what and what the administration is thinking?) coming to you a little bit inconsistent and quickly asked:'
 	'Seller:I can help you or what?'
 
-	act 'No, thank you':gt 'butik','start'
+	act 'No, thank you':gt 'butik', 'start'
 	act 'Silently leave':gt 'down'
 
 	act 'Staring at her breasts':
@@ -833,7 +833,7 @@ $youriqwest = {
 							gs 'stat'
 							'<center><img src="images/qwest/youri/bjdance.jpg"></center>'
 							'Little hand caressed member Yuri you squatted in front of him and your face was right on standing against the member. You cupped his purple head <<$liptalk>> and started to suck dick. Your lips slid across the smooth and hot cock sucking it. Yuri was moaning and looked down into your eyes. Finally, he choked hissed, "Come to bed."'
-							gs 'oral','0'
+							gs 'oral', '0'
 
 							act 'Go to bed':
 								cls
@@ -887,7 +887,7 @@ $youriqwest = {
 												gs 'stat'
 												'<center><img src="images/qwest/youri/shower1.jpg"></center>'
 												'Yuri put you in the bathroom on his haunches and put his still soft dick in your mouth. You started to suck cock, which rose directly in your mouth, filling it. Soon the cock was like a steel and Yuri began to moan. Finally he took a member of your mouth and prepared to stop.'
-												gs 'oral','0'
+												gs 'oral', '0'
 
 												act 'Substitute person':
 													cls

locations/016_dinSex2

@@ -151,7 +151,7 @@ $d_analsex_dildo={
 		lubonus = 10
 		!!!
 		analplugin = 0
-		'You pulled out your ass plug,'
+		'You pulled out your butt plug.'
 	end
 
 	if dick >= anus:set anus += 3
@@ -365,7 +365,7 @@ $d_strapon_anal={
 		lubonus = 10
 		!!!
 		analplugin = 0
-		'You pulled out your ass plug,'
+		'You pulled out your butt plug.'
 	end
 
 	if dick >= anus:set anus += 3

locations/068_street

@@ -145,7 +145,7 @@ set housrA = 0
 
 if car > 0 and cardrive = 1:
 	set cardrive = 1
-	'In the parking lot is worth <a href="exec:GS ''carF'',''start''">your <<$car>></a>.'
+	'In the parking lot is worth <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
 end
 
 if hour >= 8 and hour <= 22:'The kiosk selling <a href="exec:dynamic $kiosksig">cigarettes</a>'

locations/069_aptek

@@ -93,7 +93,7 @@ if $ARGS[0] = 'start':
 				'You bought drugs and paid the money to the cashier.'
 			 end
 
-			 act 'Move away from the counter':gt 'aptek','start'
+			 act 'Move away from the counter':gt 'aptek', 'start'
 		 end
 
 		act 'Buy vitamins 500 rubles':
@@ -123,7 +123,7 @@ if $ARGS[0] = 'start':
 			'<center><img src="images/pic/kassa.jpg"></center>'
 			'You bought the pills and paid the money to the cashier.'
 
-			act 'Move away from the counter':gt 'aptek','start'
+			act 'Move away from the counter':gt 'aptek', 'start'
 		 end
 	end
 
@@ -136,7 +136,7 @@ if $ARGS[0] = 'start':
 			'<center><img src="images/pic/kassa.jpg"></center>'
 			'You bought vitamins and paid the money to the cashier.'
 
-			act 'Move away from the counter':gt 'aptek','start'
+			act 'Move away from the counter':gt 'aptek', 'start'
 		end
 	end
 
@@ -149,7 +149,7 @@ if $ARGS[0] = 'start':
 			'<center><img src="images/pic/kassa.jpg"></center>'
 			'You bought a fat burning capsule and paid the money to the cashier.'
 
-			act 'Move away from the counter':gt 'aptek','start'
+			act 'Move away from the counter':gt 'aptek', 'start'
 		 end
 
 		if KandidNapr = 1:
@@ -162,7 +162,7 @@ if $ARGS[0] = 'start':
 				'You bought the pills and paid the money to the cashier.'
 				'Immediately about cash you drink tablet.'
 
-				act 'Move away from the counter':gt 'aptek','start'
+				act 'Move away from the counter':gt 'aptek', 'start'
 		 	end
 		end
 	end

locations/086_poli

@@ -16,7 +16,7 @@ if $ARGS[0] = 'start':
 	'Doctors appointments costs 1,000.'
 	'VD testing cost 1,000.'
 	*nl
-	'Abortion at the woman´s request can be made up to 84 days of pregnancy. The cost of abortion is 8,000.'
+	'Abortion at the woman´s request can be made up to 84 days of pregnancy. The cost of abortion is 8,000 rubles.'
 	*nl
 	'Be warned, abortions are dangerous to health. There is always a risk of complications and the possibility of sterility.'
 	if workhosp = 1 and hour >= 8 and hour <= 9 and week < 6:act 'Exit to replace':gt 'poli', 'beginwork'
@@ -25,7 +25,7 @@ if $ARGS[0] = 'start':
 	act 'Leave Clinic':gt 'street'
 
 	if health < (vital * 10 + stren * 5) and money >= 1000:
-		act 'Treat health 1,000 rubles':
+		act 'Treat health (1,000 rubles)':
 			cla
 			set money  -= 1000
 			set minut  += 60
@@ -41,7 +41,7 @@ if $ARGS[0] = 'start':
 	end
 
 	if willpower < intel * 5 + will * 5 and money >= 1000:
-		act 'See a therapist 1,000 rubles':
+		act 'See a therapist (1,000 rubles)':
 			cla
 			set money    -= 1000
 			set minut    += 60
@@ -215,7 +215,7 @@ if $ARGS[0] = 'start':
 	!'Warn abortions are dangerous to health. There is always a risk of complications and the possibility of not getting pregnant in the future.'
 
 	if money >= 8000 and preg = 1 and pregtime < 84:
-		act 'Abortion 8,000 rubles':
+		act 'Abortion (8,000 rubles)':
 			cla
 			set vidage += 1
 			set abort += 1
@@ -392,12 +392,12 @@ if $ARGS[0] = 'start':
 			gs 'stat'
 			'Optometrist examined you and said that you can do laser vision correction  100 thousand. But from reading books eyesight can deteriorate again.'
 
-			if glass = 1:'Doctor looking at you add ,Of course you can buy glasses that will be better to look at you. 8 thousand.'
+			if glass = 1:'Doctor looking at you add, Of course you can buy glasses that will be better to look at you. 8,000 rubles.'
 
 			act 'Leave the clinic':gt 'street'
 
 			if money >= 100000 and glass ! 0:
-				act 'Pay for laser correction':
+				act 'Pay for laser correction (100,000 rubles)':
 					cls
 					money -= 100000
 					minut += 60
@@ -411,7 +411,7 @@ if $ARGS[0] = 'start':
 
 			if glass = 1:
 				if money >= 8000:
-					act 'Buy Points':
+					act 'Buy Points (8,000 rubles)':
 						cls
 						money -= 8000
 						minut += 60

locations/096_shop

@@ -369,7 +369,7 @@ if $ARGS[0] = 'food':
 			wine = 1
 			'You bought a bottle of wine and put it in her purse.'
 
-			act 'Get out of the department':gt 'shop','food'
+			act 'Get out of the department':gt 'shop', 'food'
 		end
 	end
 end

locations/098_torgpred

@@ -119,7 +119,7 @@ if SVqw = 2:
 				set titBoy = rand(0, 2)
 				set haerBoy = rand(0, 3)
 				izvrat = 0
-				gs 'boyfrend','start'
+				gs 'boyfrend', 'start'
 				stopboy = 0
 				bfa = 70
 				boyonceA = 1
@@ -134,7 +134,7 @@ if SVqw = 2:
 			'You answered Stas, you will find it very much, but you are not ready to give an answer, and ask him a little-just wait. Stas frowns, but accepts your answer.'
 			cla
 
-			act 'Leave':gt 'clener','start'
+			act 'Leave':gt 'clener', 'start'
 		end
 
 		act 'Contribute':
@@ -143,7 +143,7 @@ if SVqw = 2:
 			cla
 			gs 'stat'
 
-			act 'Leave':gt 'clener','start'
+			act 'Leave':gt 'clener', 'start'
 		end
 	end
 end