Browse Source

Fixed all files which had other locations

heromaster 10 years ago
parent
commit
7df11c7ffa
3 changed files with 81 additions and 84 deletions
  1. 79 80
      locations/Prostitute
  2. 1 2
      locations/hall
  3. 1 2
      locations/menu_helper

+ 79 - 80
locations/Prostitute

@@ -6,7 +6,7 @@ if $ARGS[0] = 'start':
 	$locSex = $CURLOC
 	cla
 	*clr
-	set minut += 5
+	minut += 5
 	'<center><b><font color="maroon">Hooker</font></b></center>'
 	'<center><img src="images/etogame/park2.jpg"></center>'
 	clr
@@ -21,7 +21,7 @@ if $ARGS[0] = 'start':
 
 			act 'Talk':
 				cla
-				set whoreQW = 2
+				whoreQW = 2
 				'You went to a prostitute and asked her how things are done here at all. She began to explain. "We are free, do not work on anyone, but because of this many problems. Svimi Stella with her friends sometimes beat us and rob and sometimes come petty thugs and rob us of the money. If you want to work here, you have to pay and Stella and Bandyuk . course you cool, you can try to besiege Stella and her friends, but the bandits do not advise contact. And yet, you do not peck on customers, if you nebudesh dressed like a slut, you can buy some clothes in a sex shop. "'
 
 				act 'Move away':gt 'prostitute', 'start'
@@ -29,36 +29,36 @@ if $ARGS[0] = 'start':
 		end
 
 		if whoreQW = 0:
-			'Hey, you´re not one of us, would valyl from our point, and that the teeth will not collect.'
+			'Hey, you''re not one of us, would valyl from our point, and that the teeth will not collect.'
 
 			act 'Fuck you!':
 				cla
-				set minut += 15
-				set $nameV = 'Stoned prostitute'
+				minut += 15
+				$nameV = 'Stoned prostitute'
 				!!stats
-				set strenV = 20
-				set speedV = 30
-				set agilV = 30
-				set reactV = 30
-				set vitalV = 50
-				set intelV = 10
-				set willV = 10
+				strenV = 20
+				speedV = 30
+				agilV = 30
+				reactV = 30
+				vitalV = 50
+				intelV = 10
+				willV = 10
 				!!skills
-				set magikV = 10
-				set boxingV = 10
-				set shootV = 10
+				magikV = 10
+				boxingV = 10
+				shootV = 10
 				!!parameters
-				set healthV = vitalV * 10 + strenV * 5
-				set mannaV = intelV * 10 + magikV * 10
-				set willpowerV = willV * 10
-				set BonusAtakV = 0
-				set BonusDefV = 0
+				healthV = vitalV * 10 + strenV * 5
+				mannaV = intelV * 10 + magikV * 10
+				willpowerV = willV * 10
+				BonusAtakV = 0
+				BonusDefV = 0
 				!!Programme of Action
-				set program = 0
-				set prostitutFight = 1
+				program = 0
+				prostitutFight = 1
 
-				if spellavtoklon = 1:set klon = 3
-				if spellbefshild = 1:set defence = 500
+				if spellavtoklon = 1:klon = 3
+				if spellbefshild = 1:defence = 500
 
 				gt 'fight', 'start'
 			end
@@ -72,7 +72,7 @@ if $ARGS[0] = 'start':
 				act 'I agree':
 					cla
 					whoreQW = 2
-					'You agreed. Prostitute told you that you need to buy the appropriate clothing in sex Shope. Then customers will immediately understand that you´re a prostitute.'
+					'You agreed. Prostitute told you that you need to buy the appropriate clothing in sex Shope. Then customers will immediately understand that you''re a prostitute.'
 
 					act 'Move away':gt 'prostitute', 'start'
 				end
@@ -82,8 +82,8 @@ if $ARGS[0] = 'start':
 		if whoreQW > 1 and hook = 1 and son > 0:
 			act 'Stand on the panel (0:15)':
 				cla
-				set minut += 10
-				set prosrand = rand(0, (vnesh + hour) * 2)
+				minut += 10
+				prosrand = rand(0, (vnesh + hour) * 2)
 
 				if prosrand < 20:
 					'No you are not interested.'
@@ -93,15 +93,15 @@ if $ARGS[0] = 'start':
 
 				if prosrand >= 20:
 					'To you a car drove up.'
-					set proseventrand = rand(0, 100)
+					proseventrand = rand(0, 100)
 
 					if proseventrand <= 5:
-						'To you black jeep pulled up, opened the window and leaned out healthy brazen face. "Hey slut, it´s time to pay tribute. Shtukar Come here and get out on work."'
+						'To you black jeep pulled up, opened the window and leaned out healthy brazen face. "Hey slut, it''s time to pay tribute. Shtukar Come here and get out on work."'
 
 						if money >= 1000:
 							act 'Giving money':
 								cla
-								set money -= 1000
+								money -= 1000
 								'You gave the money big man in the jeep. He put them in his pocket and left.'
 
 								act 'Move away':gt 'prostitute', 'start'
@@ -115,9 +115,9 @@ if $ARGS[0] = 'start':
 								'You big man began to explain that you have not earned it grabbed you by the arm and threw him into a jeep, there you have it brushed pocket and said that he will teach you how to work.'
 
 								act 'Work':
-									set $nameV = 'bandit'
-									set $boy = 'Bandit'
-									set dick = rand(18, 21)
+									$nameV = 'bandit'
+									$boy = 'Bandit'
+									dick = rand(18, 21)
 									gt 'blowPR', 'start'
 								end
 							end
@@ -125,32 +125,32 @@ if $ARGS[0] = 'start':
 
 						act 'Fuck you!':
 							cla
-							set minut += 15
-							set $nameV = 'Bandit'
+							minut += 15
+							$nameV = 'Bandit'
 							!!stats
-							set strenV = 200
-							set speedV = 30
-							set agilV = 20
-							set reactV = 20
-							set vitalV = 150
-							set intelV = 10
-							set willV = 10
+							strenV = 200
+							speedV = 30
+							agilV = 20
+							reactV = 20
+							vitalV = 150
+							intelV = 10
+							willV = 10
 							!!skills
-							set magikV = 10
-							set boxingV = 10
-							set shootV = 10
+							magikV = 10
+							boxingV = 10
+							shootV = 10
 							!!parameters
-							set healthV = vitalV * 10 + strenV * 5
-							set mannaV = intelV * 10 + magikV * 10
-							set willpowerV = willV * 10
-							set BonusAtakV = 0
-							set BonusDefV = 0
+							healthV = vitalV * 10 + strenV * 5
+							mannaV = intelV * 10 + magikV * 10
+							willpowerV = willV * 10
+							BonusAtakV = 0
+							BonusDefV = 0
 							!!Programme of Action
-							set program = 0
-							set prostitutFight = 2
+							program = 0
+							prostitutFight = 2
 
-							if spellavtoklon = 1:set klon = 3
-							if spellbefshild = 1:set defence = 500
+							if spellavtoklon = 1:klon = 3
+							if spellbefshild = 1:defence = 500
 
 							gt 'fight', 'start'
 						end
@@ -210,7 +210,7 @@ if $ARGS[0] = 'start':
 						if money >= 500:
 							act 'Giving money':
 								cla
-								set money -= 500
+								money -= 500
 								'You gave the money to the prostitute, she turned and walked away.'
 
 								act 'Move away':gt 'prostitute', 'start'
@@ -220,7 +220,7 @@ if $ARGS[0] = 'start':
 						if money < 500:
 							act 'I have not earned much':
 								cla
-								set money = 0
+								money = 0
 								'You started zhalovatsya that do not earn much money. You searched prostitute taking everything of value and left.'
 
 								act 'Move away':gt 'prostitute', 'start'
@@ -229,32 +229,32 @@ if $ARGS[0] = 'start':
 
 						act 'Fuck you!':
 							cla
-							set minut += 15
-							set $nameV = 'Prostitute'
+							minut += 15
+							$nameV = 'Prostitute'
 							!!stats
-							set strenV = 50
-							set speedV = 50
-							set agilV = 40
-							set reactV = 30
-							set vitalV = 60
-							set intelV = 10
-							set willV = 10
+							strenV = 50
+							speedV = 50
+							agilV = 40
+							reactV = 30
+							vitalV = 60
+							intelV = 10
+							willV = 10
 							!!skills
-							set magikV = 10
-							set boxingV = 10
-							set shootV = 10
+							magikV = 10
+							boxingV = 10
+							shootV = 10
 							!!parameters
-							set healthV = vitalV * 10 + strenV * 5
-							set mannaV = intelV * 10 + magikV * 10
-							set willpowerV = willV * 10
-							set BonusAtakV = 0
-							set BonusDefV = 0
+							healthV = vitalV * 10 + strenV * 5
+							mannaV = intelV * 10 + magikV * 10
+							willpowerV = willV * 10
+							BonusAtakV = 0
+							BonusDefV = 0
 							!!Programme of Action
-							set program = 0
-							set prostitutFight = 3
+							program = 0
+							prostitutFight = 3
 
-							if spellavtoklon = 1:set klon = 3
-							if spellbefshild = 1:set defence = 500
+							if spellavtoklon = 1:klon = 3
+							if spellbefshild = 1:defence = 500
 
 							gt 'fight', 'start'
 						end
@@ -266,11 +266,10 @@ if $ARGS[0] = 'start':
 
 	act 'Leave':
 		cla
-		set minut += 5
-		set prosta = 0
+		minut += 5
+		prosta = 0
 		gt 'park', 'start'
 	end
 end
 
 --- Prostitute ---------------------------------
-

+ 1 - 2
locations/hall

@@ -9,7 +9,7 @@ usehtml = 1
 *clear
 clr
 gs 'stat'
-set minut += 5
+minut += 5
 picrand = rand(0, 2)
 
 if picrand = 0:'<right><img src="images/casino/hcasino1.jpg"></right>'
@@ -26,4 +26,3 @@ if picrand = 2:'<right><img src="images/casino/hcasino3.jpg"></right>'
 'K <a href="exec:gt ''hotel''">Hotel</a>'
 
 --- Hall ---------------------------------
-

+ 1 - 2
locations/menu_helper

@@ -166,7 +166,7 @@ if $ARGS[0] = 'Skin':
 	pl '<b>Where can I increase it?</b>'
 	pl 'In beauty salon'
 	pl '<b>How can it be decreased?</b>'
-	pl 'It won´t decrease'
+	pl 'It won''t decrease'
 end
 }
 $helper_job = {
@@ -218,4 +218,3 @@ if $ARGS[0] = 'strip':
 end
 }
 --- menu_helper ---------------------------------
-