Selaa lähdekoodia

Various changes from 1.2.4 thanks to Illume

KevinSmarts 8 vuotta sitten
vanhempi
commit
6640ea76ee
7 muutettua tiedostoa jossa 751 lisäystä ja 326 poistoa
  1. 461 295
      locations/Grinok
  2. 1 1
      locations/Snpc
  3. 26 0
      locations/dinmother
  4. 6 1
      locations/dreams
  5. 8 12
      locations/family
  6. 54 7
      locations/gschool
  7. 195 10
      locations/gschool2

+ 461 - 295
locations/Grinok

@@ -5,363 +5,529 @@ Added rice wine quest
 April 20, 2016
 Fixed Rice wine event
 }
-$metka = $ARGS[0]
-$loc = $CURLOC
-CLOSE ALL
-if sound = 0:
-	if month >=11 and month <= 12 or month >=1 and month <=3:
-		if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/zima.mp3',30
-		if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
-	else
-		if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/street_leto.mp3',30
-		if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
+if $ARGS[0] = '':
+	$metka = $ARGS[0]
+	$loc = $CURLOC
+	CLOSE ALL
+	if sound = 0:
+		if month >=11 and month <= 12 or month >=1 and month <=3:
+			if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/zima.mp3',30
+			if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
+		else
+			if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/street_leto.mp3',30
+			if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
+		end
 	end
-end
 
-clr
-gs 'stat'
-gs 'outdoors'
-'<center><h4>Market</h4></center>'
-'<center><img src="images/pic/Grinok.jpg"></center>'
-'This small market is location near the station.'
+	clr
+	gs 'stat'
+	gs 'outdoors'
+	'<center><h4>Market</h4></center>'
+	'<center><img src="images/pic/Grinok.jpg"></center>'
+	'This small market is location near the station.'
 
-if arturQW = 1 and (week = 6 or week = 7) and hour < 12:
-	act 'Wait for Arthur to arrive':hour = 12 & gt 'grinok'
-end
+	if arturQW = 1 and (week = 6 or week = 7) and hour < 12:
+		act 'Wait for Arthur to arrive':hour = 12 & gt 'grinok'
+	end
 
-if hour >= 8 and hour <= 18:
-	'In the market the sellers of goods are beckoning shoppers.'
-	if gorslut > 2 and rand(0,9) = 0:
-		'An Armenian man comes up to you and in broken Russian says, "You girl who like men, no? Come meet real men have good time."'
-		act 'Go with him':gt 'gevent', '3'
-		act 'Reject him':
-			'You pretend not to understand what he is saying.'
-			act 'Return':gt 'Grinok'
+	if hour >= 8 and hour <= 18:
+		'In the market the sellers of goods are beckoning shoppers.'
+		if gorslut > 2 and rand(0,9) = 0:
+			'An Armenian man comes up to you and in broken Russian says, "You girl who like men, no? Come meet real men have good time."'
+			act 'Go with him':gt 'gevent', '3'
+			act 'Reject him':
+				'You pretend not to understand what he is saying.'
+				act 'Return':gt 'Grinok'
+			end
+			
+			exit
 		end
+		act 'Wander through the market': gt 'Grinok','events'
+		!expand market events from 1.2.4
 		
-		exit
-	end
-	act 'Wander through the market':
-		cls
-		minut += 15
-		gs 'stat'
-		'You are strolling through the market looking for good deals.'
-		if intel >= 100:
-			rinmaxrand = 2
-		elseif intel >= 75 and intel < 100:
-			rinmaxrand = 4
-		elseif intel >= 50 and intel < 75:
-			rinmaxrand = 6
-		elseif intel >= 25 and intel < 50:
-			rinmaxrand = 8
-		else
-			rinmaxrand = 10
+		if pornmarkonce = 1:
+			act 'Go to the area with the porn':gt 'Gpornmark'
 		end
 
-		rinevrand = RAND(0,rinmaxrand)
-		if rinevrand = 0:
+		if arturKnow = 1 and arturQW = 0:
+			act 'Go to Arthur':gt 'arturRinok', 'start'
+		elseif arturQW = 1 and (week = 6 or week = 7):
+			if hour = 12 or hour = 13:
+				act 'Go to Arthur':gt 'arturRinok', 'work_1'
+			end
+		elseif arturQW = 2:
+			if hour = 16 and minut <= 30:
+				act 'Go to Arthur':gt 'arturRinok', 'work_2'
+			elseif hour < 16:
+				act 'Wait for Arthur to arrive':hour = 16 & minut = 0 & gt 'Grinok'
+			end
+		end
 
-			if arturKnow = 0:
-				temp = rand(0, 6)
-			else
-				temp = rand(0, 5)
+		act 'Go to the book seller':
+			cls
+			minut += 15
+			gs 'stat'
+			'On the shelves are very entertaining fantasy books, which costs only 150 <b>₽</b> each and there are also women''s romance paperback novels for 300 <b>₽</b> each.'
+
+			if money >= 150:
+				act 'Buy a fantasy book (150 <b>₽</b>)':
+					cls
+					minut += 15
+					money -= 150
+					f_book += 1
+					gs 'stat'
+					'You bought a fantasy book for 150 <b>₽</b>.'
+
+					act 'Leave':gt $curloc
+				end
 			end
 
-			if temp = 0:
-				tovpay = rand(3, 8) * 100
-				'You see that cosmetics are for sale for <<tovpay>> <b>₽</b>.'
+			if money >= 300:
+				act 'Buy a romance novel (300 <b>₽</b>)':
+					cls
+					minut += 15
+					money -= 300
+					w_book += 1
+					gs 'stat'
+					'You bought a romance novel for 300 <b>₽</b>.'
 
-				if money >= tovpay:
-					act 'Buy':
-						cls
-						minut += 15
-						money -= tovpay
-						kosmetica += rand(10, 40)
-						gs 'stat'
-						gt $curloc
-					end
+					act 'Leave':gt $curloc
 				end
-			elseif temp = 1:
-				tovpay = rand(2, 5) * 100
-				'You see vitamins for sale for <<tovpay>> <b>₽</b>.'
+			end
 
-				if money >= tovpay:
-					act 'Buy':
-						cls
-						minut += 15
-						vitamin += 20
-						money -= tovpay
-						gt $curloc
-					end
+			act 'Escape':gt $curloc
+		end
+
+		
+		if gobelen > 0 and gobQW = 0:
+			act'Sell ​​tapestry':
+				cls
+				gobQW = 1
+				minut += 15
+				gs'stat'
+				'You stood quietly by the entrance to the market, waiting for customers and displaying your tapestries. Shortly buyers started to gather, but a large, muscular man approached you and said, "It is illegal to trade in the market without a trader''s licence, but I may be interesting in buying your tapestries, 500 <b>₽</b> apiece. Come and see me at my stall."'
+				'Not wanting to get into trouble, you packed your stuff away. The man was already gone, but you saw which direction he went and he should be easy to find.'
+				act 'Escape':gt $curloc
+			end
+		end
+
+		if gobelen > 0 and gobQW >= 1:
+			act'Sell ​​tapestry':
+				cls
+				minut += 15
+				gs'stat'
+				'You went to the man who offered to buy your tapestries for 500 <b>₽</b>. You found him by his stall, smiling.'
+
+				if gobQW = 2:
+					'Roman welcomed you. Interested and businesslike, he asked what you have for sale.'
 				end
-			elseif temp = 2:
-				tovpay = rand(2, 8) * 10
-				'You see a booth selling condoms for <<tovpay>> <b>₽</b>.'
 
-				if money >= tovpay:
-					act 'Buy':
-						cls
-						minut += 15
-						prezik += 5
-						money -= tovpay
-						gt $curloc
-					end
+				if gobQW = 1:
+					gobQW = 2
+					minute + 5
+					'The man greeted you and introduced himself as Roman, you told him that your name is <<$name>>. After a brief chat Roman said that he is interested in seeing what you have for sale.'
 				end
-			elseif temp = 3:
-				tovpay = rand(5, 10) * 100
-				'There is lip balm for sale for <<tovpay>> <b>₽</b>.'
 
-				if money >= tovpay:
-					act 'Buy':
+				act'Show tapestry':
+					cls
+					gobelen -= 1
+					money += 500
+					gs'stat'
+					'You show your tapestry to Roman and he gives you five hundred for it. You take the money and give him the tapestry.'
+					act 'Escape':gt $curloc
+				end
+
+				if gobelen > 1:
+					act'Sell ​​all tapestries':
 						cls
-						minut += 15
-						lipbalm += 20
-						money -= tovpay
-						gt $curloc
+						kolgob = gobelen
+						gobelen = 0
+						moneyGob = kolgob*500
+						money += moneyGob
+						gs'stat'
+						'You show Roman your tapestries and he gives you <<moneyGob>> <b>₽</b> for them. You take the money and give him the tapestries.'
+						act 'Escape':gt $curloc
 					end
 				end
-			elseif temp = 4:
-				tovpay = rand(1, 5) * 1000
-				'You see someone selling a handbag for <<tovpay>> <b>₽</b>.'
 
-				if bag = 0:
-					if money >= tovpay:
-						act 'Buy':
-							cls
-							minut += 15
-							bag = 1
-							money -= tovpay
-							gt $curloc
-						end
+				act 'Leave':gt $curloc
+			end
+		end
+		if ShowerIvan = 5 and porndeal = 0 and rand(1,100) <= 10 and lookwine ! daystart:
+			cls
+			cla
+			gs 'stat'
+			minut += 20
+			lookwine = daystart
+			'<center><img src="images/locations/Pavlovsk/Market/chinese_stall01.jpg"></center>'
+			'You were looking through the market when you came upon a stall selling Chinese foods. On a shelf behind the old woman minding the stall there are a number of bottles.'
+			act 'Ask about huangjiu':
+				'You asked the old woman if she has any rice wine to sell. She smiles at you and points to a basket filled with rice.'
+				'"Onry 2 kopec, hundred glam." she said in badly accented Russian, "You buy?"'
+				'"No," you replied, "I need rice wine, rice wine."'
+				'She looked at you in confusion for a moment then suddenly brightened, "Ah!" she exclaimed, "Come, come!"'
+				'The old woman hurried to the other side of the stall and you followed her to where a number of smoked piglets hung in a row.'
+				'"Here," the old woman crowed handing you one of r the pigs, "Nice swine, vely nice swine."'
+				'"No, not nice swine," you cried in dispair, "Rice. Wine."'
+				'"Yes, yes," the woman countered, "Nice swine, only 5 lubles."'
+				'Just as you were about to give up, a young Chinese boy about your brother''s age arrived.'
+				'"I am sorry, my grandmother does not speak much Russian." he said as he stepped up beside the old woman who started to speak rapidly to him in what you assumed was Chinese.'
+				'"My grandmother asks why you don''t like the piglets." he translated as the old woman stopped speaking.'
+				'"I don''t want a pig," you replied in relief as his Russian is quite good, "I am looking for rice wine, wang-goo."'
+				'"Ah, huangjiu!" he said in understanding then spoke to his grandmother in Chinese.'
+				'The old woman glared at you then hung the smoked pig back on its hook. She shuffled over to the shelf with the bottles and peered short-sightedly at the labels. She finally picked up one of them and brought it over to you.'
+				'"Why you not say wanted lice wine." she asked in aggrieved tones, "2000 lubles."'
+				if money >= 2000:
+					act 'Buy the wine':
+						money -= 2000
+						ricewine = 1
+						'You hand the woman the money and she gives you the wine.'
+						act 'Leave': gt $curloc
 					end
 				else
-					'But you already have a bag, so you move on.'
+					'You are astonished by the price and realize that you cannot afford the wine. You apologize and turn away.'
+					act 'Leave the market': gt $curloc
+					act 'Continue browsing the market':
+						cls
+						cla
+						gs 'stat'
+						minut += 15
+						'<center><img src="images/locations/Pavlovsk/Market/market_boy01.jpg"></center>'
+						'You continued to wander through the market for another 15 minutes when the boy from the Chinese stall came up to you.'
+						'"Hey, you really want that rice wine?" he asked after checking to make sure no one was watching.'
+						'"Yes," you answered him, "But it costs too much. I can''t afford it."'
+						'"I''ll make a deal with you." he said, "Go to the porn dealer and buy me a porn magazine and I''ll get you the wine."'
+						if pornmarkonce = 0: pornmarkonce = 1 & '"Where is the porn dealer?" you asked and he gives you directions.'
+						act 'Agree': porndeal = 1 & gt 'Gpornmark'
+						act 'Refuse':
+							'You declined his offer and he shrugged and walked away.'
+							act 'Leave': gt $curloc
+						end
+					end
 				end
-			elseif temp = 5:
-				if pornmarkonce = 0:pornmarkonce = 1
-				'Strolling through the market you accidentally wander into the far corner where they sell porn.'
-
-				act 'Go to the area with the porn':gt 'Gpornmark'
-
-			else
-				'Someone suddenly called out to you, "Hey pretty girl, do you want a fresh, juicy tangerine?"'
-
-				act 'Look':gt 'arturRinok', 'start'
 			end
+		elseif ShowerIvan = 5 and lookwine ! daystart:
+			cla
+			cls
+			gs 'stat'
+			lookwine = daystart
+			'<center><img src="images/pic/Grinok.jpg"></center>'
+			'You look around the market, but the Chinese vendors don''t seem to be here today.'
+			act 'Leave': gt $curloc
+		end
 
-		else
-			'Nothing unusual you do not come across, trash, buckets, granny gowns, sneakers, breeches and waistcoats with pockets.'
+		if porndeal = 1 and porndealday ! daystart:
+			cls 
+			cla
+			gs 'stat'
+			porndealday = daystart
+			lookboy = 0
+			'<center><img src="images/locations/Pavlovsk/Market/market_boy01.jpg"></center>'
+			'The boy from the Chinese stall comes up to you as you entered the market.'
+			'"Do you have it?" he asked eagerly.'
+			if haveporn = 1: 
+				porndeal = 2 & ! to close the ricewine event
+				ricewine = 1
+				'"Do you have the wine?" you countered.'
+				'He pulls the bottle out of his backpack and you trade items.'
+				act 'Leave': gt $curloc
+			else
+				'You told him you didn''t have his magazine yet but you were working on it.'
+				act 'Leave': gt $curloc
+			end 
 		end
-		
-		act 'Move on':gt $curloc
+		if porndeal = 1 and porndealday = daystart and lookboy = 0:
+			cls
+			cla
+			gs 'stat'
+			lookboy = 1
+			'<center><img src="images/locations/Pavlovsk/Market/chinese_stall01.jpg"></center>'
+			'You look around the market for the boy from the Chinese stall, but you can''t find him. You decide to look for him another day.'
+			act 'Leave': gt $curloc
+		end
+	else
+		'There is no one in the market.'
 	end
 
+	act 'Go back to the station':minut += 3 & gt 'vokzalG'
+end
 
-	if pornmarkonce = 1:
-		act 'Go to the area with the porn':gt 'Gpornmark'
-	end
+if $ARGS[0] = 'events':
+	cls
+	cla
+	'<center><h4>Market</h4></center>'
+	minut += 10
+	gs 'stat'
 
-	if arturKnow = 1 and arturQW = 0:
-		act 'Go to Arthur':gt 'arturRinok', 'start'
-	elseif arturQW = 1 and (week = 6 or week = 7):
-		if hour = 12 or hour = 13:
-			act 'Go to Arthur':gt 'arturRinok', 'work_1'
-		end
-	elseif arturQW = 2:
-		if hour = 16 and minut <= 30:
-			act 'Go to Arthur':gt 'arturRinok', 'work_2'
-		elseif hour < 16:
-			act 'Wait for Arthur to arrive':hour = 16 & minut = 0 & gt 'Grinok'
-		end
+	!modify from 1.2.4(force 50%) and old one, set it 30~80% for events, with intel /2  by illume
+	if (30 + intel/2) > RAND(0,100):
+		rinevrand = rand(1,21)
+	else
+		! no events
+		rinevrand = 0
 	end
 
-	act 'Go to the book seller':
-		cls
-		minut += 15
+	if rinevrand <= 1:
+		$grinok_text[0]='You came across a beggar'
+		$grinok_text[1]='You see a beggar asking alms'
+		$grinok_text[2]='You see a beggar'
+		$grinok_text[3]='disguised as a girl'
+		$grinok_text[4]='what sort of a woman picks up her underwear'
+		$grinok_text[5]='half-naked girl'
+		$grinok_text[6]='girl trying on bra'
+		$grinok_text[7]='Anything unusual you do not come across, all hlame, vegetables and tasteless clothing'
+		$grinok_text[8]='You are not lucky and you continually run across old women in dressing gowns, Slippers and vests with pockets.'
+		$grinok_text[9]='You don`t find anything interesting'
+		$grinok_text[10]='You come across one Chinese consumer goods and nothing more'
+		$grinok_text[11]='The market works in a regular mode. People with bags scurrying back and forth, children trick-or-treat toy from their parents and vociferous sellers.'
+		$grinok_text[12]='The market as always a lot of people. Hustle and bustle makes you focus on your desires'	
+		!will killvar after events
+	end	
+	
+	! def action
+	act 'Wander further': gt 'Grinok','events'
+	act 'Stop wandering': gt $curloc
+	
+	if rinevrand = 0:
+		'<center><img src="images/qwest/alter/Grinok/brodit'+rand(1,8)+'.jpg"></center>'
+		'You are strolling through the market. ' + $grinok_text[rand(3,12)]
+		killvar '$grinok_text'
+	elseif rinevrand = 1:
+		'<center><img src="images/qwest/alter/Grinok/poproshaika'+rand(1,3)+'.jpg"></center>'
+		*pl $grinok_text[rand(0,2)]
+		killvar '$grinok_text'
+		act 'Throw a trifle': 
+			cla
+			*clr
+			money -= rand(3,20)
+			willpower += 5
+			manna += 5
+			gs 'stat'
+			'<center><img src="images/qwest/alter/Grinok/podaet.jpg"></center>'
+			'You gave the beggar a trifle'
+			act 'Wander further': gt 'Grinok','events'
+		end
+	elseif rinevrand = 2:
+		'<center><img src="images/qwest/alter/Grinok/dedgitara.jpg"></center>'
+		'You see my grandfather playing the guitar'
+	elseif rinevrand = 3:
+		'<center><img src="images/qwest/alter/grinok/girlvoyeur.jpg"></center>'
+		'You see a girl bending, exhibiting her pussy all on display'
+		if girl > 0: horny += 10
 		gs 'stat'
-		'On the shelves are very entertaining fantasy books, which costs only 150 <b>₽</b> each and there are also women''s romance paperback novels for 300 <b>₽</b> each.'
+	elseif rinevrand = 4:
+		'<center><img src="images/qwest/alter/Grinok/goodass.jpg"></center>'
+		'You saw a girl jealous and looked at her beautiful ass'
+	elseif rinevrand = 5:
+		'<center><img src="images/qwest/alter/Grinok/dedgitara.jpg"></center>'
+		'You see my grandfather playing the guitar'
+	elseif rinevrand = 6:
+		'<center><img src="images/qwest/alter/Grinok/nenavizublyadcigan.jpg"></center>'
+		'You met a Gypsy woman. She offered to tell fortunes for you'
+		act 'Agree':
+			cla
+			*clr
+			minut += 5
+			'<center><img src="images/qwest/alter/Grinok/gadaet'+rand(1,2)+'.jpg"></center>'
+			'You agreed and Gypsy taking your hand began to predict you great happiness and lots of money. After graduating, she promptly walked away'
+			act 'Look':
+				cla
+				*clr
+				money = 0
+				manna -= 50
+				gs 'stat'
+				'<center><img src="images/qwest/alter/Grinok/pusto.jpg"></center>'
+				'In your head sneaking suspicion and you start looking through your stuff. But your wallet you never found'
+				act 'Hail a Gypsy':
+					cla
+					*clr
+					'<center><img src="images/qwest/alter/Grinok/okliknut.jpg"></center>'
+					'You turned around hoping to see the thief, but she seemed to dissolve in the crowd'
+					act 'Back': gt $curloc
+				end
+			end
+		end
+	elseif rinevrand = 7:
+		'<center><img src="images/qwest/alter/Grinok/kosmetic.jpg"></center>'
+		tovpay = rand(3, 8) * 100
+		'You see that cosmetics are for sale for <<tovpay>> <b>₽</b>.'
 
-		if money >= 150:
-			act 'Buy a fantasy book (150 <b>₽</b>)':
+		if money >= tovpay:
+			act 'Buy':
 				cls
 				minut += 15
-				money -= 150
-				f_book += 1
+				money -= tovpay
+				kosmetica += rand(10, 40)
 				gs 'stat'
-				'You bought a fantasy book for 150 <b>₽</b>.'
-
-				act 'Leave':gt $curloc
+				gt $curloc
 			end
 		end
+	elseif rinevrand = 8:
+		'<center><img src="images/qwest/alter/Grinok/vitaminki.jpg"></center>'
+		tovpay = rand(2, 5) * 100
+		'You see vitamins for sale for <<tovpay>> <b>₽</b>.'
 
-		if money >= 300:
-			act 'Buy a romance novel (300 <b>₽</b>)':
+		if money >= tovpay:
+			act 'Buy':
 				cls
 				minut += 15
-				money -= 300
-				w_book += 1
-				gs 'stat'
-				'You bought a romance novel for 300 <b>₽</b>.'
-
-				act 'Leave':gt $curloc
+				vitamin += 20
+				money -= tovpay
+				gt $curloc
 			end
 		end
+	elseif rinevrand = 9:
+		'<center><img src="images/qwest/alter/Grinok/condoms.jpg"></center>'
+		tovpay = rand(2, 8) * 10
+		'You see a booth selling condoms for <<tovpay>> <b>₽</b>.'
 
-		act 'Escape':gt $curloc
-	end
-
-	
-	if gobelen > 0 and gobQW = 0:
-		act'Sell ​​tapestry':
-			cls
-			gobQW = 1
-			minut += 15
-			gs'stat'
-			'You stood quietly by the entrance to the market, waiting for customers and displaying your tapestries. Shortly buyers started to gather, but a large, muscular man approached you and said, "It is illegal to trade in the market without a trader''s licence, but I may be interesting in buying your tapestries, 500 <b>₽</b> apiece. Come and see me at my stall."'
-			'Not wanting to get into trouble, you packed your stuff away. The man was already gone, but you saw which direction he went and he should be easy to find.'
-			act 'Escape':gt $curloc
+		if money >= tovpay:
+			act 'Buy':
+				cls
+				minut += 15
+				prezik += 5
+				money -= tovpay
+				gt $curloc
+			end
 		end
-	end
-
-	if gobelen > 0 and gobQW >= 1:
-		act'Sell ​​tapestry':
-			cls
-			minut += 15
-			gs'stat'
-			'You went to the man who offered to buy your tapestries for 500 <b>₽</b>. You found him by his stall, smiling.'
-
-			if gobQW = 2:
-				'Roman welcomed you. Interested and businesslike, he asked what you have for sale.'
-	        end
+	elseif rinevrand = 10:
+		'<center><img src="images/qwest/alter/Grinok/balzam.jpg"></center>'
+		tovpay = rand(5, 10) * 100
+		'There is lip balm for sale for <<tovpay>> <b>₽</b>.'
 
-	        if gobQW = 1:
-				gobQW = 2
-				minute + 5
-				'The man greeted you and introduced himself as Roman, you told him that your name is <<$name>>. After a brief chat Roman said that he is interested in seeing what you have for sale.'
-	        end
-
-			act'Show tapestry':
+		if money >= tovpay:
+			act 'Buy':
 				cls
-				gobelen -= 1
-				money += 500
-				gs'stat'
-				'You show your tapestry to Roman and he gives you five hundred for it. You take the money and give him the tapestry.'
-				act 'Escape':gt $curloc
+				minut += 15
+				lipbalm += 20
+				money -= tovpay
+				gt $curloc
 			end
+		end
+	elseif rinevrand = 11:
+		if pornmarkonce = 0:pornmarkonce = 1
+		'Strolling through the market you accidentally wander into the far corner where they sell porn.'
 
-			if gobelen > 1:
-				act'Sell ​​all tapestries':
-					cls
-					kolgob = gobelen
-					gobelen = 0
-					moneyGob = kolgob*500
-					money += moneyGob
-					gs'stat'
-					'You show Roman your tapestries and he gives you <<moneyGob>> <b>₽</b> for them. You take the money and give him the tapestries.'
-					act 'Escape':gt $curloc
-				end
+		act 'Go to the area with the porn':gt 'Gpornmark'
+	elseif rinevrand = 12:
+		if arturKnow = 0:
+			'Someone suddenly called out to you, "Hey pretty girl, do you want a fresh, juicy tangerine?"'
+			act 'Look': gt 'arturRinok','start'
+		else
+			'Someone suddenly called out to you, "Hey <<$nickname>>, do you want a fresh, juicy tangerine?"'
+			act 'Come': gt 'arturRinok','start'
+		end
+	elseif rinevrand = 13:
+		'<center><img src="images/qwest/alter/grinok/cheburek.jpg"></center>'
+		'Walking through the market, you came across a grandmother sell pies'
+		if energy <= 80:
+			act 'Buy a pie for 20 <b>₽</b>':
+				cla
+				*clr
+				fat+=3
+				frost = 0
+				health += 5
+				manna += 5
+				water -= 5
+				energy+=5
+				money-=20
+				minut+=10
+				gs 'stat'
+				'<center><img src="images/qwest/alter/grinok/eat.jpg"></center>'
+				'You with pleasure ate a delicious pie'
+				act 'Wander further': gt 'Grinok','events'
 			end
-
-			act 'Leave':gt $curloc
+		else
+			*p ', But you are not hungry now.'
 		end
-	end
-	if ShowerIvan = 5 and porndeal = 0 and rand(1,100) <= 10 and lookwine ! daystart:
-		cls
+	elseif rinevrand = 14:
+		'<center><img src="images/qwest/alter/grinok/dropwallet.jpg"></center>'
+		'You see how going ahead the woman dropped the purse'
 		cla
+		act 'Tell her':
+			cla
+			*clr
+			minut += 2
+			'<center><img src="images/qwest/alter/grinok/vernutwallet.jpg"></center>'
+			'You called the woman and showed on the dropped wallet. She looked up gratefully at you and raising his lost, walked away'
+			act 'Wander further': gt 'Grinok','events'
+		end
+		act 'Take the purse':
+			cla
+			*clr
+			minut += 5
+			i = rand(40,200)
+			'<center><img src="images/qwest/alter/grinok/zaglanut.jpg"></center>'
+			'In the purse are <<i>> <b>₽</b>'
+			act 'Take the money and throw the wallet':
+				cla
+				*clr
+				money += i
+				manna += 10
+				gt $curloc
+			end
+			act 'Catch up with the woman and return her purse':
+				cla
+				*clr
+				manna += 5
+				'<center><img src="images/qwest/alter/grinok/proverka.jpg"></center>'
+				'You caught up with the woman and with words "You drop something" and give her the purse. The woman immediately began to count the money. Obidevshis that everything is in place, she thanked you and walked away'
+				act 'Wander further': gt 'Grinok','events'
+			end
+		end
+	elseif rinevrand = 15:
+		'<center><img src="images/qwest/alter/grinok/rebenok.jpg"></center>'
+		'You see a young mother and her crying baby'
+	elseif rinevrand = 16:
+		'<center><img src="images/qwest/alter/grinok/rezba.jpg"></center>'
+		'You find a tent with beautiful things carved out of wood and metal'
+	elseif rinevrand = 17:
+		'<center><img src="images/qwest/alter/grinok/gruzchik.jpg"></center>'
+		'Gazing around, he almost collided with a loader'
+	elseif rinevrand = 18:
+		'<center><img src="images/qwest/alter/grinok/meatlavka.jpg"></center>'
+		'You wandered into the meat Department and see how the butcher works with an ax.'
+	elseif rinevrand = 19:
+		if vnesh >= 30:
+			'<center><img src="images/qwest/alter/grinok/walk'+rand(1,2)+'.jpg"></center>'
+			'You walk, defiantly wagging booty. Some guys stare at you, unable to avert their eyes.'
+			manna += 5
+		else
+			'<center><img src="images/qwest/alter/grinok/walk'+rand(3,4)+'.jpg"></center>'
+			'You walk, carefully twisting your waist. But people don`t give you slightest attention'
+			manna -= 5
+		end
 		gs 'stat'
-		minut += 20
-		lookwine = daystart
-		'<center><img src="images/locations/Pavlovsk/Market/chinese_stall01.jpg"></center>'
-		'You were looking through the market when you came upon a stall selling Chinese foods. On a shelf behind the old woman minding the stall there are a number of bottles.'
-		act 'Ask about huangjiu':
-			'You asked the old woman if she has any rice wine to sell. She smiles at you and points to a basket filled with rice.'
-			'"Onry 2 kopec, hundred glam." she said in badly accented Russian, "You buy?"'
-			'"No," you replied, "I need rice wine, rice wine."'
-			'She looked at you in confusion for a moment then suddenly brightened, "Ah!" she exclaimed, "Come, come!"'
-			'The old woman hurried to the other side of the stall and you followed her to where a number of smoked piglets hung in a row.'
-			'"Here," the old woman crowed handing you one of r the pigs, "Nice swine, vely nice swine."'
-			'"No, not nice swine," you cried in dispair, "Rice. Wine."'
-			'"Yes, yes," the woman countered, "Nice swine, only 5 lubles."'
-			'Just as you were about to give up, a young Chinese boy about your brother''s age arrived.'
-			'"I am sorry, my grandmother does not speak much Russian." he said as he stepped up beside the old woman who started to speak rapidly to him in what you assumed was Chinese.'
-			'"My grandmother asks why you don''t like the piglets." he translated as the old woman stopped speaking.'
-			'"I don''t want a pig," you replied in relief as his Russian is quite good, "I am looking for rice wine, wang-goo."'
-			'"Ah, huangjiu!" he said in understanding then spoke to his grandmother in Chinese.'
-			'The old woman glared at you then hung the smoked pig back on its hook. She shuffled over to the shelf with the bottles and peered short-sightedly at the labels. She finally picked up one of them and brought it over to you.'
-			'"Why you not say wanted lice wine." she asked in aggrieved tones, "2000 lubles."'
-			if money >= 2000:
-				act 'Buy the wine':
-					money -= 2000
-					ricewine = 1
-					'You hand the woman the money and she gives you the wine.'
-					act 'Leave': gt $curloc
-				end
-			else
-				'You are astonished by the price and realize that you cannot afford the wine. You apologize and turn away.'
-				act 'Leave the market': gt $curloc
-				act 'Continue browsing the market':
+	elseif rinevrand = 20:
+		'<center><img src="images/qwest/alter/grinok/dirka.jpg"></center>'
+		'When you crawl series with things you notice a small hole in the tent'
+		act 'Look':
+			cla
+			*clr
+			if girl > 1: horny += 5
+			'<center><img src="images/qwest/alter/grinok/pereodev'+rand(1,15)+'.jpg"></center>'
+			'You look inside the tent and see ' + $grinokrandtext[rand(3,7)]
+			act 'Leave': gt $curloc
+		end
+	else
+		tovpay = rand(1, 5) * 1000
+		'You see someone selling a handbag for <<tovpay>> <b>₽</b>.'
+
+		if bag = 0:
+			if money >= tovpay:
+				act 'Buy':
 					cls
-					cla
-					gs 'stat'
 					minut += 15
-					'<center><img src="images/locations/Pavlovsk/Market/market_boy01.jpg"></center>'
-					'You continued to wander through the market for another 15 minutes when the boy from the Chinese stall came up to you.'
-					'"Hey, you really want that rice wine?" he asked after checking to make sure no one was watching.'
-					'"Yes," you answered him, "But it costs too much. I can''t afford it."'
-					'"I''ll make a deal with you." he said, "Go to the porn dealer and buy me a porn magazine and I''ll get you the wine."'
-					if pornmarkonce = 0: pornmarkonce = 1 & '"Where is the porn dealer?" you asked and he gives you directions.'
-					act 'Agree': porndeal = 1 & gt 'Gpornmark'
-					act 'Refuse':
-						'You declined his offer and he shrugged and walked away.'
-						act 'Leave': gt $curloc
-					end
+					bag = 1
+					money -= tovpay
+					gt $curloc
 				end
 			end
-		end
-	elseif ShowerIvan = 5 and lookwine ! daystart:
-		cla
-		cls
-		gs 'stat'
-		lookwine = daystart
-		'<center><img src="images/pic/Grinok.jpg"></center>'
-		'You look around the market, but the Chinese vendors don''t seem to be here today.'
-		act 'Leave': gt $curloc
-	end
-
-	if porndeal = 1 and porndealday ! daystart:
-		cls 
-		cla
-		gs 'stat'
-		porndealday = daystart
-		lookboy = 0
-		'<center><img src="images/locations/Pavlovsk/Market/market_boy01.jpg"></center>'
-		'The boy from the Chinese stall comes up to you as you entered the market.'
-		'"Do you have it?" he asked eagerly.'
-		if haveporn = 1: 
-			porndeal = 2 & ! to close the ricewine event
-			ricewine = 1
-			'"Do you have the wine?" you countered.'
-			'He pulls the bottle out of his backpack and you trade items.'
-			act 'Leave': gt $curloc
 		else
-			'You told him you didn''t have his magazine yet but you were working on it.'
-			act 'Leave': gt $curloc
-		end 
-	end
-	if porndeal = 1 and porndealday = daystart and lookboy = 0:
-		cls
-		cla
-		gs 'stat'
-		lookboy = 1
-		'<center><img src="images/locations/Pavlovsk/Market/chinese_stall01.jpg"></center>'
-		'You look around the market for the boy from the Chinese stall, but you can''t find him. You decide to look for him another day.'
-		act 'Leave': gt $curloc
-	end
-else
-	'There is no one in the market.'
+			'But you already have a bag, so you move on.'
+		end
+	end	
 end
 
-act 'Go back to the station':minut += 3 & gt 'vokzalG'
-
 --- Grinok ---------------------------------
 

+ 1 - 1
locations/Snpc

@@ -241,7 +241,7 @@ if numnpc = 14 and meynoldQW = 1:
 end
 
 if numnpc = 14 and rand(1,5) = 1 and npcSex[14] = 1 and tanga = 0 and PCloSkirt > 1 and tangaday ! daystart :  gt 'Katja_tanga', 'start'
-if numnpc = 14 and rand(1,5) = 1 and Katja_tanga_end=1  and horny > 60 :
+if numnpc = 14 and rand(1,2) = 1  and katschoolsex = 1 and horny > 60 :
 	*clr
 	if $loc = 'gdkin':
 		minut += 1

+ 26 - 0
locations/dinmother

@@ -1,4 +1,5 @@
 # dinmother
+
 $d_mother[1]={
 	!scandal with my mother
 	'You try having a talk with your mother, but she dislikes you way too much to even pretend to be interested in what you have to say. After a while, you give up and leave her alone. Maybe she''ll be in a better mood later.'
@@ -63,5 +64,30 @@ $d_mother[3]={
 		'You have a chat with your mom, and she tells you she had to go to the tailor at the garment factory to get some clothes adjusted after she had went up a few sizes. She proudly added that she had to go back and have them readjusted again when she lost the weight a few months later.'
 	end
 }
+$d_mother[4] = {
+	*clr
+	$result = '<center><img src="images/qwest/alter/mother/posuda'+rand(1,3)+'.jpg"></center><br>Your <a href="exec:GT ''mother''">Mom</a> stands near the sink, washing dishes.'
+}
+
+$d_mother[5] = {
+	*clr
+	$result = '<center><img src="images/qwest/alter/mother/gotovka.jpg"></center><br>Your <a href="exec:GT ''mother''">Mom</a> is preparing meals.'
+}
+
+$d_mother[6] = {
+	*clr
+	$result = '<center><img src="images/qwest/alter/mother/tea.jpg"></center><br>Your <a href="exec:GT ''mother''">Mom</a> is drinking tea.'
+}
+
+$d_mother[7] = {
+	*clr
+	$result = '<center><img src="images/qwest/alter/mother/prost'+rand(1,11)+'.jpg"></center><br>Your <a href="exec:GT ''mother''">mom</a> is busy in the kitchen and unaware of your presence.'
+}
+
+$d_mother[8] = {
+	*clr
+	$result = '<center><img src="images/qwest/alter/mother/uborka'+rand(1,3)+'.jpg"></center><br>Your <a href="exec:GT ''mother''">Mom</a> is cleaning with a broom in her hand.'
+}
+
 --- dinmother ---------------------------------
 

+ 6 - 1
locations/dreams

@@ -1,7 +1,12 @@
 # dreams
 
 if $ARGS[0] = 'start':
-	if rand(1,100) > Enable_nodream:
+	if stepdadqw = 3:
+		'<center><img src="images/qwest/alter/father/bath_voyer_1.jpg"></center>'
+		'Today you had a very strange dream: you blindfolded sex with a stranger and only on completion of the action, after removing the bandage, you knew his stepfather.'
+		horny = 100
+		!you need trigger event (bath) again to advance. or we can simply add a stepdadqw += 1  by illume
+	elseif rand(1,100) > Enable_nodream:
 		!nodream chance cheat
 		if horny > 50:
 			!erotic dream

+ 8 - 12
locations/family

@@ -162,19 +162,15 @@ if StoryLine = 1:
 		end
 
 		if $loc = 'kuhrPar':
-			if week < 6:
-				if mother_go = 0:
-					if hour >= 16 and hour < 21:'Standing by the stove your <a href="exec:gt ''mother''">Mom</a> is cooking.'
-				else
-					if hour >= 17 and hour < 21:'Near the stove stands your <a href="exec:gt ''mother''">Mom</a> preparing food.'
-				end
-			end
+			gs 'dinmother'
 
-			if week >= 6:
-				if mother_go = 0:
-					if hour >= 7 and hour < 21:'Standing by the stove your <a href="exec:gt ''mother''">Mom</a> is cooking.'
-				else
-					if (hour >= 7 and hour < 16) or (hour >= 17 and hour < 21):'Near the stove stands your <a href="exec:gt ''mother''">Mom</a> preparing food.'
+			if mother_go = 0:
+				if (week < 6 and hour >= 16 and hour < 21) or (week >= 6 and hour >= 7 and hour < 21):
+					*pl dyneval($d_mother[rand(4,8)])
+				end
+			else
+				if (week < 6 and hour >= 17 and hour < 21) or (week >= 6 and hour >= 7 and hour < 21 and hour ! 16):
+					*pl dyneval($d_mother[rand(4,8)])
 				end
 			end
 		end

+ 54 - 7
locations/gschool

@@ -11,7 +11,9 @@ if $ARGS[0] = 'start':
 	'<center><b><font color="maroon">School</font></b></center>'
 	'<center><img src="images/qwest/alter/gschool.jpg"></center>'
 	'Pavlovsk''s only school, all the local children go here for their education.'
-
+	if hour >= 9 and hour < 18 and SchoolAtestat = 0 and kanikuli = 0:
+		'With the school open you can go to the <a href="exec:GT ''clothing_QV'',''list''">changing rooms</a> by the gym and pick an outfit to wear.'
+	end
 
 	act 'Return to town':gt 'pavResidential'
 
@@ -68,11 +70,22 @@ if $ARGS[0] = 'start':
 		end
 	end
 
-	if hour <= 8 and week < 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0:
-		if $clothingworntype = 'school':
-			act 'Go to school':gt 'gschool2', 'start'
-		else
-			'You''re not allowed to attend any classes at school if you''re not wearing your school uniform.'
+	if week < 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0:
+		if hour < 7 :
+			'It''s too early for school now.'
+		elseif hour < 10 :
+			if $clothingworntype = 'school' or Enable_sforma = 1:
+
+				act 'Go to school':
+					!one line late from 1.2.4, timerange check by illume
+					if hour >= 9: late=1
+					gt 'gschool2', 'start'
+				end
+			else
+				'You''re not allowed to attend any classes at school if you''re not wearing your school uniform.'
+			end
+		elseif hour < 16 :
+			'It''s too late for school now. You absent from school today'
 		end
 	end
 
@@ -308,7 +321,7 @@ if $ARGS[0] = 'SchoolRun':
 		act 'Return to town':gt 'pavResidential'
 	end
 end
-
+afterschoolday=0&gt 'gschool','suck'
 if $ARGS[0] = 'suck':
 	aftgopbjrand = rand(0, 2)
 
@@ -360,6 +373,40 @@ if $ARGS[0] = 'suck':
 				end
 			end
 		end
+
+		!new act:excuse from 1.2.4
+		act 'Excuses':
+			cls 
+			minut +=1
+			! false, pizdezh and provocation, lpp
+			:ReCheck
+			lpp = rand(0,3) 
+			!twice in a row the same shit does not roll, so:
+			if lastlpp!0 and lastlpp=lpp: jump 'ReCheck'
+			$textlpp[0]='- Boys... I got to the dentist, the tooth hurts very much, please release!
+- Who cares? Suck quickly and you may go.
+- I`ll miss the reception, lamentably meet you.
+- Another time you go!
+Frantically inventing excuses, you remember he had seen on television advertising:
+- Okay... You Fuckers have?
+- What?! You Shmarov, generally swollen.?!
+- Well, you me to the dentist is not allowed, and I got the bacteria that cause inflammation...'
+			$textlpp[1]='- I can`t, I think I have herpes jumps...'
+			$textlpp[2]='
+The list of excuses against suction is small, and you frantically think of anything to say.
+- I can... I`m sick... - you`re mumbling a lot, holding his stomach, presenting himself as a sucking stinky dick.
+Your face is naturally green.
+- Really I was going to throw up, ` growled someone from the boys.'
+			$textlpp[3]='- I think I might have tonsillitis... Throat hurts, no strength, - feigning a hoarse voice, you say.'
+*pl $textlpp[lpp]
+'- Fu fuck, you get out there now. Then work doubly realized?
+- Yes! - voskliknula you. In my head flashed the thought "Here motherfuckers..."'
+			lastlpp = lpp
+			afterschoolday = daystart
+			killvar '$textlpp'
+			killvar 'lpp'
+			act 'Leave': gt 'gschool' , 'start'
+		end
 	end
 end
 

+ 195 - 10
locations/gschool2

@@ -44,16 +44,201 @@ if $ARGS[0] = 'start':
 	end
 
 	if hour <= 8:
-		act 'Go to class':
-			cls
-			hour = 9
-			minut = 0
-			!gt 'gschool3', 'rand_class'
-			gt 'gschool2', 'class'
+		if rand(0,1) = 0:	
+			act 'Go to class':
+				cls
+				hour = 9
+				minut = 0
+				!gt 'gschool3', 'rand_class'
+				gt 'gschool2', 'class'
 
-			!'Finally the bell rang and the students went to a big change.'
+				!'Finally the bell rang and the students went to a big change.'
+
+				!gt 'gschool2', 'lunch'
+			end		
+		else
+			!meet teacher, from 1.2.4
+			'You walk down the corridor, past through countless classes and classrooms. On the next corner, you meet your teacher - Anatoly Evgenievich.'
+			act 'Hello':
+				cla
+				*clr
+				if grupNPC[26] < 10:
+					if vnesh < 20:
+						'<center><img src="images/qwest/alter/school/teacher1.jpg"></center>'
+						if rand(0,1) = 0:
+							'- Good morning, Anatoly Evgenievich, you have a nice day.'
+							'The teacher just waved his head in your direction and passed nedosluhavshy to you until the end.'
+						else
+							'- Hello Anatoly Evgenievich, looking forward to your classes.'
+							'- Hello Anna! You better hurry to class, late, ` replied the teacher, calling you a different name. Apparently, he doesn`t even remember your name.'
+						end
+						manna -= 5
+					else
+						'<center><img src="images/qwest/alter/school/teacher2.jpg"></center>'
+						'- Good morning, Anatoly Evgenievich, you have a nice day. Looking forward to your lessons - you turned to the teacher.'
+						'- Hello <<$name>>, and I with impatience I shall wait for such a wonderful student like you, - replied the teacher, obviously not looking you in the face, but somewhere on the level of the hips.'
+						grupNPC[26] += 1
+					end
+				else
+					'<center><img src="images/qwest/alter/school/teacher2.jpg"></center>'
+					if rand(0,1) = 0:
+						'- Good morning, Anatoly Evgenievich, you have a nice day. Looking forward to your lessons - you turned to the teacher.
+						- Hi, <<$nickname>>. Today I will ask homework. Prepared? Or shouldn`t I ask you? - a friend turned to you teacher
+						- Oh you know, I tried to teach, but something really tired late last night with the girls from the club came back, can`t Wake to torment me today, please, ` groaned you, making pretty little face.
+						- Okay <<$nickname>>, but this is the last time you answered the teacher phrase that was said more than once over the past few years. 
+						- Thank you, Anatoly Evgenievich! Why don`t we believe in our club? There goes a lot of adult men, and some teachers asked you.
+						- Sorry, I`m married, ` replied you are the teacher and you both laughed.'
+						manna += 5
+					else
+						'- Anatoly Evgenyevich, what we have today will be the lesson? New theme? And maybe let us go early? - asked you to the teacher.'
+						'- Yes, the new theme. Release unfortunately, I can`t, the new Director strictly monitors it - sadly replied the teacher.'
+					end
+					grupNPC[26] += 1
+				end
+				act 'Go to class':gt 'gschool2', 'class'
+			end
+			act 'Say Hello flirty ':
+				cla
+				*clr
+				if grupNPC[26] < 10:
+					if vnesh < 20:
+						if rand(0,1) = 0:
+							'- Hello, Anatoly Evgenievich, you are so pretty, you greeted the teacher, smiling with all his teeth, trying to attract attention.'
+							'- <<$surname>>, to get I have fine, one little smile will be the master, but still smiled at you in response.'
+						else
+							'You went to meet your teacher, he was quite sour, you decided to cheer him up and with a smile on his face waved to him.'
+							'In response, the teacher smiled at you and went on about their business'
+						end
+						grupNPC[26] += 1
+					else
+						if rand(0,1) = 0:
+							'- Hello, Anatoly Evgenievich, you are so beautiful today. you greeted the teacher, smiling with all his teeth, trying to attract attention.'
+							'- Thank you <<$nickname>>, I`d pay you a compliment, but do not support such informal relationships with pupils, - replied the teacher, but still smiled back.'
+							grupNPC[26] += 1
+						else
+							'- Good morning, Anatoly Evgenievich, you have a new suit, so chic. - a very erotic voice, you turned to the teacher.'
+							'After your words, the teacher was kind of a weird shrinking and speeding up the move went towards the toilet. Before leaving, you heard muttering incoherently your teacher, you understand he`s trying to contact you to say Hello or respond to a compliment, but apparently a little confused.'
+						end
+					end
+				else
+					if rand(0,1) = 0:
+						'- Hello, Anatoly Evgenievich, you are so pretty, you greeted the teacher, smiling with all his teeth, trying to attract attention.'
+						'- Wife in night shift worked, so had to eat normal food in the cafe, ` replied you are a teacher and you laughed together.'
+						'- Well, maybe I`ll try to cook, well, just to show you what I`ve learned in the classroom work - serious voice answered you.'
+						'- You know, <<$nickname>>, maybe we should arrange something like the tea party with the class the girls to make a cake, the guys will prepare a class, - replied the teacher, obviously not understanding your hint.'
+						'- That`s not what I meant, - obidevshis you replied and went away.'
+						manna -= 10
+						grupNPC[26] -= 1
+					else
+						'- Good morning, Anatoly Evgenievich, you have a new suit, so chic - very erotic voice, you turned to the teacher.'
+						'- Thanks <<$nickname>>. I bought myself the latest patch - you said the teacher.'
+						grupNPC[26] += 1
+					end
+				end
+				act 'Go to class':gt 'gschool2', 'class'
+			end
+			act 'Silently pass by':
+				cla
+				*clr
+				if grupNPC[26] < 10:
+					cla
+					*clr
+					if vnesh < 20:
+						'You are very hurried about their business, and you know bad. So we decided to just pass by. The more the teacher wasn`t even looking in your direction.'
+					else
+						'- Good morning, <<$surname>>, with a teacher you think has no need to greet? - strictly asked you teacher.'
+						'- Oh, Anatoly Evgenievich, good morning, sorry I didn`t notice that fact, dreaming at all, ` replied the teacher, and you ran away.'
+					end
+					act 'Go to class':gt 'gschool2', 'class'
+				else
+					cla
+					*clr
+					'- Good morning, <<$surname>>. Why not say Hello? The teacher can`t punish or reward for such actions. But still you`ve got this year exam. Should behave more kindly, - cdid you note teacher.'
+					act 'To apologize and to say Hello':
+						cla
+						*clr
+						'Oh, Anatoly Evgenievich, I`m sorry, I didn`t see you. Of course, good day to you. Looking forward to our lessons - you said smiling.'
+						grupNPC[26] += 1
+						act 'Go to class':gt 'gschool2', 'class'
+					end
+					act 'Touch your hand and apologize':
+						cla
+						*clr
+						'Oh, Anatoly Evgenievich, I`m sorry, I didn`t see you, said happily you and coming closer, as if by accident, touched his arm.'
+						'Just today, this morning heavy fell, but still not got much sleep. So you don`t get offended, and I put more fives.'
+						if vnesh >= 20: grupNPC[26] += 1
+						act 'Go to class':gt 'gschool2', 'class'
+					end
+					act 'Ignore the comment':
+						cla
+						*clr
+						'You pretended that did not hear the teacher`s remark and went on about their business.'
+						dom += 1
+						grupNPC[26] -= 1
+						act 'Go to class':gt 'gschool2', 'class'
+					end
+				end
+			end
+			if grupNPC[26] > 20 and vnesh >= 20:
+				act 'Seduce':
+					cla
+					*clr
+					'You decided to go. Yes, and everything, need to earn some extra points in front of a teacher.'
+					act 'Lick lips':
+						cla
+						*clr
+						'You decided to tease Anatoly Evgenyevich and catching his eyes on her licked their lips.'
+						'- Seeing this, the teacher smiled for a moment, but pretending nothing had happened, went further.'
+						grupNPC[26] += 1
+						act 'Go to class':gt 'gschool2', 'class'
+					end
+					act 'Dropping textbooks':
+						cla
+						*clr
+						grupNPC[26] += 1
+						'You dropped some books and standing on all fours steel from side to side to wag his booty.'
+						'- <<$nickname>>, I guess you can just sit down, or you prefer. And the youth now went completely without complexes, look as if someone took the opportunity - with a smile said the teacher'
+						act 'Stand up and try to start a conversation':
+							cla
+							*clr
+							'- Well, then I was lucky that I met you. A grown and respectable man, not some kid. I don`t really understand it, and therefore I prefer to make friends and chat with older people, you answered the teacher.'
+							'- Yes, <<$surname>>, the behavior you`re obviously a bad, - said the teacher and went down the hall. While leaving, he gently ran his hand on your back'
+							horny += 3
+							act 'Go to class':gt 'gschool2', 'class'
+						end
+						act 'Bare ass':
+							cla
+							*clr
+							'You don`t have to pay attention to the master`s words and decided to have fun a little more. Reaching for the next tutorial, you inadvertently pulled the skirt, the teacher opened the full view of your ass.'
+							if tanga = 1:
+								'- <<$surname>>, what`s up, cover up, the teacher rushed to you and pulled your skirt, covering your ass.'
+								'- Anatoly Evgenievich, but it`s just us. And with you around I always feel safe - you replied, getting up from the floor.'
+							else
+								'- <<$surname>>, what`s up, cover up, the teacher noticed that you don`t have underwear, quickly ran to you and pulled her skirt, hiding your charms.'
+							end
+							'The teacher gave you a tutorial, and you went, not saying a word more to each other.'
+							act 'Go to class':gt 'gschool2', 'class'
+						end
+					end
+					act 'Stumble and fall to the teacher at the hands':
+						cla
+						*clr
+						if rand(0,4) > 0:
+							'You stumbled and fell to his teacher at the hands. He in turn, deftly catching you, did I:'
+							'- <<$surname>>, why are you so worn, and hurt ourselves, said you and the teacher went on about their business.'
+						else
+							'You fell in front of a teacher. However, he lacked the agility, and he caught you. From falling you scratched my leg and hurt yourself. The teacher bent over you trying to help.'
+							'- Oh-Oh-Oh, my leg hurts. Oh, Anatoly Evgenievich, look, she`s all right? - you said and stretched out his wounded leg in front of the teachers face. He began to inspect the leg - one hand took you by the ankle, and the other was stroking on my thigh, just above the abrasion.'
+							'- Well, <<$nickname>>, need to be careful. You have very beautiful legs that you have to protect them. - gently whispered to you teacher.'
+							'He took out his handkerchief and began to wipe the damaged place, continuing to caress your legs.'
+							'- Well, I`ve done everything I could. Go to the infirmary, there to you will help. - he put you on his feet and went about his business.'
+							grupNPC[26] += 2
+						end
+						act 'Go to class':gt 'gschool2', 'class'
+					end
+				end
+			end
 
-			!gt 'gschool2', 'lunch'
 		end
 	end
 end
@@ -173,7 +358,7 @@ if $ARGS[0] = 'class':
 									'Your teacher doesn''t know what to say, and after a while just decides to continue his classes. You obviously don''t learn anything today.'
 									act'Wait for the end of the lesson':gt 'gschool2', 'lunch'
 								end
-								act'Leave the classroom':school_event_hour = day & gt 'gschool2', 'lunch'
+								act'Leave the classroom':school_event_hour = daystart & gt 'gschool2', 'lunch'
 								exit
 							else
 								'The eyes of <<$teacher>> grow narrower, and even though you roll your eyes at him, you sit through the rest of the lesson in silence, at least pretending to pay attention sometimes. You don''t learn anything today.'
@@ -270,7 +455,7 @@ if $ARGS[0] = 'break':
 			'You quietly nod and Katja takes you by the hand, leading you to a small storage closet. The door is barely closed behind you when she pulls you tightly against her, giving you an aggressive kiss on the lips. She whispers passionately, "<<$nickname>>, I want you..."'
 
 			if rand(1,2) = 1 and katschoolsex >= 1:
-				gt 'Katja_Tanga', 'secretroom'
+				act 'go somewhere private': gt 'Katja_Tanga', 'secretroom'
 			else
 
 				act 'Eat Katja out':