Browse Source

this commit reverted the files to the 0.2.5e community version

morgolon 10 years ago
parent
commit
9d8e0bbc10
100 changed files with 16785 additions and 0 deletions
  1. 104 0
      locations/AlbFatherQW
  2. 135 0
      locations/Alphabet
  3. 138 0
      locations/AnalPR
  4. 107 0
      locations/BDSM
  5. 221 0
      locations/BDman
  6. 796 0
      locations/BDsex
  7. 65 0
      locations/BnameGen
  8. 806 0
      locations/BurgerTip
  9. 100 0
      locations/DanceWhore1
  10. 106 0
      locations/DanceWhore2
  11. 101 0
      locations/DanceWhore3
  12. 108 0
      locations/DanceWhore4
  13. 61 0
      locations/DanceWhore5
  14. 99 0
      locations/DanceWhore6
  15. 105 0
      locations/DanceWhore7
  16. 61 0
      locations/DanceWhore8
  17. 605 0
      locations/EvBoyBuh
  18. 280 0
      locations/EvOtelMan
  19. 325 0
      locations/EvgopBuh
  20. 49 0
      locations/FSfight
  21. 42 0
      locations/FSgame
  22. 30 0
      locations/FSroom
  23. 53 0
      locations/FSstart
  24. 135 0
      locations/FSstat
  25. 29 0
      locations/FedorEv
  26. 158 0
      locations/Gnpc
  27. 1170 0
      locations/Gnpc2
  28. 95 0
      locations/Hall
  29. 37 0
      locations/IgorEv
  30. 222 0
      locations/IrinaRoom
  31. 66 0
      locations/IvanEv
  32. 12 0
      locations/KGDbefore
  33. 26 0
      locations/KGDexp
  34. 16 0
      locations/KGDfight
  35. 310 0
      locations/KGDgame
  36. 128 0
      locations/KGDparty
  37. 35 0
      locations/KGDstart
  38. 35 0
      locations/KGOLboss
  39. 166 0
      locations/KGOLenemy
  40. 151 0
      locations/KGOLexpa
  41. 279 0
      locations/KGOLfight
  42. 296 0
      locations/KGOLgame
  43. 1080 0
      locations/KGZdyn
  44. 142 0
      locations/KGZfight
  45. 635 0
      locations/KGZgame
  46. 61 0
      locations/KGZstart
  47. 138 0
      locations/KGstart
  48. 239 0
      locations/Kafe2
  49. 393 0
      locations/Kafe3
  50. 116 0
      locations/Katlake
  51. 86 0
      locations/Kikatak
  52. 127 0
      locations/Klub2
  53. 461 0
      locations/Komp
  54. 62 0
      locations/Kwlake1
  55. 42 0
      locations/Kwlake2
  56. 135 0
      locations/LCporn
  57. 222 0
      locations/LCwork
  58. 21 0
      locations/LOCA
  59. 92 0
      locations/Mariya1
  60. 178 0
      locations/Market
  61. 103 0
      locations/MenuLoc
  62. 11 0
      locations/MenuMainLoc
  63. 162 0
      locations/Military
  64. 60 0
      locations/NewCloShop
  65. 102 0
      locations/Nord
  66. 81 0
      locations/NormPR
  67. 92 0
      locations/Nudelake
  68. 49 0
      locations/Palatka
  69. 295 0
      locations/ParkKafe
  70. 255 0
      locations/Peterroom
  71. 452 0
      locations/Prostitute
  72. 37 0
      locations/QwestDisdock
  73. 222 0
      locations/RESULTS
  74. 219 0
      locations/RimmaSexQW
  75. 215 0
      locations/RynokHoz
  76. 16 0
      locations/Sgrup
  77. 16 0
      locations/Sgrup1
  78. 16 0
      locations/Sgrup2
  79. 16 0
      locations/Sgrup3
  80. 16 0
      locations/Sgrup4
  81. 16 0
      locations/Sgrup5
  82. 22 0
      locations/SgrupDisco
  83. 204 0
      locations/Snpc
  84. 166 0
      locations/StasQW
  85. 53 0
      locations/StasSex
  86. 73 0
      locations/TV
  87. 35 0
      locations/Terminal
  88. 46 0
      locations/Timofei
  89. 33 0
      locations/TimofeiMetro
  90. 114 0
      locations/Vnlake1
  91. 45 0
      locations/Vnlake2
  92. 177 0
      locations/Voltrener
  93. 189 0
      locations/WorkHosp
  94. 105 0
      locations/agentned
  95. 99 0
      locations/albinaEv
  96. 67 0
      locations/alex
  97. 89 0
      locations/alexgang
  98. 442 0
      locations/alterStart
  99. 36 0
      locations/amrul
  100. 246 0
      locations/andrey

+ 104 - 0
locations/AlbFatherQW

@@ -0,0 +1,104 @@
+# AlbFatherQW
+$din_zajava_albfather = {
+act 'Okay. I will write a statement.':
+cls
+minut += 1
+AlbFather = 2
+!ZvezdEnd = 1
+gs 'stat'
+'You have agreed to write a statement, Captain quite nodded. "You´re a smart girl and choose the right side. Come to me in the car, everything is there to arrange quick."'
+	act 'Albina warn':
+	cls
+	minut += 1
+	gs 'stat'
+	'You have written and signed statement to the captain, and then he let go of you.'
+	act 'Escape.': gt 'gorodok'
+	end
+end
+
+}
+$din_zajava_albfather_no2 = {
+act 'And yet I refuse':
+cls
+minut += 1
+AlbFather = -1
+gs 'stat'
+'You resolutely refused to write a statement to the captain. Captain sighed sadly, "I see. You currently have acquired powerful enemies girl."'
+	act 'Albina warn':
+	cls
+	minut += 1
+	AlbFrend = 1
+	!ZvezdEnd = 1
+	gs 'stat'
+	'You quickly dialed the number and Albina told her what had happened. Albina said thoughtfully thank you and hung up.'
+	act 'Escape.': gt 'gorodok'
+	end
+end
+}
+$din_zajava_albfather_no = {
+act 'I will not write a statement!':
+cls
+minut += 1
+gs 'stat'
+'You refused to write a statement and the captain began to persuade you. "Think about the consequences. Albina not you pass, so somebody else, in the end we ourselves can take it easy now. Lack of evidence."'
+	if intel >= 80:
+		act 'And why would I tell you?':
+		cls
+		minut += 1
+		gs 'stat'
+		'You asked the captain if they all so good, then why are you thio them. The captain replied, "Frankly, it´s not our jurisdiction, and to act without direct application dangerous Barlovskogo we can and push, but we may not be pleasant consequences. A statement is a guarantee of success of the operation."'
+		dynamic $din_zajava_albfather
+		dynamic $din_zajava_albfather_no2
+		end
+	end
+
+		dynamic $din_zajava_albfather
+		dynamic $din_zajava_albfather_no2
+end
+}
+
+gs 'stat'
+'Suddenly stops the car next to you. It comes from a man in a nice suit and suitable for you. He pulls out of Corman´s license and opened it seems. "Captain Chernov. State Security Service." You surprise spotted documents all true identity now. You said in surprise, "Why I needed you? Here what that mistake." Captain confident tone Chernov told you "No mistake, you <<$name>> <<$surname>>, let´s step aside and talk."'
+
+
+act 'Move with Chernov':
+cls
+minut += 1
+gs 'stat'
+'You walked away with Captain Chernov. Along the way, you notice how it sticks armpit holster with gun. Ogladevshis Chernov begins "<<$name>>. I know that you are new to the team Zvezdushki. Just know anything but this team has been dancing. Zvezdushkam will end soon, with your help or without your help. It´s not even so important, what is important when case will be set in motion, the whole town will know what you did in this team. And not even so important, engaged or not, but will not stop the gossip. give you a big fine, inform parents, school, put on record with the police. But all this can be avoided. "'
+	act 'How to Avoid?':
+	cls
+	minut += 1
+	gs 'stat'
+	if age < 18: 'You asked the captain Chernoff as possible to avoid publicity and consequences. Captain Chernov said to you "You write to the security service that Albina Barlovskaya entices you into prostitution. Besides you are underage. This extra trouble for Albina."'
+	if age >= 18: 'You asked the captain Chernoff as possible to avoid publicity and consequences. Captain Chernov said to you "You write to the security service that Albina Barlovskaya entices you into prostitution."'
+	'Chernov captain paused, giving you time to think and continued. "If you write an application, you will be charged as the victim, no publicity will not. Actually, and no matter what will not write a statement. Next´ll have this thing in me."'
+		if intel >= 70:
+		act 'And why is engaged in the security service, and not the police?':
+		cls
+		minut += 1
+		gs 'stat'
+		'You asked what is so important in Albina, she took not the police and security service. Captain bad grinned "I underestimated you, you´re a smart girl. Okay, I´ll play in the open. You know who the father of Albina? Barlovsky Boris, a retired police colonel. He served as chief of police in this town. Suppose he is retired now, but it had great communication with the police. "'
+		if intel >= 75:
+				act 'You did not answer the question.':
+				cls
+				minut += 1
+				gs 'stat'
+				'You told the captain that he did not answer the question, why now suddenly interested in the affairs of Albina why security service. The captain nodded, "It´s very simple. Albina´s father decided to go into politics and become the mayor of the town. There are certain forces that want to stop him. What could be better daughter criminals engaged in a brothel."'
+				dynamic $din_zajava_albfather
+				dynamic $din_zajava_albfather_no
+				end
+			end
+
+		dynamic $din_zajava_albfather
+		dynamic $din_zajava_albfather_no
+		end
+		end
+
+		dynamic $din_zajava_albfather
+
+		dynamic $din_zajava_albfather_no
+	end
+end
+--- AlbFatherQW ---------------------------------
+

+ 135 - 0
locations/Alphabet

@@ -0,0 +1,135 @@
+# Alphabet
+ACT 'In the corridor':
+	gt 'floor'
+END
+'<center><B>dorm room</B></center>'
+'<center><img src="images\etogame\obskom.jpg"></center>'
+clr
+gs 'stat'
+'Narrow room with a single window, wooden floor, three <a href="exec:GT ''Beds'',''choice''">beds</a>, small <a href="exec:GT ''table''">table</a> and a few chairs. At the entrance stands the old <a href="exec:GT ''cupboard''">wardrobe</a> to which to attach the old <a href="exec:GT ''zerkaloO''">mirror</a>.'
+if palto = 1: 'At the entrance hangs a simple Chinese women´s down jacket'
+if palto = 2: 'At the entrance hangs a woman´s coat'
+if palto = 3: 'At the entrance hangs a dear lady´s coat'
+
+if daystart = 0: Set daystart = 1
+if house = 1 and student = 0: Set house = 0 & 'You are being evicted from their dormitory if right now you find yourself through the computer place to stay, you will remain without a roof over your head at the first exit from the hostel.'
+
+act 'roommate Vic':
+cla
+clr
+gs 'stat'
+'Vick sits on her bed and as always paints her nails.'
+act 'Room': gt 'Alphabet'
+	if час < 23:
+		act 'Chat with Vika (1:00)':
+		cla
+		Set час += 1
+		Set Vika += 5
+		Set kosmskill += 1
+		if repa < 30: Set repa += 1
+		set talkrand = RAND(0,18)
+		if talkrand = 0: 'You started talking with Vika, she tells you about the boys she met, about parties, about cosmetics.'
+		if talkrand = 1: 'Wick says she was in a cafe and invited her to dance even then the guy who paid her bill.'
+		if talkrand = 2: 'Wick says she worked as a waitress at a strip bar, quite lucrative job for students, although customers are very pristavuchi.'
+		if talkrand = 3: 'Vic tells you that several sections of beautiful girls running at the college went on a European level sports competitions and earn big money, but of course that Vick priznaetsya her laziness so they plow.'
+		if talkrand = 4: 'Vick says that one of her friends flew from a guy who did not have time to pull out of it. But Vick smarter, she buys in a pharmacy contraceptives, 100% satisfaction guarantee.'
+		if talkrand = 5: 'Vick says that to stay, buy an apartment or a car can be only having a PC, via the Internet.'
+		if talkrand = 6: 'Vic tells how one of her friend, bought a car, took place in the market and hired a saleswoman. He can only buy the goods in stock and bring it to market themselves and money flowing to it.'
+		if talkrand = 7: 'Vic tells how she once winter went outside without a coat and a bad cold.'
+		if talkrand = 8: 'Vic tells about a girlfriend who all did not know how to lose weight, then started going to the sauna and lose weight. True it is costly.'
+		if talkrand = 9: 'Vick says that before she was fond of diets, but they deteriorated skin and went pryshi, and start to hurt, now Vick cracks for three and only become more beautiful.'
+		if talkrand = 10: 'Vic says that she used to go to dances and the Internet has managed to get into a nightclub tantsorshey, but she quickly tired of it.'
+		if talkrand = 11: 'Vick says in the park, she accidentally went to the panel and she was offered sex for money, but do not spoil the reputation of Vic wanted, besides a large number of partners from start to age faster.'
+		if talkrand = 12: 'Vic tells how she acted naked in studio, not a dusty job, but reputation suffers.'
+		if talkrand = 13: 'Vick told her friend as one that everyone perceived as a slut arranged several parties in the cafe at his own expense, then it refers to become better.'
+		if talkrand = 14: 'Vic tells a horror story about how one pretty girl did not wash his feet and did not shave, then became so terrible to her for all obbegat kilometer.'
+		if talkrand = 15: 'Vic says that she buys tampons always with a reserve, and then if they go without a monthly then quickly prevratishsya in slut.'
+		if talkrand = 16: 'Vic tells how one of her guys wanted anal sex, but she was not in possession of Vaseline.'
+		if talkrand = 17: 'Vick says the summer sunning herself on the beach, for this truth had her buy a swimsuit, but it came in handy in the winter and go to the pool. The pool is not a bad tool to maintain a healthy body.'
+		if talkrand = 18: 'Vic tells an interesting psychological effect is in the stores do not notice things that are not short of money.'
+		act 'Room': gt 'Alphabet'
+		end
+		if Vika > 10:
+		cla
+		if vikavecher = 0: Set vikavecher = 1
+		'Vic tells you that the party is planned, as well, and always on Fridays. You can go there with Vika'
+		act 'Go to a party': gt 'party','start'
+		act 'I have business': gt 'Alphabet'
+		end
+		if Vika > 10 and Vzaem = 0:
+			act 'Borrow from Wiki 1000 rubles':
+			cla
+			Set money += 1000
+			Set Vzaem = 1
+			'Vick fumbled in her purse and gave you 1000 rubles in debt'
+			act 'Room': gt 'Alphabet'
+			end
+		end
+		if Vika > 10 and Vzaem = 1 and money >= 1000:
+			act 'Giving Vick debt 1,000 rubles':
+			cla
+			Set money -= 1000
+			Set Vzaem = 0
+			Set Vika += 5
+			'You gave Vick 1000 rubles taken you in debt'
+			act 'Room': gt 'Alphabet'
+			end
+		end
+		if vikasex > 0 and Vika > 20:
+			act 'Offer fun':
+			cla
+			Set час += 1
+			Set $girl = 'Vetch'
+			gt 'lesb','start'
+			end
+		end
+	end
+end
+
+act 'roommate Galya':
+cla
+clr
+gs 'stat'
+'Galya overlaid textbooks and bison.'
+act 'Room': gt 'Alphabet'
+	if час < 23:
+		act 'Engage with Galya (1:00)':
+		cla
+		Set час += 1
+		Set intel += 1
+		Set Gala += 5
+		if repa > 1: Set repa -= 1
+		'You overlaid textbooks and began to prepare together with Galya.'
+		act 'Room': gt 'Alphabet'
+		end
+		if Gala > 10 and Gzaem = 0:
+			act 'Borrow from Ghali 1000 rubles':
+			cla
+			Set money += 1000
+			Set Gzaem = 1
+			'Galya rummaged in my purse and gave you 1000 rubles in debt'
+			act 'Room': gt 'Alphabet'
+			end
+		end
+		if Gala > 10 and Gzaem = 1 and money >= 1000:
+			act 'Giving Gala 1000 rubles debt':
+			cla
+			Set money -= 1000
+			Set Gzaem = 0
+			Set Gala += 5
+			'You gave Gale 1000 rubles taken you in debt'
+			act 'Room': gt 'Alphabet'
+			end
+		end
+
+	end
+end
+
+!act 'Test':
+!Set newboy = 1
+!gs 'boy'
+!gs 'boyopred'
+!act 'Room': gt 'Alphabet'
+!end
+--- Alphabet ---------------------------------
+

+ 138 - 0
locations/AnalPR

@@ -0,0 +1,138 @@
+# AnalPR
+if $ARGS[0] = '1':
+$metka = $ARGS[0]
+$loc = $CURLOC
+*clr
+cla
+set minut += 1
+set prosti = 0
+clr
+gs 'stat'
+'<center><img src="images\img\prost\anal.jpg"></center>'
+set dickK = dick * 10/100
+if dickK < 1: set dickK = 1
+set anus += dickK
+
+	if anus < dick:
+	set fun = 0
+	set $analsex = 'Ass ached when the member entered her client waited for a bit until your ass adapt and gradually began to move his cock in you, gradually accelerating.'
+	end
+
+	if anus >= dick:
+	set horny += anus
+	set $analsex = 'You felt like like vagina stretched anus clasping member when a customer came in you, he immediately began to have your ass.'
+	end
+'You got cancer and client uper you in your anus <<dick>> centimeter member. <<$analsex>>'
+'Finally, the client does not stand up and ends in a condom.'
+set anal += 1
+money += ProsMoney * 100
+set analprotect = 1
+act 'Leave.': GOTO $locSex, $metkaSex
+end
+
+if $ARGS[0] = '2':
+$metka = $ARGS[0]
+$loc = $CURLOC
+*clr
+cla
+set minut += 1
+set prosti = 0
+clr
+gs 'stat'
+set picanRand = RAND(1,6)
+if picanRand = 1: '<center><img src="images\img\prost\cowl.jpg"></center>'
+if picanRand = 2: '<center><img src="images\img\prost\cowl2.jpg"></center>'
+if picanRand = 3: '<center><img src="images\img\prost\cowl3.jpg"></center>'
+if picanRand = 4: '<center><img src="images\img\prost\cowl4.jpg"></center>'
+if picanRand = 5: '<center><img src="images\img\prost\cowl5.jpg"></center>'
+if picanRand = 6: '<center><img src="images\img\prost\cowl6.jpg"></center>'
+set dickK = dick * 10/100
+if dickK < 1: set dickK = 1
+set anus += dickK
+	if anus < dick:
+	set fun = 0
+	set $analsex = 'A sharp pain pierced member of stuck in the ass, making you wince groan. Customer waited patiently until your anus, get used to stretching, but you still could not get rid of the nagging pain. Fake smile, through the desire to end this torture quickly, you give the signal to start the action. Client was cautious, starting with the slow movements in the anus, gradually accelerating, he forgot about your suffering, surrendering his own enjoyment, and not noticing as "goods", writhes and moans in pain.'
+	end
+	if anus >= dick:
+	set horny += anus
+	set $analsex = 'You felt like like vagina stretched anus clasping member when a customer came in you, he immediately began to have your ass.'
+	end
+'As soon as you lay on the hood of the car, legs apart, you stared into the anus <<dick>> centimeter member. <<$analsex>>'
+
+if klismaday ! day and analprotect = 0: act 'Leave': gt 'AnalPR','3'
+
+	if klismaday = day:
+	set money += 2000
+	set cumanalRand = RAND(0,2)
+
+		if cumanalRand = 0:
+		'Suddenly the anus was empty, the client abruptly yanked member before it drops the seed watered half your ass.'
+		set anal += 1
+		set cumanal = cumass + 1
+		act 'Leave.': GOTO $locSex, $metkaSex
+		end
+
+		if cumanalRand = 1:
+		'Suddenly the anus was empty, the client abruptly yanked a member before his seed rain drops fell on your body, dirtying clothes traces of dairy.'
+		set anal += 1
+		set cumfrot += 1
+		act 'Leave.': GOTO $locSex, $metkaSex
+		end
+
+		if cumanalRand = 2:
+		'Customer traffic have become sharp and painful it literally rammed in the ass you finally feel like you´re inside you flowing sperm all over you think.'
+		set anal += 1
+		set cumanus += 1
+		act 'Leave.': GOTO $locSex, $metkaSex
+		end
+	end
+end
+
+if $ARGS[0] = '3':
+cla
+*clr
+gs 'stat'
+'You were going to get the money but instead heard swearing. "You fear that the nipple completely lost my whole bolt in your shit, you do not know that I have a dick, and not brush the toilet, get out of here while intact, but money can not forget."'
+act 'Leave.': GOTO $locSex, $metkaSex
+if intel <= 100: act 'Be rude': gt 'AnalPR','4'
+if intel >= 50: act 'Make amends': gt 'AnalPR','5'
+end
+
+if $ARGS[0] = '4':
+cla
+*clr
+gs 'stat'
+'<center><img src="images\img\prost\bjr.jpg"></center>'
+'"Hey, I did not understand, chase my money ..." you did not get to finish. Man hit you strong blow to the chest, from which you crashed to the ground. "Money is wanted, well, what a bitch I´ll give them to you, but you are correct his mistake" after these words he drove you exhaling stench dick in her mouth. You were choking from the stench, but there was nothing, his eyes closed, as if saying yes, you tried to keep from vomiting, fear of causing mayhem. The stranger had you in my mouth, trying to touch every movement of your lips their balls. His cock soon became clean, but it did not stop him, it seemed an eternity before he again finished right in the throat. Looking at you roll in a mixture of saliva and vomit, he laughed and said no more words thrown in your face money.'
+set money += ProsMoney * 100
+set manna -= 30
+set health -= 30
+set willpower -= 30
+set bj += 1
+set throat += 1
+act 'Leave.': GOTO $locSex, $metkaSex
+end
+
+if $ARGS[0] = '5':
+cla
+*clr
+gs 'stat'
+'<center><img src="images\img\prost\bjr1.jpg"></center>'
+'You understand everything perfectly, you are at fault, and you correct client insanely angry and seems ready to tear you to pieces. You decide to make amends, his guilt polish smeared mouth organ client.'
+set bj += 1
+set throat += 1
+act 'Suck': gt 'AnalPR','6'
+end
+
+if $ARGS[0] = '6':
+cla
+*clr
+gs 'stat'
+'<center><img src="images\img\prost\sexcar20.jpg"></center>'
+'Bitter taste in the mouth of feces did not give you a taste of diluted semen. Freeing your mouth working, customer ordered to lie on the grass. You humbly and even with a certain touch of acting talent was acting innocent doll while you fuck. Client warmed your able mouth twitching long over you, quickly ran into the condom. While you lay recovering on your body fall three green paper, he was satisfied, happy smile you think.'
+set vagina += 1
+set money += ProsMoney * 110
+act 'Leave.': GOTO $locSex, $metkaSex
+end
+--- AnalPR ---------------------------------
+

+ 107 - 0
locations/BDSM

@@ -0,0 +1,107 @@
+# BDSM
+$metka = $ARGS[0]
+$loc = $CURLOC
+cla
+*clr
+clr
+gs 'stat'
+'You came to the set where all was ready for filming a porn movie.'
+act 'Begin participating in the shooting':
+cla
+*clr
+if hcol = 0: '<center><img src="images\studia\Brunette_2.jpg"></center>'
+if hcol = 1: '<center><img src="images\studia\Brown_2.jpg"></center>'
+if hcol = 2: '<center><img src="images\studia\Redhead_2.jpg"></center>'
+if hcol = 3: '<center><img src="images\studia\Blonde_2.jpg"></center>'
+'You started filming a scene with two actors'
+	act 'Shoot a scene with blowjob':
+	cla
+	*clr
+	guy += 2
+	bj += 2
+	gang += 1
+	if hcol = 0: '<center><img src="images\studia\Brunette_3.jpg"></center>'
+	if hcol = 1: '<center><img src="images\studia\Brown_3.jpg"></center>'
+	if hcol = 2: '<center><img src="images\studia\Redhead_3.jpg"></center>'
+	if hcol = 3: '<center><img src="images\studia\Blonde_3.jpg"></center>'
+	'You cupped his lips and took a dick into the palm of the second member of the actor and began to work vigorously for the camera, alternately sucking members and trying to pull his mouth at once both members.'
+		act 'Doggy-Style':
+		cla
+		*clr
+		anal += 1
+		anus += 1
+			if hcol = 0: '<center><img src="images\studia\Brunette_4.jpg"></center>'
+			if hcol = 1: '<center><img src="images\studia\Brown_4.jpg"></center>'
+			if hcol = 2: '<center><img src="images\studia\Redhead_4.jpg"></center>'
+			if hcol = 3: '<center><img src="images\studia\Blonde_4.jpg"></center>'
+
+		'One of the actors made you cancer and began rudely thrust you his hard cock in the ass, after his cock entered into you, he began furiously fuck you in the ass, but you continued to suck vtrogo ...'
+			act 'Sit on ...':
+			cla
+			*clr
+			if hcol = 0: '<center><img src="images\studia\Brunette_5.jpg"></center>'
+			if hcol = 1: '<center><img src="images\studia\Brown_5.jpg"></center>'
+			if hcol = 2: '<center><img src="images\studia\Redhead_5.jpg"></center>'
+			if hcol = 3: '<center><img src="images\studia\Blonde_5.jpg"></center>'
+			'You famously sat on one dick ass and continued to suck the other ...'
+				act 'Continue movements':
+				cla
+				*clr
+				if hcol = 0: '<center><img src="images\studia\Brunette_6.jpg"></center>'
+				if hcol = 1: '<center><img src="images\studia\Brown_6.jpg"></center>'
+				if hcol = 2: '<center><img src="images\studia\Redhead_6.jpg"></center>'
+				if hcol = 3: '<center><img src="images\studia\Blonde_6.jpg"></center>'
+				'Peasants and swapped prodlolzhili to fuck you'
+					act 'Prepare to double penetration':
+					cla
+					*clr
+					sex += 1
+					vagina += 1
+					if hcol = 0: '<center><img src="images\studia\Brunette_7.jpg"></center>'
+					if hcol = 1: '<center><img src="images\studia\Brown_7.jpg"></center>'
+					if hcol = 2: '<center><img src="images\studia\Redhead_7.jpg"></center>'
+					if hcol = 3: '<center><img src="images\studia\Blonde_7.jpg"></center>'
+					'You got pussy on one member, and felt like a second penis enters you itching anus and broken-'
+						act 'Enjoy':
+						cla
+						*clr
+						if hcol = 0: '<center><img src="images\studia\Brunette_8.jpg"></center>'
+						if hcol = 1: '<center><img src="images\studia\Brown_8.jpg"></center>'
+						if hcol = 2: '<center><img src="images\studia\Redhead_8.jpg"></center>'
+						if hcol = 3: '<center><img src="images\studia\Blonde_8.jpg"></center>'
+						'Outstretched legs, you will enjoy the activities in the two bow members hammering your body as pistons, you groan and roll Spreading his arms to the operator was convenient to take close-up.'
+							act 'Time to finish ...':
+							cla
+							*clr
+							facial += 1
+							swallow += 1
+							if hcol = 0: '<center><img src="images\studia\Brunette_9.jpg"></center>'
+							if hcol = 1: '<center><img src="images\studia\Brown_9.jpg"></center>'
+							if hcol = 2: '<center><img src="images\studia\Redhead_9.jpg"></center>'
+							if hcol = 3: '<center><img src="images\studia\Blonde_9.jpg"></center>'
+							'Boys took out their thick members of you and you readily vsali before them on their knees and opened his mouth lustfully awaiting sperm guys did not take long and soon the hot jet of sperm began to lash down your face and drip down his chin on his chest.'
+								act 'Get fee':
+								minut = minut + 480
+								film = film + 1
+								BDSMfilm = BDSMfilm + 1
+								money = money + vnesh * 500
+								actr = 0
+								cla
+								*clr
+								clr
+								gs 'stat'
+								'<center><img src="images\studia\dvd-disс.jpg"></center>'
+								'You spent 9 hours on filming'
+								'and received <<vnesh*500>>p. cash'
+									act 'Leave the studio': gt 'down'
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+--- BDSM ---------------------------------
+

+ 221 - 0
locations/BDman

@@ -0,0 +1,221 @@
+# BDman
+if $ARGS[0] = 'givi':
+!set stopboy = 0
+$boy = 'Givi K.'
+$boybody = 'small'
+$boybod = 'thick'
+$boyface = 'bald'
+!длинна члена
+dick = 20
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 2
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 10
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 1
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+
+
+if $ARGS[0] = 'ashot':
+!set stopboy = 0
+$boy = 'Ashot'
+$boybody = 'average growth'
+$boybod = 'muscular'
+$boyface = 'black-haired'
+!длинна члена
+dick = 18
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 1
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 15
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 2
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+
+
+if $ARGS[0] = 'arthur':
+!set stopboy = 0
+$boy = 'Arthur'
+$boybody = 'average growth'
+$boybod = 'muscular'
+$boyface = 'black-haired'
+!длинна члена
+dick = 19
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 2
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 25
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 2
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+
+if $ARGS[0] = 'abdula':
+!set stopboy = 0
+$boy = 'Abdul'
+$boybody = 'long'
+$boybod = 'skinny'
+$boyface = 'gray'
+!длинна члена
+dick = 21
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 2
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 25
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 2
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+
+if $ARGS[0] = 'hasan':
+!set stopboy = 0
+$boy = 'Hasan'
+$boybody = 'average growth'
+$boybod = 'abdominous'
+$boyface = 'black-haired'
+!длинна члена
+dick = 18
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 2
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 25
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 2
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+
+
+if $ARGS[0] = 'kamil':
+!set stopboy = 0
+$boy = 'Camille'
+$boybody = 'average growth'
+$boybod = 'thin'
+$boyface = 'black-haired'
+!длинна члена
+dick = 20
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 2
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 25
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 2
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+
+if $ARGS[0] = 'aslan':
+!set stopboy = 0
+$boy = 'Aslan'
+$boybody = 'small'
+$boybod = 'thin'
+$boyface = 'black-haired'
+!длинна члена
+dick = 17
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 2
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 25
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 2
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+
+if $ARGS[0] = 'muhtar':
+!set stopboy = 0
+$boy = 'Mukhtar'
+$boybody = 'small'
+$boybod = 'thick'
+$boyface = 'black-haired'
+!длинна члена
+dick = 18
+!! половая сила от 0 до 2
+silaVag = 2
+!!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
+finance = 2
+!!проверка по внешности, от параметра vnesh
+vneshBoy = 25
+$boyClo = 'dressed in a leather jacket and cap'
+!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
+figurBoy = 2
+!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
+titBoy = 2
+!любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
+haerBoy = 3
+!характер 0 - мягкий, 1 -норма 2 - агрессор
+harakBoy = 2
+!извращенность
+izvrat = 1
+end
+--- BDman ---------------------------------
+

+ 796 - 0
locations/BDsex

@@ -0,0 +1,796 @@
+# BDsex
+if $ARGS[0] = 'start':
+!выбор интеракций
+!gs 'BDsex','start'
+minut += 3
+if NoGuy = 0: guy += 1
+horny += 10
+gs 'stat'
+'<center><img src="images\picKav\petting.jpg"></center>'
+	if harakBoy = 0:
+	'<<$boy>> hugs you and gently caress your breasts.'
+	act 'Lick me': gt 'BDsex','kuni'
+	act 'Stroking his cock': gt 'BDsex','hj'
+	act 'Take by mouth': gt 'BDsex','minet'
+	act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+	act 'Stand on all fours': gt 'BDsex','sex2'
+	act 'Anal': gt 'BDsex','anal2'
+	end
+
+	if harakBoy = 1:
+	'<<$boy>> you and skillfully caresses your breasts.'
+	brand = RAND(0,100)
+		if brand < 70:
+		'<<$boy>> you hugs and caresses your pussy with his fingers.'
+		trand = RAND(0,2)
+			if trand < 2:
+			'It puts you in the back.'
+			act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+			else
+			'It turns your stomach.'
+			act 'Stand on all fours': gt 'BDsex','sex2'
+			end
+			act 'Let me suck': gt 'BDsex','minet'
+		else
+		'<<$boy>> baby, caressed my mouth.'
+			act 'Stroking his cock': gt 'BDsex','hj'
+			act 'Take by mouth': gt 'BDsex','minet'
+			act 'I do not want to. Lie on your back and spread her legs': gt 'BDsex','sex'
+		end
+	end
+
+	if harakBoy = 2:
+	'<<$boy>> hugs you and passionately caress your breasts.'
+	brand = RAND(0,100)
+		if brand < 70:
+		'<<$boy>> caresses your pussy with his fingers.'
+		trand = RAND(0,2)
+			if trand < 2:
+			'It puts you in the back.'
+			act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+			else
+			'It turns your stomach.'
+			act 'Stand on all fours': gt 'BDsex','sex2'
+			end
+		end
+
+		if brand >= 70 and brand < 90:
+		'<<$boy>> takes you behind your head and pulls you to face your penis.'
+		act 'Take by mouth': gt 'BDsex','minet'
+			if dom > 0:
+				act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+				act 'Stand on all fours': gt 'BDsex','sex2'
+			end
+		end
+
+		if brand >= 90:
+		'<<$boy>> tells you that he wants you in the ass.'
+		act 'Anal': gt 'BDsex','anal2'
+			if dom > 0:
+				act 'I do not want to! Lie on your back and spread her legs': gt 'BDsex','sex'
+				act 'I´ll get cancer, but not in the ass ladies!': gt 'BDsex','sex2'
+				act 'Take by mouth': gt 'BDsex','minet'
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'kuni':
+minut += 15
+gs 'stat'
+set DOM += 1
+set kuni += 1
+set horny += DOM + (silaVag * 2 + 5)
+'<center><img src="images\picV\kuni.jpg"></center>'
+'You undressed and lay on the bed, saying that the guy you caressed his tongue.'
+'<<$boy>> lay down between your legs and began to work the tongue on your pussy.'
+	if horny >= 90:
+	set horny = 0
+	set manna += 15
+	set willpower += 15
+	set orgasm += 1
+	'Man of skillful actions you covered orgasm.'
+	else
+	'Actions Man though they were exciting, but they started to bore you.'
+	end
+
+	act 'Stroking his cock': gt 'BDsex','hj'
+	act 'Take by mouth': gt 'BDsex','minet'
+	act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+	act 'Stand on all fours': gt 'BDsex','sex2'
+	act 'Anal': gt 'BDsex','anal2'
+end
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+!!!!!!!!!!!!!!!!!vagina
+!!!!!!!!!!!!!!!!!sex
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+if $ARGS[0] = 'sex':
+!миссионерская поза
+minut += 10
+gs 'stat'
+'<center><img src="images\picV\vag.jpg"></center>'
+pose = 0
+gs 'BDsex','org'
+givfinrand = RAND(0,10)
+	if harakBoy > 0:
+		if givfinrand >= 8:
+		'Suddenly <<$boy>> took out of you cock and taking you by the shoulders put in front of him on his knees.'
+		act 'Substitute person': gt 'BDsex','facial'
+		act 'Open mouth': gt 'BDsex','swallow'
+		exit
+		end
+	end
+givfinrand = RAND(0,10)
+	if harakBoy = 2:
+		if givfinrand >= 8:
+		'Suddenly <<$boy>> you took out a member and began to fondle your ass preparing it to penetrate.'
+		act 'Anal': gt 'BDsex','anal2'
+		exit
+		end
+	end
+gs 'BDsex','cum'
+act 'Leave': gt 'BDsex','end'
+end
+
+if $ARGS[0] = 'sex2':
+!раком
+minut += 10
+gs 'stat'
+
+picrand = RAND(1,5)
+'<center><img src="images\pics\vagdog<<picrand>>.jpg"></center>'
+
+pose = 1
+gs 'BDsex','org'
+givfinrand = RAND(0,10)
+	if harakBoy > 0:
+		if givfinrand >= 8:
+		'Suddenly <<$boy>> took out of you cock and taking you by the shoulders put in front of him on his knees.'
+		act 'Substitute person': gt 'BDsex','facial'
+		act 'Open mouth': gt 'BDsex','swallow'
+		exit
+		end
+	end
+givfinrand = RAND(0,10)
+	if harakBoy = 2:
+		if givfinrand >= 8:
+		'Suddenly <<$boy>> you took out a member and began to fondle your ass preparing it to penetrate.'
+		act 'Anal': gt 'BDsex','anal2'
+		exit
+		end
+	end
+gs 'BDsex','cum'
+act 'Leave': gt 'BDsex','end'
+end
+
+if $ARGS[0] = 'sex3':
+!с верху
+minut += 10
+gs 'stat'
+picrand = RAND(1,6)
+'<center><img src="images\pics\vagcow<<picrand>>.jpg"></center>'
+pose = 0
+gs 'BDsex','org'
+gs 'BDsex','cum'
+
+end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+!!!!!!!!!!!!!!!!!!anal
+!!!!!!!!!!!!!!!!!!anus
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+if $ARGS[0] = 'anal':
+!миссионерская поза
+minut += 10
+gs 'stat'
+
+gs 'bdsex','an'
+gs 'bdsex','ancum'
+
+end
+
+if $ARGS[0] = 'anal2':
+!раком
+minut += 10
+gs 'stat'
+picrand = RAND(1,10)
+if picrand = 1: '<center><img src="images\pics\anal.jpg"></center>'
+if picrand = 2: '<center><img src="images\pics\anal2.jpg"></center>'
+if picrand = 3: '<center><img src="images\pics\anal3.jpg"></center>'
+if picrand = 4: '<center><img src="images\pics\anal4.jpg"></center>'
+if picrand = 5: '<center><img src="images\pics\anal5.jpg"></center>'
+if picrand = 6: '<center><img src="images\pics\anal6.jpg"></center>'
+if picrand = 7: '<center><img src="images\pics\anal7.jpg"></center>'
+if picrand = 8: '<center><img src="images\pics\anal8.jpg"></center>'
+if picrand = 9: '<center><img src="images\pics\anal9.jpg"></center>'
+if picrand = 10: '<center><img src="images\pics\anal10.jpg"></center>'
+gs 'bdsex','an'
+givfinrand = RAND(0,10)
+	if harakBoy > 0:
+		if givfinrand >= 8:
+		'Suddenly <<$boy>> took out of you cock and taking you by the shoulders put in front of him on his knees.'
+		act 'Substitute person': gt 'BDsex','facial'
+		act 'Open mouth': gt 'BDsex','swallow'
+		exit
+		end
+	end
+gs 'bdsex','ancum'
+act 'Leave': gt 'BDsex','end'
+end
+
+if $ARGS[0] = 'anal3':
+!с верху
+
+gs 'bdsex','an'
+gs 'bdsex','ancum'
+
+end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+!!!!!!!!!!!!!!!!!!!!!hj
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+if $ARGS[0] = 'hj':
+!ханджоб
+hj += 1
+minut += 5
+gs 'stat'
+'<center><img src="images\picV\hand1.jpg"></center>'
+'You got it <<dick>> centimeter penis and began to caress her arms around his arms, moving the skin on the crimson head.'
+bjrand = RAND(0,100)
+	if bjrand >= 75:
+		if harakBoy = 0:
+		'<<$boy>> moaned, "I´m going to come."'
+			act 'Let ends':
+			cla
+			*clr
+			'<center><img src="images\picV\hand2.jpg"></center>'
+			'<<$boy>> finished her hands covering you in their hot and sticky cum.'
+			act 'Leave': gt 'BDsex','end'
+			end
+
+			act 'Take by mouth': gt 'BDsex','minet'
+			act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+
+		elseif harakBoy = 1:
+		'<<$boy>> groaned "Svetsik take in the mouth or let sex going to do."'
+			act 'Take by mouth': gt 'BDsex','minet'
+			act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+		else
+		brand = RAND(0,100)
+			if brand < 70:
+			'<<$boy>> caresses your pussy with his fingers.'
+			trand = RAND(0,2)
+				if trand < 2:
+				'It puts you in the back.'
+				act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+				else
+				'It turns your stomach.'
+				act 'Stand on all fours': gt 'BDsex','sex2'
+				end
+			end
+
+			if brand >= 70 and brand < 80:
+			'<<$boy>> tells you that he wants you in the ass.'
+			act 'Anal': gt 'BDsex','anal2'
+				if dom > 5:
+					act 'I do not want to! Lie on your back and spread her legs': gt 'BDsex','sex'
+					act 'I´ll get cancer, but not in the ass ladies!': gt 'BDsex','sex2'
+					act 'Take by mouth': gt 'BDsex','minet'
+				end
+			end
+			if brand >= 80:
+			'<<$boy>> tightens your face to its members.'
+			act 'Take by mouth': gt 'BDsex','minet'
+			end
+
+		end
+	else
+	'<<$boy>> Now finish.'
+		act 'Substitute person': gt 'BDsex','facial'
+		act 'Open mouth': gt 'BDsex','swallow'
+	end
+end
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+!!!!!!!!!!!!!!!!!!!!bj
+!!!!!!!!!!!!!!!!!!!!throat
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+if $ARGS[0] = 'minet':
+!минет
+minut += 5
+gs 'stat'
+picrand = RAND(0,4)
+if picrand = 0: '<center><img src="images\picV\bj.jpg"></center>'
+if picrand = 1: '<center><img src="images\picV\bj1.jpg"></center>'
+if picrand = 2: '<center><img src="images\picV\bj2.jpg"></center>'
+if picrand = 3: '<center><img src="images\picV\bj3.jpg"></center>'
+if picrand = 4: '<center><img src="images\picV\bj4.jpg"></center>'
+gs 'bdsex','autobj'
+bjrand = RAND(0,100)
+	if bjrand >= 75:
+		if harakBoy = 0:
+		'<<$boy>> moaned, "I´m going to come."'
+			act 'In the palm of your hand':
+			cla
+			*clr
+			'<center><img src="images\picV\hand2.jpg"></center>'
+			'<<$boy>> finished her hands covering you in their hot and sticky cum.'
+			act 'Leave': gt 'BDsex','end'
+			end
+
+			act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+
+		elseif harakBoy = 1:
+		'<<$boy>> groaned "Svetsik take in the mouth or let sex going to do."'
+			act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+		else
+		brand = RAND(0,100)
+			if brand < 70:
+			'<<$boy>> caresses your pussy with his fingers.'
+			trand = RAND(0,2)
+				if trand < 2:
+				'It puts you in the back.'
+				act 'Lie on your back and spread her legs': gt 'BDsex','sex'
+				else
+				'It turns your stomach.'
+				act 'Stand on all fours': gt 'BDsex','sex2'
+				end
+			end
+
+			if brand >= 70:
+			'<<$boy>> tells you that he wants you in the ass.'
+			act 'Anal': gt 'BDsex','anal2'
+				if dom > 0:
+					act 'I do not want to! Lie on your back and spread her legs': gt 'BDsex','sex'
+					act 'I´ll get cancer, but not in the ass ladies!': gt 'BDsex','sex2'
+				end
+			end
+
+		end
+	else
+	'<<$boy>> Now finish.'
+		act 'Substitute person': gt 'BDsex','facial'
+		act 'Open mouth': gt 'BDsex','swallow'
+		if harakBoy = 0:
+			act 'In the palm of your hand':
+			cla
+			*clr
+			'<center><img src="images\picV\hand2.jpg"></center>'
+			'<<$boy>> finished her hands covering you in their hot and sticky cum.'
+			act 'Leave': gt 'BDsex','end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'facial':
+facial += 1
+cumface += 1
+minut += 3
+gs 'stat'
+picrand = RAND(1,5)
+if picrand = 1: '<center><img src="images\pics\facial.jpg"></center>'
+if picrand = 2: '<center><img src="images\pics\facial2.jpg"></center>'
+if picrand = 3: '<center><img src="images\pics\facial3.jpg"></center>'
+if picrand = 4: '<center><img src="images\pics\facial4.jpg"></center>'
+if picrand = 5: '<center><img src="images\pics\facial5.jpg"></center>'
+'Thick jet of sperm hit sharply smelling you in the face.'
+act 'Brush up': gt 'BDsex','end'
+end
+
+if $ARGS[0] = 'swallow':
+swallow += 1
+cumlip += 1
+minut += 3
+gs 'stat'
+picrand = RAND(1,10)
+if picrand = 1: '<center><img src="images\pics\cum.jpg"></center>'
+if picrand = 2: '<center><img src="images\pics\cum2.jpg"></center>'
+if picrand = 3: '<center><img src="images\pics\cum3.jpg"></center>'
+if picrand = 4: '<center><img src="images\pics\cum4.jpg"></center>'
+if picrand = 5: '<center><img src="images\pics\cum5.jpg"></center>'
+if picrand = 6: '<center><img src="images\pics\cum6.jpg"></center>'
+if picrand = 7: '<center><img src="images\pics\cum7.jpg"></center>'
+if picrand = 8: '<center><img src="images\pics\cum8.jpg"></center>'
+if picrand = 9: '<center><img src="images\pics\cum9.jpg"></center>'
+if picrand = 10: '<center><img src="images\pics\cum10.jpg"></center>'
+'Thick jet of sperm hit sharply smelling your mouth.'
+act 'Brush up': gt 'BDsex','end'
+end
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+!!!!!!!!!!!!!!!!!!выход
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+if $ARGS[0] = 'end':
+NoGuy = 0
+	if InYouHome = 1:
+	InYouHome = 0
+	'<<$boy>> politely said goodbye and left.'
+	act 'Leave': gt 'korr'
+	exit
+	end
+
+	if harakBoy = 0:
+	set minut += 15
+	if sweat > -3: set sweat = -3
+	set horny += 1
+	set hapri = 1
+	set mop = 1
+	dynamic $showerdin
+	'<center><img src="images\pics\dush.jpg"></center>'
+	'You got into the bathroom and turned on the shower. Lathered body and washed off in the shower.'
+	end
+	if harakBoy = 1:
+	if cumface > 0: cumface = 0
+	'You have washed and <<$boy>> began to hurry you.'
+	end
+	if harakBoy = 2:
+	'<<$boy>> has not given you even go to the bathroom.'
+	end
+
+
+!
+	if finance > 0:
+	if finance = 1: money += 300
+	if finance = 2: money += 500
+	'<<$boy>> give you money for a taxi and evicted from the apartment.'
+	end
+	if finance = 0:
+	'<<$boy>> you are evicted from the apartment.'
+	end
+	if GoToGuy = 0:
+		act 'Leave':
+		gorand = RAND(0,2)
+		if gorand = 0: gt 'street'
+		if gorand = 1: gt 'down'
+		if gorand = 2: gt 'nord'
+		end
+	end
+	if GoToGuy > 0:
+		act 'Leave':
+		if GoToGuy = 1: GoToGuy = 0 & gt 'nord'
+		if GoToGuy = 2: GoToGuy = 0 & gt 'street'
+		end
+	end
+end
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+if $ARGS[0] = 'org':
+set protect = 0
+set vidageday -= 1
+	if tabletki <= 0 and prezik > 0 and NoCondomUse = 0:
+		set prezik -= 1
+		set protect = 1
+		'<<$boy>> you took a condom and put it on your <<dick>> centimeter member.'
+	end
+
+
+	if mesec > 0:
+	!месячные, оргазм не возможен
+	set horny = 0
+	set manna -= 10
+	set willpower -= 10
+	'Do you monthly and while yet a member of the rams you, vaginal blood flows slowly. Painful sensations and pleasant. You moan while strong <<dick>> centimeter dick fuck your pussy.'
+	end
+
+	if mesec <= 0 and vagina > 0:
+	!месячных нет
+	!horny - возбужденность
+	!vagina - эластичность вагины
+	!silavag - умение парня 0-неумеха, 1-середняк 2-ебарь
+	!dick - размер члена парня
+	!orgazm - коэфициент удовольствия Итог
+	!0 - очень больно, 1 - больно, 2 - не приятно, 3 - так себе, 4 - недооргазм 5 - оргазм
+	set smazka = horny/10
+	set prinat = smazka + vagina
+		if dick >= prinat * 2:
+		!член критично больше возможностей гг
+			if silavag = 0: set orgazm = 0
+			if silavag = 1: set orgazm = 1
+			if silavag = 2: set orgazm = 2
+		end
+
+		if dick < prinat*2 and dick > prinat:
+		!член больше возможностей гг
+			if silavag = 0:
+				if horny >= 100: set orgazm = 5
+				if horny >= 90 and horny < 100: set orgazm = 4
+				if horny >= 80 and horny < 90: set orgazm = 3
+				if horny >= 70 and horny < 80: set orgazm = 2
+				if horny >= 60 and horny < 70: set orgazm = 1
+				if horny < 60: set orgazm = 0
+			end
+			if silavag = 1:
+				if horny >= 90: set orgazm = 5
+				if horny >= 80 and horny < 90: set orgazm = 4
+				if horny >= 70 and horny < 80: set orgazm = 3
+				if horny >= 60 and horny < 70: set orgazm = 2
+				if horny >= 50 and horny < 60: set orgazm = 1
+				if horny < 50: set orgazm = 0
+			end
+			if silavag = 2:
+				if horny >= 80: set orgazm = 5
+				if horny >= 70 and horny < 80: set orgazm = 4
+				if horny >= 60 and horny < 70: set orgazm = 3
+				if horny >= 50 and horny < 60: set orgazm = 2
+				if horny >= 40 and horny < 50: set orgazm = 1
+				if horny < 40: set orgazm = 0
+			end
+		end
+
+		if dick <= prinat and dick >= vagina:
+		!член меньше возможностей гг
+			if silavag = 0:
+				if horny >= 80: set orgazm = 5
+				if horny >= 60 and horny < 80: set orgazm = 4
+				if horny >= 40 and horny < 60: set orgazm = 3
+				if horny < 40: set orgazm = 2
+			end
+			if silavag = 1:
+				if horny >= 70: set orgazm = 5
+				if horny >= 50 and horny < 70: set orgazm = 4
+				if horny >= 30 and horny < 50: set orgazm = 3
+				if horny < 30: set orgazm = 2
+			end
+			if silavag = 2:
+				if horny >= 60: set orgazm = 5
+				if horny >= 40 and horny < 60: set orgazm = 4
+				if horny >= 20 and horny < 40: set orgazm = 3
+				if horny < 20: set orgazm = 2
+			end
+		end
+		if dick <= prinat and dick < vagina:
+			if silavag = 0:
+				if horny >= 100: set orgazm = 5
+				if horny >= 90 and horny < 100: set orgazm = 4
+				if horny < 90: set orgazm = 6
+			end
+			if silavag = 1:
+				if horny >= 90: set orgazm = 5
+				if horny >= 80 and horny < 90: set orgazm = 4
+				if horny < 80: set orgazm = 6
+			end
+			if silavag = 2:
+				if horny >= 80: set orgazm = 5
+				if horny >= 70 and horny < 80: set orgazm = 4
+				if horny < 70: set orgazm = 6
+			end
+		end
+
+		if orgazm = 0:
+		set horny = 0
+		set manna -= 15
+		set willpower -= 15
+		'You groaned in pain when <<$boy>> you entered, tears flowed from her eyes and between her legs feeling as if you drove a red-hot rod. You cry and moan until strong <<dick>> centimeter dick fuck your pussy.'
+		end
+		if orgazm = 1:
+		set horny -= 10
+		set manna -= 10
+		set willpower -= 10
+		'You bite my lip in pain when <<$boy>> you entered, between the legs painful. You are frowning and moaning in pain while strong <<dick>> centimeter dick fucks your pussy.'
+		end
+		if orgazm = 2:
+		set horny -= 5
+		set manna -= 5
+		set willpower -= 5
+		'You winced at the sudden pain when <<$boy>> you entered, between the legs pain that gradually become calm and quite tolerable. Are you trying to get aroused while strong <<dick>> centimeter dick fucks your pussy, but you do not go out.'
+		end
+		if orgazm = 3:
+		!set horny += 5
+		set manna += 5
+		set willpower += 5
+		'You startled by the feeling that your pussy is stretched when <<$boy>> you entered. Between the legs becomes a little pleased when strong <<dick>> centimeter dick fucks your pussy.'
+		end
+		if orgazm = 4:
+		!set horny += 10
+		set manna += 10
+		set willpower += 10
+		'You startled by the feeling that your pussy is stretched when <<$boy>> you entered. Between the legs becomes a little pleased when strong <<dick>> centimeter dick fucks your pussy. Pritnoe gradually grow warm and throbbing in the lower abdomen, and then feeling a little decrease and remain until the end.'
+		end
+		if orgazm = 5:
+		set horny = 0
+		set manna += 15
+		set willpower += 15
+		set orgasm += 1
+		'You flinched from a pleasant feeling when your pussy rastyagivatsya start taking a dick. Between the legs becomes very warm and pleasant, when strong <<dick>> centimeter dick fuck your pussy. Pritnoe gradually grow warm and throbbing in the lower abdomen, then descend to the feeling you and your entire body covered hot waves of orgasm, you involuntarily scream with pleasure writhing on elde.'
+		end
+		if orgazm = 6:
+		set horny += 5
+		set manna += 5
+		set willpower += 5
+		'You feel as a member enters your pussy when <<$boy>> you entered. Between the legs nicely, but a member of your pussy significantly less and <<dick>> inches enough for you. Pritnoe gradually grow warm and throbbing in the lower abdomen, and then feeling a little decrease and remain until the end.'
+		end
+		if vagina <= dick: set vagina += 1
+	end
+
+	if vagina = 0 and mesec <= 0:
+	set horny = 0
+	set manna -= 15
+	set willpower -= 15
+	set vagina += 1
+	'You bite my lip in pain and tears gushed from his eyes when <<$boy>> you entered, breaking your hymen. You moan while weeping and strong <<dick>> centimeter dick fucks your bloody pussy.'
+	end
+if vagina < dick: vagina += 1
+sex += 1
+end
+
+
+
+if $ARGS[0] = 'cum':
+	if protect ! 1:
+	!не защищенный секс
+	set finrand = RAND(0,1)
+		if finrand = 0:
+		!внутрь
+		set cumpussy += 1
+		'<<$boy>> groaned and you feel like jet of sperm hit you inside your body.'
+			if tabletki <= 0 and mesec <= 0:
+			gs 'preg'
+			set manna -= 15
+			set willpower -= 15
+			'Hell, because after all, you can fly, you thought with horror.'
+			end
+		end
+		if finrand = 1:
+		!наружу
+			if pose = 0:
+			set cumbelly += 1
+			'<<$boy>> groaned and removing a member of you finished your stomach.'
+			end
+			if pose = 1:
+			set cumass += 1
+			'<<$boy>> groaned and removing a member of you finished on your ass.'
+			end
+		end
+	end
+	if protect = 1:
+	set protect = 0
+	'<<$boy>> groaned and you realized that he had finished in the condom.'
+	end
+set pose = 0
+end
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+if $ARGS[0] = 'autobj':
+bj += 1
+'You little fingers caress <<dick>> centimeter term then cupped his mouth and began to suck.'
+	if harakBoy = 0:
+	'<<$boy>> closed his eyes in pleasure and enjoying the caress of your lips.'
+	end
+	if harakBoy = 1:
+	'<<$boy>> staring you in the face until your lips glide over his hard dick.'
+	end
+	if harakBoy = 2:
+	if mop > 1: set mop = 0
+	set hapri = 0
+	set throat += 1
+	'<<$boy>> to take you by the hair and began to fuck you in the mouth, from blows to the throat member you tears flowed from his eyes.'
+	end
+	set horny += throat + SUB + VAF - DOM
+'Hard and hot cock slides in your wet her mouth filling it completely, your lips tightly wrapped around his dick caressing.'
+	if horny >= 100:
+	set VAF += 1
+	set orgasm += 1
+	set horny = 20
+	set manna += 15
+	set willpower += 15
+	set lipkoef += 1
+		if lipkoef > 50:
+		set lipkoef = 0
+		set lip += 1
+		end
+	'Suddenly you started sucking dick you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned but did not release a member of his mouth continued to suck.'
+	end
+!'Finally <<$boy>> groaned and you realize that now he will start to finish.'
+end
+
+
+if $ARGS[0] = 'an':
+
+!{
+	if analplugin = 1:
+		analpluginbonus = 10
+		analplugin = 0
+		if anus < 16: '<<$boy>> has pulled out of your narrow and tight ass plug'
+
+		if anus >= 16: '<<$boy>> pulled out of your ass juices dripping feverish stopper'
+		'and you feel as hard cock rested in your hole.'
+
+		if anus + analpluginbonus < dick:
+		'You screamed and bit his lip from a sharp pain when it <<dick>> member centimeter apart your ass you entered.'
+		end
+		if anus + analpluginbonus >= dick:
+		'You groaned when his feelings of overcrowding <<dick>> member centimeter apart your ass you entered.'
+		end
+		!gs 'BDsex','ancum'
+	end
+}
+
+	if analplugin = 1:
+		!WD: No Anal Lube if Anal Plug
+		!analpluginbonus = 10
+		set lubonus = 15
+		analplugin = 0
+		!'<<$boy>> has pulled out of your narrow and tight ass plug'
+
+		if anus < 16:
+			'<<$boy>> has pulled out of your narrow and tight ass plug'
+		else
+			'<<$boy>> pulled out of your ass juices dripping feverish stopper'
+		end
+	end
+
+	if dick < anus: set anus += 1
+
+!{ !WD: Anal Plug consistancy
+	if lubri = 0:
+		set lubonus = 2
+		'Lubricant and you do not have <<$boy>> spitting on his fingers became saliva to lubricate your ass.'
+	end
+
+	if lubri > 0:
+		set lubri  -= 1
+		set lubonus = 10
+		'You took a tube of lubricant and handed it to the guy, he squeezed a little on the palm and rubbed your anus.'
+	end
+}
+	if lubonus = 0:
+		if lubri > 0:
+			set lubri  -= 1
+			set lubonus = 10
+			'You took a tube of lubricant and handed it to the guy, he squeezed a little on the palm and rubbed your anus.'
+		else
+			set lubonus = 2
+			'You do not have any lubricant so <<$boy>> spits on his fingers and uses saliva to lubricate your ass.'
+		end
+	end
+
+	'<<$boy>> put your stomach on the bed apart and began to massage your buttocks your anus with your fingers, first one, then two.'
+	if anus < 10: 'When your ass you entered three fingers involuntarily groaned in pain.'
+	if anus >= 10: 'Then the guy brought you three fingers and started to stretch your anus.'
+	'<<$boy>> pulled his fingers out of your priests and you feel his hard cock rested in your hole.'
+	if anus + lubonus < dick: 'You screamed and bit his lip from a sharp pain when it <<dick>> member centimetre apart your ass you entered.'
+	if anus + lubonus >= dick: 'You groaned when his feelings of overcrowding <<dick>> member centimeter apart your ass you entered.'
+	'<<$boy>> stopped for a moment giving your ass adapt to member protruding from it, and then started to drive them all the more insistent.'
+
+	if anus + lubonus + 2 < dick:
+		if mop > 1: set mop = 0
+		'You cried and clutched his teeth into the pillow when <<dick>> centimeter cock began to fuck your ass on full force.'
+	end
+
+	if anus + lubonus + 2 >= dick:
+		'You started to moan rhythmically in time with the movements member inside you.'
+	end
+
+	anal += 1
+end
+
+
+if $ARGS[0] = 'ancum':
+	'Finally <<$boy>> grabbed you tight ass and drove for your aching ass dick up to the finished balls inside you.'
+	cumass      += 1
+	set minut   += 3
+	set cumanus += 1
+	if anus < dick: set anus += 1
+	set horny   += (anus - dick)*3
+	if horny < 1: set horny = 1
+
+	if horny >= 100:
+		horny           = 1
+		set orgasm     += 1
+		set analorgasm += 1
+		'In anus blazing fire and waves of pleasure swept body, you were moaning and impale themselves on the ass dick.'
+	end
+end
+--- BDsex ---------------------------------
+

+ 65 - 0
locations/BnameGen

@@ -0,0 +1,65 @@
+# BnameGen
+bnrand = RAND(0,15)
+if bnrand = 0:$bname = 'Sasha' & $bnamefull = 'Alexander'
+if bnrand = 1:$bname = 'Lesch' & $bnamefull = 'Alexey'
+if bnrand = 2:$bname = 'Kohl' & $bnamefull = 'Nicholas'
+if bnrand = 3:$bname = 'Petya' & $bnamefull = 'Peter'
+if bnrand = 4:$bname = 'Vasya' & $bnamefull = 'Basil'
+if bnrand = 5:$bname = 'Gosh' & $bnamefull = 'Igor'
+if bnrand = 6:$bname = 'Misha' & $bnamefull = 'Michael'
+if bnrand = 7:$bname = 'Dan' & $bnamefull = 'Denis'
+if bnrand = 8:$bname = 'Pasha' & $bnamefull = 'Paul'
+if bnrand = 9:$bname = 'Gene' & $bnamefull = 'Gennady'
+if bnrand = 10:$bname = 'Dima' & $bnamefull = 'Dmitry'
+if bnrand = 11:$bname = 'Slavik' & $bnamefull = 'Vyachesla'
+if bnrand = 12:$bname = 'Acne' & $bnamefull = 'Vitaly'
+if bnrand = 13:$bname = 'Valera' & $bnamefull = 'Valery'
+if bnrand = 14:$bname = 'Vanya' & $bnamefull = 'Ivan'
+if bnrand = 15:$bname = 'Serge' & $bnamefull = 'Sergey'
+
+:markodinname
+bnrand = RAND(0,15)
+if bnrand = 0:$bname2 = 'Sasha'
+if bnrand = 1:$bname2 = 'Lesch'
+if bnrand = 2:$bname2 = 'Kohl'
+if bnrand = 3:$bname2 = 'Petya'
+if bnrand = 4:$bname2 = 'Vasya'
+if bnrand = 5:$bname2 = 'Gosh'
+if bnrand = 6:$bname2 = 'Misha'
+if bnrand = 7:$bname2 = 'Dan'
+if bnrand = 8:$bname2 = 'Pasha'
+if bnrand = 9:$bname2 = 'Gene'
+if bnrand = 10:$bname2 = 'Dima'
+if bnrand = 11:$bname2 = 'Slavik'
+if bnrand = 12:$bname2 = 'Acne'
+if bnrand = 13:$bname2 = 'Valera'
+if bnrand = 14:$bname2 = 'Vanya'
+if bnrand = 15:$bname2 = 'Serge'
+
+if $bname = $bname2: jump 'markodinname'
+
+:markodinnamesec
+bnrand = RAND(0,15)
+if bnrand = 0:$bname3 = 'Sasha'
+if bnrand = 1:$bname3 = 'Lesch'
+if bnrand = 2:$bname3 = 'Kohl'
+if bnrand = 3:$bname3 = 'Petya'
+if bnrand = 4:$bname3 = 'Vasya'
+if bnrand = 5:$bname3 = 'Gosh'
+if bnrand = 6:$bname3 = 'Misha'
+if bnrand = 7:$bname3 = 'Dan'
+if bnrand = 8:$bname3 = 'Pasha'
+if bnrand = 9:$bname3 = 'Gene'
+if bnrand = 10:$bname3 = 'Dima'
+if bnrand = 11:$bname3 = 'Slavik'
+if bnrand = 12:$bname3 = 'Acne'
+if bnrand = 13:$bname3 = 'Valera'
+if bnrand = 14:$bname3 = 'Vanya'
+if bnrand = 15:$bname3 = 'Serge'
+
+if $bname = $bname3 or $bname2 = $bname3: jump 'markodinnamesec'
+
+dick = RAND(12,25)
+silavag = RAND(0,2)
+--- BnameGen ---------------------------------
+

+ 806 - 0
locations/BurgerTip

@@ -0,0 +1,806 @@
+# BurgerTip
+$burger_work_din = {
+burand = RAND(0,6)
+	if burand = 0:
+	'You lit lamp on the table communicator. Anatoly Borisovich calls you to itself.'
+		act 'Go to the office Chubais':
+		cls
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\work2.jpg"></center>'
+		bossrand = RAND(0,3)
+			if bossrand = 0:
+			'You went into his office and approached the table Chubais. He turned his head to you "<<$name>>, bring coffee."'
+
+				act 'Bring coffee':
+				cls
+				gs 'stat'
+				'<center><img src="images\qwest\sosed\work3.jpg"></center>'
+				'Did you go to the kitchen and prepared coffee for the boss. Then brought his boss.'
+				if PSBBtimes = 1: dynamic $dinBistroWork
+				if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+			end
+			if bossrand = 1:
+			'You went into his office and approached the table Chubais. He turned his head to you "Svetochka. Take these documents, and go to the chief accountant. Formalize it and you bring them to me."'
+				act 'Go to the chief accountant':
+				cls
+				gs 'stat'
+				'<center><img src="images\qwest\sosed\work9.jpg"></center>'
+				'You took the papers and went to the chief accountant. Elena G. irritably took documents, muttered something under his breath, put the signature and printed several accounts. "To Bring the Director."'
+					act 'Go to the director':
+					cls
+					gs 'stat'
+					'<center><img src="images\qwest\sosed\work2.jpg"></center>'
+					'Taking the documents you went back to the director´s office and gave him the documents.'
+
+					if PSBBtimes = 1: dynamic $dinBistroWork
+					if PSBBtimes = 2: dynamic $dinBistroWork2
+					end
+				end
+			end
+			if bossrand = 2:
+			'You went into his office and approached the table Chubais. He turned his head to you "Svetochka. Take these documents and bring them to Ivan, let will immediately"'
+				act 'Go to Ivan':
+				cls
+				gs 'stat'
+				'<center><img src="images\qwest\sosed\work7.jpg"></center>'
+				'You took the papers and went to the senior manager Ivan.'
+				'Ivan sat in his office and worked on the computer. You gave him a folder with documents "Chubais said to do this immediately." Ivan took the folder from your hands and you ran eyes nodded.'
+					act 'Go to her':
+					cls
+					gs 'stat'
+					'<center><img src="images\qwest\sosed\work.jpg"></center>'
+					'Documents giving you went to his office.'
+					if PSBBtimes = 1: dynamic $dinBistroWork
+					if PSBBtimes = 2: dynamic $dinBistroWork2
+					end
+				end
+			end
+			if bossrand = 3:
+			cls
+			bossexrand = RAND(0,3)
+			horny += 10
+			gs 'stat'
+			'<center><img src="images\qwest\sosed\boss<<bossexrand>>.jpg "></center>'
+			'You went into his office and approached the table Chubais. He got up from the table and walked over to you'
+				if bossexrand = 0: 'Chubais came up to you and passionately pressed to the wall covering you with kisses.'
+				if bossexrand = 1: 'His hand slid down your stomach and crawled under her skirt, you felt his hand began to caress your pussy.'
+				if bossexrand = 2: 'He grabbed you in the ass and lifted up her skirt you began to knead your soft ass.'
+				if bossexrand = 3: 'Anatoly Borisovich put his hands on your hips, his hands slid up your skirt bullying.'
+
+				act 'Kiss':
+				cls
+				horny += 10
+				gs 'stat'
+				'<center><img src="images\qwest\sosed\bossex.jpg"></center>'
+				'Anatoly Borisovich sat on the couch holding you firmly in their hands. He put you over the top and began to kiss you and fondle your ass.'
+				dynamic $boss_din_bj
+					act 'Continue':
+					cls
+					horny += 10
+					gs 'stat'
+					'<center><img src="images\qwest\sosed\bossex2.jpg"></center>'
+					'Anatoly Borisovich began to undress you and threw you back. He kissed you and you climbed his hands between her legs feeling the pussy'
+					bosstipsexrand = RAND(1,10)
+						if bosstipsexrand >= 3:
+						dynamic $boss_din_sex2
+						end
+						if bosstipsexrand < 3:
+						'Chubais fingers began to fondle your anus and you feel like you went his finger in the ass.'
+						dynamic $boss_din_anal2
+						end
+					end
+				end
+
+				act 'To kneel':
+				cls
+				gs 'stat'
+				'<center><img src="images\qwest\sosed\bossex1.jpg"></center>'
+				'You kneel before the head and began to unbutton his pants with his thin fingers. Anatoly Borisovich stood before you and not moving silently staring you in the face. Finally, you undid his pants and shoved his hand into his pants boss groped his cock.'
+					act 'Caress cock through the briefs':
+					cls
+					gs 'stat'
+					'<center><img src="images\qwest\sosed\bossBJ.jpg"></center>'
+					'Vashie thin fingers lowered pants with the chief, and his standing member mound protruded through the panties. You kissed briefs in place mound feeling firm flesh through the fabric. Then playfully took in his mouth dick right through the panties and began to fondle.'
+					dynamic $boss_din_bj
+					end
+
+					dynamic $boss_din_bj
+				end
+			end
+
+		end
+	exit
+	end
+
+	if burand = 1:
+	cls
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\work5.jpg"></center>'
+		if PSBBtimes = 1:
+		bosstiprand = RAND(0,3)
+			if bosstiprand = 0:
+			TerminalPapper = 1
+			DayTerminalPapper = day
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, take these documents to the North area, in a storage terminal, then you can be free today."'
+			act 'Leave': gt 'down'
+			end
+			if bosstiprand = 1:
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, I´ll leave up for lunch. But now bring up products, you accept the products instead of me."'
+				act 'Take products':
+				cls
+				gs 'stat'
+				'To the rear entrance truck arrived with food. To you approached the driver with the instruments of acceptance. You signed the documents and ordered the baggage handlers to unload the car.'
+				if PSBBtimes = 1: dynamic $dinBistroWork
+				if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+			end
+			!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!1
+			if bosstiprand = 2:
+			BankPapper = 1
+			dayBankPapper = day
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, run to the bank with these documents. How otneseshsya documents can be free today."'
+			act 'Leave': gt 'down'
+			end
+			if bosstiprand = 3:
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, call programmer who have part-time, my PC is broken"'
+				act 'Call programmer':
+				cls
+				gs 'stat'
+					if sosedQW = 0:
+					'Soon entered the office of a young, tall guy with a big bag. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
+					end
+					if sosedQW > 0 and sosedKnowWork > 0:
+					sosedKnowWork = 1
+					'Soon the office entered Timothy, your neighbor. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
+					end
+					if sosedQW > 0 and sosedKnowWork = 0:
+					sosedKnowWork = 1
+					'Soon the office entered Timothy, your neighbor. He was surprised to see you. You chatted cheerfully, Timothy is working part-time in bystroezhke, repairing office equipment, charges cartridges.'
+					end
+				if PSBBtimes = 1: dynamic $dinBistroWork
+				if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+			end
+		end
+		!!!!!!!!!!!!!!!!!!!!!!!
+		!!!!!!!!!!!!!!!!!!!!!!!
+		if PSBBtimes = 2:
+		bosstiprand = RAND(0,3)
+			if bosstiprand = 0:
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, I have to leave early today, here´s a print, well, so far." Anatoly Borisovich then left the office.'
+			bburand = RAND(0,10)
+				if bburand = 0:
+				'To your office went senior manager Ivan.'
+				dynamic $din_Ivan_work
+					if kompromatLife = 0 or kompromatBlackMail > 1:
+					'Ivan grinned "I need shtampulki on here these papers." You took the seal and stamp on paper Ivan.'
+					if PSBBtimes = 1: dynamic $dinBistroWork
+				if PSBBtimes = 2: dynamic $dinBistroWork2
+					end
+				end
+				if bburand = 1:
+				'To your office assistant manager went Sergei.'
+				'Sergei looked you carnivorous eyes "Anatoly Borisovich at?" You said no.'
+					if sergeyPQW = 1:
+					'Pimply young man chuckled and sat on the edge of the table. "<<$name>>, you´re dynamite. Cafe I invested for you, and you with me here and so cost.''s No nice of you."'
+					end
+					if sergeyPQW = 0:
+					'Pimply kid sat on the edge of the table "Svetsik you cool the girl can descend to something?"'
+					act 'No! And do not even think about it!':
+						cls
+						gs 'stat'
+						'You have rejected this rookie and he jumped up from the table left his office.'
+						if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+						end
+
+						act 'Come on.':
+						cls
+						gs 'stat'
+						'<center><img src="images\qwest\sosed\work7.jpg"></center>'
+						'Sergei delighted and promised to go after you left. Working time has come to an end and re-entered the office Sergei. "Come on."'
+							act 'Go.':
+							cls
+							minut += 60
+							horny += 15
+							water = 24
+							energy = 24
+							salo += 2
+							fat += 20
+							gs 'stat'
+							'<center><img src="images\qwest\sosed\kafe2.jpg"></center>'
+							'You went with Sergei and logged in located not far from bystroezhki cafe. Sergei ordered drinks and food and you sat down at the table. Order soon earned and you began to eat and drink wine. Soon you´re a bit tipsy and the conversation flowed naturally. Sergei called the waitress and paid with her. You went out with his partner, and pimply he suddenly hugged you "<<$name>>, went to me."'
+								act 'Refuse.':
+								cls
+								minut += 15
+								sergeyPQW = 1
+								gs 'stat'
+								!'<center><img src="images\qwest\sosed\kafe2.jpg"></center>'
+								'You refused molestation obsessive brat and left.'
+								act 'Leave.': gt 'down'
+								end
+
+
+							end
+						end
+					exit
+					end
+					if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+				if bburand = 2:
+				'To your office came GlavBukh Lena.'
+				'Lena looked disapprovingly you "Chef at home?" You said that he was gone. Lena lipped gone.'
+					if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+				if bburand = 3:
+				'To your office came personnel manager Vic.'
+				'Vick you smiled "Chef at home?" You replied that he was gone. Vick said he would call the next time left.'
+					if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+				if bburand > 3:
+				'Allotted time you sat in the office alone, bored and expanding solitaire on the computer.'
+				if PSBBtimes = 1: dynamic $dinBistroWork
+				if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+
+			end
+			!!!!!!!!!!!!!!!!!!!!!!!!!
+			!!!!!!!!!!!!!!!!!!!!!!!!!
+			if bosstiprand = 1:
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, went along with me, have fun."'
+				act 'Go with Anatoly Borisovich':
+				cls
+				gs 'stat'
+				BurMestoRand = RAND(0,1)
+				'<center><img src="images\maggot\car.jpg"></center>'
+					if BurMestoRand = 0:
+					'You got in the car to Anatoly Borisovich and you went to the residential area of ​​the city. Soon the car stopped near the sauna. Chubais said with a smile. "I made room for us."'
+						act 'Go to the sauna':
+						cls
+						gs 'stat'
+							if SaunaWhore > 0:
+							BuSWworkEnd = 1
+							'You are logged in to the sauna and suddenly faced with mother at the entrance, which provided you work in the sauna. She said with surprise, "<<$name>>, what the hell, are you now indvidualka? Slugger I work, and even dare to come here?" Anatoly Borisovich wondered, "What´s going on here, then you know the <<$name>>?" Nurse laughed, "Do I know <<$name>> Yes her pussy real goldmine! Of course I know it, I have it working as a prostitute." Anatoly Borisovich blushed, "How? <<$name>>? You´re just a whore?" You began to mutter, trying to come up with on the fly how do you otmazatsya. Anatoly Borisovich shook his head. "I was wrong about you, <<$name>>." After that, he went silently out of the sauna and you heard his car left. Nurse continued to laugh at you "<<$name>>, you´re a whore, and if you manage to still Okrut decent guy, if your past will come up, then you no self-respecting man, to live is not. Consider it a free lesson to you."'
+							act 'Leave': gt 'street'
+							end
+
+							if SaunaWhore = 0:
+							'You are logged in to the sauna and Chubais held you in luxurious rooms which he made. He quickly began to undress and you too undressed. Then he walked up to you. "<<$name>>, I suck."'
+								act 'Further':
+								cls
+								minut += 5
+								bj += 1
+								gs 'stat'
+								'<center><img src="images\qwest\sosed\bossBJS.jpg"></center>'
+								'You squatted in front of the boss and taking dick kissed his hand. His cock began to twitch gradually rising. You prick the skin baring penis and licked it. Then you cupped member lips and began to suck him. Do you feel as a member in your mouth uvilichivaetsya gradually in size and becomes harder, finally gets full member and you suck it with sucking sounds covering saliva. Anatoly Borisovich pulls his dick out of your mouth and steers you to the bench.'
+									act 'Further':
+									cls
+									minut += 5
+									protect = 1
+									$boy = 'Anatoly'
+			dick = 12
+			silavag = 0
+									gs 'stat'
+									'<center><img src="images\qwest\sosed\bossSexS.jpg"></center>'
+									'Anatoly Borisovich put a condom on the penis and lay down on the bench pulling your hand to yourself. You have thrown a leg over the boss stomach and sat on top of him, then you took his hard hand and sent it into my pussy.'
+									dynamic $sexstart3
+									'You heard Anatoly Borisovich groaned and twitched a few times, he took you with ebya and you saw that sperm filled condom.'
+									if sweat > -3: set sweat = -3
+									'Then you went into the shower to wash. Coming out of the shower, you saw that Anatoly Borisovich already dressed. "<<$name>>, I´ve got to run." He kissed you and left.'
+									act 'Leave': gt 'street'
+									end
+								end
+							end
+						end
+					end
+					if BurMestoRand = 1:
+					'You got in the car and suddenly the phone rang boss. He frowned and picked up the receiver. "Yes dear, I will soon." He hung up. "We have to go home, Svetsik, quick suck, and I´ll go."'
+						act 'Suck':
+						cls
+						minut += 5
+						bj += 1
+						cumlip += 1
+						swallow += 1
+						gs 'stat'
+						'<center><img src="images\qwest\sosed\bossBJcar.jpg"></center>'
+						'Anatoly Borisovich sat on the couch waiting for your actions. You leaned over and unzipped his pants taking out his cock from his pants. You leaned over his groin and his lips wrapped around his flaccid penis, which gradually began to get up in your mouth. You sucked it as deep as possible and faster, trying to boss that finished. Finally Anatoly Borisovich little moan and warm liquid squirted into your mouth. Trying not ispachkad expensive car you started to swallow cum boss. After Anatoly Borisovich finished, he put his dick in pants and said goodbye to you.'
+						act 'Leave': gt 'down'
+						end
+					end
+				end
+			exit
+			end
+			!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+			!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+			if bosstiprand = 2:
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, call programmer who have part-time, my PC is broken"'
+				act 'Call programmer':
+				cls
+				gs 'stat'
+					if sosedQW = 0:
+					'Soon entered the office of a young, tall guy with a big bag. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
+					end
+					if sosedQW > 0 and sosedKnowWork > 0:
+					sosedKnowWork = 1
+					'Soon the office entered Timothy, your neighbor. He asked that broke, you showed him the chief of the computer and the guy sat down at the computer fix. Soon he graduated and earned a computer.'
+					end
+					if sosedQW > 0 and sosedKnowWork = 0:
+					sosedKnowWork = 1
+					'Soon the office entered Timothy, your neighbor. He was surprised to see you. You chatted cheerfully, Timothy is working part-time in bystroezhke, repairing office equipment, charges cartridges.'
+					end
+				if PSBBtimes = 1: dynamic $dinBistroWork
+				if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+			end
+			!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+			!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+			if bosstiprand = 3:
+			'Came out of the office Anatoly Borisovich and walked up to you. "<<$name>>, you have to stay at work today. Come to me now partners for business negotiations."'
+				act 'Further':
+				cls
+				minut += 60
+				gs 'stat'
+				'By Anatoly Borisovich two men came and they settled down in his office. Anatoly Borisovich occasionally caused you that would bring coffee. An hour later, the men were gone and Anatoly Borisovich let you go.'
+				act 'Leave': gt 'down'
+				end
+			end
+		end
+	exit
+	end
+	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+	if burand = 2:
+	'To your office went senior manager Ivan.'
+	dynamic $din_Ivan_work
+		if kompromatLife = 0 or kompromatBlackMail > 1:
+		'Ivan grinned "I need shtampulki on here these papers." You ran to the boss and he stamped on the document, and then you classify documents Ivan.'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+		end
+	exit
+	end
+	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+	if burand = 3:
+	'To your office assistant manager went Sergei.'
+	'Sergei greedily examining you said "Ivan told these documents include the main, on the signature."'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+	exit
+	end
+	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+	if burand = 4:
+	'To your office came GlavBukh Lena.'
+	'Lena arrogant as ever with mine said "I need a print head of the payment for these." You classify documents to the chief, he slap seals and documents you gave Lena.'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+	exit
+	end
+	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+	if burand = 5:
+	'To your office came personnel manager Vic.'
+	'She smiled at you, "I´ve brought the documents, who is retiring as always, you need to put the press." You classify documents to the chief and he slap stamps. After that you classify documents Vick.'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+	exit
+	end
+	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+	if burand = 6:
+	'To your office came elegantly dressed woman with an arrogant person.'
+		if gossipBU < 10:
+		'The lady looked scornfully asked you and disgust "at Shreds?" You nodded his head, a lady came in without knocking into the office to Anatoly Borisovich and after a while they went out together, Chubais said on the way "Yes dear, certainly today´ll come to your mother." When the woman left Antaoly Borisovich chuckled "My wife is a rare bitch."'
+			if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+		end
+		if gossipBU >= 10:
+		'Lady you looked contemptuously and angrily opened the door to Anatoly Borisovich, you heard her shrill voice, "Tolia, I know all about your adventures with his sekretutkoy, and if you do not immediately vygonish this slut from work, then I myself leave you, you understand? " Anatoly Borisovich zabubnil "Yes, dear, you know, I just love you." He was red in the face out of the office and you threw the paper on the table, ''Write on his own! "'
+			act 'Write a statement of resignation':
+			cls
+			work = 0
+			PersSecWork = 2
+			Pay = PersSecWorkTimes * 2500
+			PersSecWorkTimes = 0
+			money += Pay
+			gs 'stat'
+			'You wrote a statement of resignation and quickly signed his boss, he was counted out to you <<pay>> rubles your paycheck and said, "It´s over <<$name>>, get out of here."'
+			act 'Leave': gt 'down'
+			end
+		end
+	exit
+	end
+
+}
+$boss_ass_din = {
+bossassrand = RAND(0,3)
+	if bossassrand = 0:
+	'When you bend over to pick up the papers from the table, then got a slap on the ass savory from Anatoly Borisovich.'
+	end
+}
+
+$boss_din_bj = {
+act 'Get a member of cowards':
+cls
+numbjrand = RAND(0,14)
+wantrand = RAND(0,3)
+bj += 1
+gs 'stat'
+'<center><img src="images\qwest\sosed\bossBJ<<numbjrand>>.jpg "></center>'
+'Did you get a member of pants around his boss and his <<$liptalk>> his lips purple head. Your tongue quickly worked on a smooth surface of the head feeling all the twists member. Clasping member you took it into his mouth to the throat and began to move her head. Your eyes stared at the curly pubic Chubais and sometimes his hair tickling your nose.'
+	if wantrand = 3:
+	'Anatoly Borisovich took a member of your mouth "<<$name>>, I want you."'
+	dynamic $boss_din_bendover
+	end
+	if wantrand = 2:
+	'Anatoly Borisovich muffled groan "Svetsik if you prodolzhish, then I finish"'
+	dynamic $boss_din_bendover
+	dynamic $boss_din_bj2
+	end
+	if wantrand < 2:
+	'Anatoly Borisovich groaned obviously going to finish.'
+	dynamic $boss_din_bj_cum
+	end
+end
+}
+$boss_din_go_toilet = {
+	act 'Go to the toilet':
+	cls
+	bosstoirand = RAND(0,10)
+	gs 'stat'
+		if bosstoirand = 10:
+		gossipBU += 1
+		'You went to the toilet, but in the hallway accidentally collided with Ivan. Ivan looked at you with a grin and turned away went about his business.'
+		dynamic $boss_din_toilet_wash
+		end
+		if bosstoirand = 9:
+		gossipBU += 1
+		'You went to the toilet, but in the hallway accidentally encountered a chief accountant Lena. Lena looked at you and saw sperm muttered "whore" and went on her way.'
+		dynamic $boss_din_toilet_wash
+		end
+		if bosstoirand = 8:
+		gossipBU += 1
+		'You went to the toilet, but in the hallway accidentally collided with the personnel manager Vika. Vick saw you cum and her eyes widened in surprise, then she wrinkled her nose in disgust and walked away.'
+		dynamic $boss_din_toilet_wash
+		end
+		if bosstoirand = 7:
+		gossipBU += 1
+		'You went to the toilet, but in the hallway accidentally encountered a deputy manager Sergei. Pimply young man Serge saw semen on you and laughed, "That´s because cocksucker" after he ran somewhere.'
+		dynamic $boss_din_toilet_wash
+		end
+		if bosstoirand < 7:
+		bosstoirandin = RAND(0,10)
+		if bosstoirandin = 10:
+		gossipBU += 1
+		'You quietly slipped into the toilet, but the toilet nose to nose faced the chief accountant Lena. Lena looked at you and saw sperm muttered "whore" and went on her way.'
+		dynamic $boss_din_toilet_wash2
+		end
+		if bosstoirandin = 9:
+		gossipBU += 1
+		'You quietly slipped into the toilet, but the toilet faced nose to nose with the personnel manager Vika Vika saw you cum and her eyes widened in surprise, then she wrinkled her nose in disgust and walked away.'
+		dynamic $boss_din_toilet_wash2
+		end
+		if bosstoirandin < 9:
+		if cumface > 0:$deytoibur = 'Standing at the sink, you have washed the face, wash sperm.'
+		if cumfrot > 0:$deytoibur2 = ' Discreetly wipe the semen from clothing failed blouse and left a large wet spot.'
+		'You quietly slipped into the toilet. <<$deytoibur>><<$deytoibur2>>'
+		cumface = 0
+		cumfrot = 0
+		if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+		end
+
+		end
+
+	end
+}
+$boss_din_toilet_wash = {
+	if cumface > 0:$deytoibur = 'Standing at the sink, you have washed the face, wash sperm.'
+	if cumfrot > 0:$deytoibur2 = ' Discreetly wipe the semen from clothing failed blouse and left a large wet spot.'
+	'You went into the bathroom and turned the water in the sink. <<$deytoibur>><<$deytoibur2>>'
+	cumface = 0
+	cumfrot = 0
+if PSBBtimes = 1: dynamic $dinBistroWork
+if PSBBtimes = 2: dynamic $dinBistroWork2
+}
+$boss_din_toilet_wash2 = {
+	if cumface > 0:$deytoibur = 'Standing at the sink, you have washed the face, wash sperm.'
+	if cumfrot > 0:$deytoibur2 = ' Discreetly wipe the semen from clothing failed blouse and left a large wet spot.'
+	'You turned the water in the sink. <<$deytoibur>><<$deytoibur2>>'
+	cumface = 0
+	cumfrot = 0
+if PSBBtimes = 1: dynamic $dinBistroWork
+if PSBBtimes = 2: dynamic $dinBistroWork2
+}
+$boss_din_bj_cum = {
+	act 'Remove the member of his mouth':
+	cls
+	reaktrand = RAND(0,10)
+	gs 'stat'
+		if reaktrand <= 5:
+		'<center><img src="images\qwest\sosed\bossBJcum.jpg"></center>'
+		'You took time member of his mouth. The hour is a member of sperm splattered on the floor, you caressed member hand until finally Anatoly Borisovich not exhausted. After that he removed his pants and member sat at the table.'
+			if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+		end
+
+		if reaktrand > 5 and reaktrand < 9:
+		cumfrot += 1
+		'<center><img src="images\qwest\sosed\bossBJcum2.jpg"></center>'
+		'You took time member of his mouth. The hour is a member of sperm splattered on the floor, you caressed member hand until finally Anatoly Borisovich not exhausted. then he removed the cock in his pants and sat down. Starting to brush up, you notice that you got some sperm on her blouse.'
+			dynamic $boss_din_go_toilet
+		end
+
+		if reaktrand >= 9:
+		cumface += 1
+		cumfrot += 1
+		'<center><img src="images\qwest\sosed\bossBJcum3.jpg"></center>'
+		'Once you have removed the member of his mouth as directed jet of sperm hit you in the face. You closed your eyes and you immediately got sperm on eyelashes. When you rubbed their eyes, they saw that the sperm just got on your clothes.'
+		dynamic $boss_din_go_toilet
+		end
+	gs 'stat'
+	end
+
+	dynamic $boss_din_bj2
+
+}
+
+$boss_din_bj2 = {
+	act 'Continue to suck':
+	cls
+	cumlip += 1
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\bossBJcum4.jpg"></center>'
+	'You continued to suck and immediately poured into your mouth warm sperm, which was mixed with saliva while you continued to suck dick deciduous.'
+		act 'Spit out':
+		cls
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\bossBJcum5.jpg"></center>'
+		'When sperm ceased to flow out of the penis you spit cum rushed out of his mouth, but his mouth was nasty, sharp taste of sperm.'
+			boburand = RAND(0,10)
+
+			if boburand > 2:
+			if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+			end
+			if boburand <= 2:
+			cumfrot += 1
+			'Spitting sperm you notice that a few drops of semen got you on her blouse.'
+			gs 'stat'
+			dynamic $boss_din_go_toilet
+			end
+		end
+
+		act 'Swallow':
+		cls
+		swallow += 1
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\bossBJcum6.jpg"></center>'
+		'You rushed to swallow warm and nasty sperm in the mouth but left an unpleasant taste of semen.'
+			boburand = RAND(0,10)
+			if boburand > 2:
+			if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+			end
+			if boburand <= 2:
+			cumfrot += 1
+			'Spitting sperm you notice that a few drops of semen got you on her blouse.'
+			gs 'stat'
+			dynamic $boss_din_go_toilet
+			end
+		end
+	end
+}
+
+$boss_din_bendover = {
+	act 'Lie chest on the table':
+	cls
+	bosstipsex = RAND(0,10)
+	gs 'stat'
+	!bossfuck
+	'<center><img src="images\qwest\sosed\bossbendover.jpg"></center>'
+	'You bent down and went chest on the table, with his hands and parted skirt ass.'
+		if bosstipsex <= 8:
+		'Anatoly Borisovich rubbed a little head of his penis on your mokrenkaya pussy.'
+		dynamic $boss_din_sex
+		end
+
+		if bosstipsex > 8:
+		'Anatoly Borisovich bent down and spit you on the ass, then you felt his finger collected saliva and you went into the anus.'
+		dynamic $boss_din_anal
+		end
+	end
+
+
+}
+$boss_din_sex = {
+	act 'Moan':
+	cls
+	bosstipsex = RAND(0,10)
+	gs 'stat'
+	!bossfuck
+	'<center><img src="images\qwest\sosed\bossfuck.jpg"></center>'
+	'You relax and feel like your lower jaw spread logged into your body hard cock, you could not stand and make a light moan from the feeling of fullness.'
+	$boy = 'Anatoly'
+	dick = 12
+	silavag = 0
+	pose = 1
+	dynamic $sexstart2
+	!dynamic $sexcum
+
+	bosswantrand = RAND(0,10)
+
+		if bosswantrand >= 3:
+		set cumass += 1
+		'<<$boy>> took out of you cock and you feel like a stream of sperm you naked by the pope.'
+		'You took a napkin and wiped the sperm with his bare ass, but you are not rubbing, the sperm still left on your body.'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+		end
+
+		if bosswantrand < 3:
+		'Anatoly Borisovich took a member of your pussy and uper it in your ass.'
+		dynamic $boss_din_anal
+		end
+	end
+
+}
+$boss_din_anal = {
+	act 'Relax the anus':
+	cls
+	bosstipsex = RAND(0,10)
+	gs 'stat'
+	!bossfuck
+	'<center><img src="images\qwest\sosed\bossanal.jpg"></center>'
+	'You relax and feel like in your anus braced hard cock trying to push your sphincter.'
+	$boy = 'Anatoly'
+	dick = 12
+	silavag = 0
+	pose = 1
+	dynamic $analsex
+	!dynamic $sexcum
+	cumanus+= 1
+	'<<$boy>> and groaned as you felt something in your ass was dispensed heat from the sperm.'
+	'Finally Chubais took out your cock and the priests took it in his pants.'
+
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+
+	end
+}
+$boss_din_sex2 = {
+	act 'Moan':
+	cls
+	bosstipsex = RAND(0,10)
+	gs 'stat'
+	!bossfuck
+	'<center><img src="images\qwest\sosed\bossfuck2.jpg"></center>'
+	'You relax and feel like your lower jaw spread logged into your body hard cock, you could not stand and make a light moan from the feeling of fullness.'
+	$boy = 'Anatoly'
+	dick = 12
+	silavag = 0
+	pose = 0
+	dynamic $sexstart2
+	!dynamic $sexcum
+
+	bosswantrand = RAND(0,10)
+
+		if bosswantrand >= 3:
+		set cumbelly += 1
+		'<<$boy>> took out of you cock and you feel like a stream of sperm you naked by the pope.'
+		'You took a napkin and wiped the sperm with his bare ass, but you are not rubbing, the sperm still left on your body.'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+		end
+
+		if bosswantrand < 3:
+		'Anatoly Borisovich took a member of your pussy and uper it in your ass.'
+		dynamic $boss_din_anal2
+		end
+	end
+
+}
+$boss_din_anal2 = {
+	act 'Relax the anus':
+	cls
+	bosstipsex = RAND(0,10)
+	gs 'stat'
+	!bossfuck
+	'<center><img src="images\qwest\sosed\bossanal2.jpg"></center>'
+	'You relax and feel like in your anus braced hard cock trying to push your sphincter.'
+		$boy = 'Anatoly'
+		dick = 12
+		silavag = 0
+		pose = 0
+		dynamic $analsex
+		!dynamic $sexcum
+		cumanus+= 1
+		'<<$boy>> and groaned as you felt something in your ass was dispensed heat from the sperm.'
+		'Finally Chubais took out your cock and the priests took it in his pants.'
+
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+
+	end
+}
+
+$din_Ivan_work = {
+	if kompromatLife > 0 and kompromatBlackMail = 0:
+	'Ivan grinned "Svetsik, Svetsik. I could not have imagined that such a cute girl, this rich life." he put the photo on your desk. You picked her up and looked. <<$kompromatFoto>>. Ivan gladly stretched like a cat caught the mouse "Svetsik understand, everything would be fine, but our chief claim to a political career. And in politics it´s not just that his secretary loves to act in this way. He, too, will suffer." So, you can collect things and find new employment. "When Anatoly Borisovich know, you fly out of here with a bang."'
+		dynamic $din_Ivan_work2
+
+		act 'Keep silent':
+		cls
+		kompromatBlackMail = 1
+		minut += 5
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\work5.jpg"></center>'
+		'Ivan seeing your silence frowned slightly. "Okay, baby, you will destroy the pride." Ivan got irritated and cleaned photo in his pocket.'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+		dynamic $din_Ivan_work2
+		end
+	end
+}
+$din_Ivan_work2 = {
+	act 'Ivan plead not show these pictures':
+	cls
+	minut += 5
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\work5.jpg"></center>'
+	'You began to plead not show pictures of Ivan boss. Ivan chuckled, "I see you are ready to cooperate.''ll Go to my office to discuss."'
+		act 'Go with Ivan in his office':
+		cls
+		kompromatBlackMail = 2
+		gs 'stat'
+		'You came to the office of Ivan and he closed the door with a key. "Well baby, I want to start to look at you naked. Undress!"'
+		act 'Undress':
+			cls
+			kompromatBlackMail = 2
+			gs 'stat'
+			'You undressed feeling the gaze of Ivan. When you were naked in front of him, he slowly walked across the room, staring at you. His hand took you for the chest and you feel his fingers covered your nipple. "Not bad, not bad. Maybe we´ll get along and. Now on your knees bitch and open your fucking mouth wide."'
+				act 'Get on your knees and open your mouth':
+				cls
+				kompromatBlackMail = 2
+				cumface += 1
+				facial += 1
+				boy += 1
+				gs 'stat'
+				'<center><img src="images\qwest\sosed\ivanfacial.jpg"></center>'
+				'You knelt down and opened his mouth. Ivan got dick out of his pants and began to masturbate in front of your face, watching you with his gaze. "I knew you´d be my whore!" sperm from his cock splattered on your face. Then another and another jet. After Ivan finished on your face, he put his dick in his pants and said, "Okay, get out of my office slut, and do not forget, I do not report anything to the chief, but you are in my hands."'
+					if PSBBtimes = 1: dynamic $dinBistroWork
+			if PSBBtimes = 2: dynamic $dinBistroWork2
+				end
+			end
+
+			dynamic $din_Ivan_work3
+		end
+
+		dynamic $din_Ivan_work3
+	end
+}
+$din_Ivan_work3 = {
+	act 'Refuse':
+	cls
+	kompromatBlackMail = 1
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\work7.jpg"></center>'
+	'You refused to undress. Ivan sighed. "All the same, you stupid pussy, and I´m tired of messing with you, it is easier to get rid of you once and for all." Ivan went to the door, opened it, and pointed out to you at the door.'
+		if PSBBtimes = 1: dynamic $dinBistroWork
+		if PSBBtimes = 2: dynamic $dinBistroWork2
+	end
+
+}
+$din_Ivan_work4 = {
+	act 'Refuse':
+	cls
+	kompromatBlackMail = 1
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\work7.jpg"></center>'
+	'You refused. Ivan sighed. "All the same, you stupid pussy, and I´m tired of messing with you, it is easier to get rid of you once and for all." He turned and walked away'
+		act 'Leave': gt 'down'
+	end
+
+}
+--- BurgerTip ---------------------------------
+

+ 100 - 0
locations/DanceWhore1

@@ -0,0 +1,100 @@
+# DanceWhore1
+minut += 5
+gs 'stat'
+'Man took you by the hand and led him into the room. When the man turned on the light in the room, you will see that it is a great sleeper.'
+
+
+dick = RAND(10,26)
+act 'Squat':
+cls
+bj += 1
+guy += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bj.jpg"></center>'
+'You squatted in front of the man and took his cock hand. Slightly moving the skin on the penis you licked the head. Your nimble tongue began to caress hot and hard cock male. Then you started to suck cock absorbing it into his mouth as much as they could.'
+tipdarand = RAND(0,2)
+	if tipdarand = 0:
+	'Man vzal your head in his hands and began to stick it on the penis.'
+		act 'Relax the throat':
+		cls
+		if throat < dick: throat += 1
+		minut += 10
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\throat.jpg"></center>'
+			if throat < dick/2:
+			manna = 0
+			horny = 0
+			'You began frantically to relax the throat when a member was a member of you. Do you drool ran down, snot and tears constantly covered vomiting spasms.'
+			end
+			if throat >= dick/2 and throat < dick:
+			manna = manna/2
+			horny = horny/2
+			'You relaxed throat and began to enter into a member of your throat to the ground. You snot and tears flowed from it and began to choke you.'
+			end
+			if throat >= dick:
+			'You are totally relaxed throat and every time a member logged in to the base of your throat hit you balls furry chin.'
+			end
+			tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Little man groaned and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'The man took a member of your mouth and began to masturbate in front of your face it.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facial.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 1:
+	'The man took a member of your mouth and put your cancer.'
+		act 'Substitute ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\anal.jpg"></center>'
+		dynamic $sexstart
+		dynamic $analsex
+		dynamic $din_go_to_home_dance
+		end
+	end
+	if tipdarand = 2:
+	'The man took a member of your mouth and put you on the back.'
+		act 'Lie on your back.':
+		cls
+		minut += 30
+		!sex += 1
+		$boy = 'Client'
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\sex.jpg"></center>'
+		'You lay on your back. <<$bname>> lay on top and spread your legs.'
+		dynamic $sexstart
+		dynamic $sexstart2
+		dynamic $sexcum
+		dynamic $din_go_to_home_dance
+		end
+	end
+end
+--- DanceWhore1 ---------------------------------
+

+ 106 - 0
locations/DanceWhore2

@@ -0,0 +1,106 @@
+# DanceWhore2
+minut += 5
+gs 'stat'
+'Boys led you to your room.'
+
+dick = RAND(10,26)
+act 'Squat':
+cls
+bj += 2
+guy += 2
+gang += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bjd.jpg"></center>'
+'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate second term. When you become a member of hardened suck second term. Your wet mouth fondled and sucked once both members.'
+tipdarand = RAND(0,1)
+	if tipdarand = 0:
+	'You guys put cancer. One went back to you, the second came to your mouth. You felt like fingers Man began to fondle your anus. A second man impatiently tapped his member you in the face.'
+		act 'Relax and suck ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\d.jpg"></center>'
+		'You suck dick absorbing it as deeply as possible.'
+		dynamic $sexstart
+		dynamic $analsex
+		tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facial.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 1:
+	'Guys put you back on the sofa, one of them located between your legs, the second came to your face.'
+		act 'Suck.':
+		cls
+		minut += 30
+		!sex += 1
+		$boy = 'Client'
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\d1.jpg"></center>'
+		'You began to suck dick while the other guy spread your legs.'
+		dynamic $sexstart
+		dynamic $sexstart2
+		dynamic $sexcum
+		tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facial.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 2:
+
+	end
+end
+--- DanceWhore2 ---------------------------------
+

+ 101 - 0
locations/DanceWhore3

@@ -0,0 +1,101 @@
+# DanceWhore3
+minut += 5
+gs 'stat'
+'Caucasian took you by the hand and led him into the room. When the man turned on the light in the room, you will see that it is a great sleeper.'
+
+dick = RAND(16,30)
+act 'Squat':
+cls
+bj += 1
+guy += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bj.jpg"></center>'
+'You squatted in front of the man and took his cock hand. Slightly moving the skin on the penis you licked the head. Your nimble tongue began to caress hot and hard cock male. Then you started to suck cock absorbing it into his mouth as much as they could.'
+tipdarand = RAND(0,2)
+	if tipdarand = 0:
+	'Man vzal your head in his hands and began to stick it on the penis.'
+		act 'Relax the throat':
+		cls
+		if throat < dick: throat += 1
+		minut += 10
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\throat.jpg"></center>'
+			if throat < dick/2:
+			manna = 0
+			horny = 0
+			'You began frantically to relax the throat when a member was a member of you. Do you drool ran down, snot and tears constantly covered vomiting spasms.'
+			end
+			if throat >= dick/2 and throat < dick:
+			manna = manna/2
+			horny = horny/2
+			'You relaxed throat and began to enter into a member of your throat to the ground. You snot and tears flowed from it and began to choke you.'
+			end
+			if throat >= dick:
+			'You are totally relaxed throat and every time a member logged in to the base of your throat hit you balls furry chin.'
+			end
+			tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Little man groaned and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'The man took a member of your mouth and began to masturbate in front of your face it.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facial.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 1:
+	'The man took a member of your mouth and put your cancer.'
+		act 'Substitute ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\anal.jpg"></center>'
+		dynamic $sexstart
+		dynamic $analsex
+		dynamic $din_go_to_home_dance
+		end
+	end
+	if tipdarand = 2:
+	'The man took a member of your mouth and put you on the back.'
+		act 'Lie on your back.':
+		cls
+		minut += 30
+		!sex += 1
+		$boy = 'Client'
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\sex.jpg"></center>'
+		'You lay on your back. <<$bname>> lay on top and spread your legs.'
+		dynamic $sexstart
+		dynamic $sexstart2
+		dynamic $sexcum
+		dynamic $din_go_to_home_dance
+		end
+	end
+
+
+end
+--- DanceWhore3 ---------------------------------
+

+ 108 - 0
locations/DanceWhore4

@@ -0,0 +1,108 @@
+# DanceWhore4
+minut += 5
+gs 'stat'
+'Two Caucasians led you to your room.'
+
+
+
+dick = RAND(16,30)
+act 'Squat':
+cls
+bj += 2
+guy += 2
+gang += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bjd.jpg"></center>'
+'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate second term. When you become a member of hardened suck second term. Your wet mouth fondled and sucked once both members.'
+tipdarand = RAND(0,1)
+	if tipdarand = 0:
+	'You guys put cancer. One went back to you, the second came to your mouth. You felt like fingers Man began to fondle your anus. A second man impatiently tapped his member you in the face.'
+		act 'Relax and suck ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\d.jpg"></center>'
+		'You suck dick absorbing it as deeply as possible.'
+		dynamic $sexstart
+		dynamic $analsex
+		tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facial.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 1:
+	'Guys put you back on the sofa, one of them located between your legs, the second came to your face.'
+		act 'Suck.':
+		cls
+		minut += 30
+		!sex += 1
+		$boy = 'Client'
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\d1.jpg"></center>'
+		'You began to suck dick while the other guy spread your legs.'
+		dynamic $sexstart
+		dynamic $sexstart2
+		dynamic $sexcum
+		tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facial.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 2:
+
+	end
+end
+--- DanceWhore4 ---------------------------------
+

+ 61 - 0
locations/DanceWhore5

@@ -0,0 +1,61 @@
+# DanceWhore5
+minut += 5
+gs 'stat'
+'Three Caucasians led you to your room.'
+
+dick = RAND(16,30)
+act 'Squat':
+cls
+bj += 3
+guy += 3
+gang += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bjt.jpg"></center>'
+'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate other members. You tried to lick and suck just three members.'
+!tipdarand = RAND(0,1)
+tipdarand = 0
+	if tipdarand = 0:
+	'Caucasians talking in a strange language you put cancer.'
+		act 'Relax and suck ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\f.jpg"></center>'
+		'You suck two members of absorbing them as deeply as possible into his mouth.'
+		dynamic $sexstart
+		dynamic $analsex
+			act 'Further':
+			cls
+			tipdarand = RAND(0,1)
+				if tipdarand = 0:
+				cumface += 2
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facialt.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish. Second Caucasian too, began to discharge on your face, covering it with sperm.'
+				end
+				if tipdarand = 1:
+				cumlip += 2
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallowt.jpg"></center>'
+				'You kneel and readily opened his mouth. Caucasians started you finish filling in the open mouth of his sperm. When the flow of sperm stopped and turned your mouth is filled to the brim with sperm, you swallow it.'
+				end
+			dynamic $din_go_to_home_dance
+			end
+		end
+	end
+	if tipdarand = 1:
+	end
+	if tipdarand = 2:
+
+	end
+end
+--- DanceWhore5 ---------------------------------
+

+ 99 - 0
locations/DanceWhore6

@@ -0,0 +1,99 @@
+# DanceWhore6
+minut += 5
+gs 'stat'
+'Hefty Ebony took you by the hand and led somewhere.'
+
+dick = RAND(18,35)
+act 'Squat':
+cls
+bj += 1
+guy += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bjn.jpg"></center>'
+'You squatted in front of the man and took his cock hand. Slightly moving the skin on the penis you licked the head. Your nimble tongue began to caress hot and hard cock male. Then you started to suck cock absorbing it into his mouth as much as they could.'
+tipdarand = RAND(0,2)
+	if tipdarand = 0:
+	'Man vzal your head in his hands and began to stick it on the penis.'
+		act 'Relax the throat':
+		cls
+		if throat < dick: throat += 1
+		minut += 10
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\throatn.jpg"></center>'
+			if throat < dick/2:
+			manna = 0
+			horny = 0
+			'You began frantically to relax the throat when a member was a member of you. Do you drool ran down, snot and tears constantly covered vomiting spasms.'
+			end
+			if throat >= dick/2 and throat < dick:
+			manna = manna/2
+			horny = horny/2
+			'You relaxed throat and began to enter into a member of your throat to the ground. You snot and tears flowed from it and began to choke you.'
+			end
+			if throat >= dick:
+			'You are totally relaxed throat and every time a member logged in to the base of your throat hit you balls furry chin.'
+			end
+			tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Little man groaned and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'The man took a member of your mouth and began to masturbate in front of your face it.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facialn.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 1:
+	'The man took a member of your mouth and put your cancer.'
+		act 'Substitute ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\analn.jpg"></center>'
+		dynamic $sexstart
+		dynamic $analsex
+		dynamic $din_go_to_home_dance
+		end
+	end
+	if tipdarand = 2:
+	'The man took a member of your mouth and put you on the back.'
+		act 'Lie on your back.':
+		cls
+		minut += 30
+		!sex += 1
+		$boy = 'Client'
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\sexn.jpg"></center>'
+		'You lay on your back. <<$bname>> lay on top and spread your legs.'
+		dynamic $sexstart
+		dynamic $sexstart2
+		dynamic $sexcum
+		dynamic $din_go_to_home_dance
+		end
+	end
+end
+--- DanceWhore6 ---------------------------------
+

+ 105 - 0
locations/DanceWhore7

@@ -0,0 +1,105 @@
+# DanceWhore7
+minut += 5
+gs 'stat'
+'Two Negro led you to your room.'
+dick = RAND(18,35)
+act 'Squat':
+cls
+bj += 2
+guy += 2
+gang += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bjdn.jpg"></center>'
+'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate second term. When you become a member of hardened suck second term. Your wet mouth fondled and sucked once both members.'
+tipdarand = RAND(0,1)
+	if tipdarand = 0:
+	'You guys put cancer. One went back to you, the second came to your mouth. You felt like fingers Man began to fondle your anus. A second man impatiently tapped his member you in the face.'
+		act 'Relax and suck ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\dn.jpg"></center>'
+		'You suck dick absorbing it as deeply as possible.'
+		dynamic $sexstart
+		dynamic $analsex
+		tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facialn.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 1:
+	'Guys put you back on the sofa, one of them located between your legs, the second came to your face.'
+		act 'Suck.':
+		cls
+		minut += 30
+		!sex += 1
+		$boy = 'Client'
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\d1n.jpg"></center>'
+		'You began to suck dick while the other guy spread your legs.'
+		dynamic $sexstart
+		dynamic $sexstart2
+		dynamic $sexcum
+		tipdarand = RAND(0,1)
+			if tipdarand = 0:
+			'Man fuck you in the mouth, a little groan and grabbed your hair pressed you to face your Kucheryavykh pubis. Suddenly your throat spurt of semen.'
+			act 'Swallow':
+				cls
+				cumlip += 1
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallow.jpg"></center>'
+				'You began frantically swallow cum until a member has not finished pour the seed into your mouth.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+			if tipdarand = 1:
+			'Man fuck you in the mouth, took a member of your mouth and began to masturbate him in front of your face.'
+				act 'Close your eyes':
+				cls
+				cumface += 1
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facialn.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish.'
+				dynamic $din_go_to_home_dance
+				end
+			end
+		end
+	end
+	if tipdarand = 2:
+
+	end
+end
+--- DanceWhore7 ---------------------------------
+

+ 61 - 0
locations/DanceWhore8

@@ -0,0 +1,61 @@
+# DanceWhore8
+minut += 5
+gs 'stat'
+'Three Negro led you to your room.'
+
+dick = RAND(18,35)
+act 'Squat':
+cls
+bj += 3
+guy += 3
+gang += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\dance\bjtn.jpg"></center>'
+'You squatted in front of guys and took their members hands. Little masturbate you licked the head of one of the members. Then you started to suck cock absorbing it into his mouth as much as they could and masturbate other members. You tried to lick and suck just three members.'
+!tipdarand = RAND(0,1)
+tipdarand = 0
+	if tipdarand = 0:
+	'Negros talking in a strange language you put cancer.'
+		act 'Relax and suck ass':
+		cls
+		minut += 30
+		$boy = 'Client'
+		cumanus += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\dance\fn.jpg"></center>'
+		'You suck two members of absorbing them as deeply as possible into his mouth.'
+		dynamic $sexstart
+		dynamic $analsex
+			act 'Further':
+			cls
+			tipdarand = RAND(0,1)
+				if tipdarand = 0:
+				cumface += 2
+				facial += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\facialtn.jpg"></center>'
+				'You closed your eyes and felt like you hit in the face and a warm jet of sperm flowed down. Then the next jet hit you in the face. Then another and another. Finally a member has ceased to finish. Second Caucasian too, began to discharge on your face, covering it with sperm.'
+				end
+				if tipdarand = 1:
+				cumlip += 2
+				swallow += 1
+				minut += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\dance\swallowtn.jpg"></center>'
+				'You kneel and readily opened his mouth. Negros you started to cum into her open mouth filling it with sperm. When the flow of sperm stopped and turned your mouth is filled to the brim with sperm, you swallow it.'
+				end
+			dynamic $din_go_to_home_dance
+			end
+		end
+	end
+	if tipdarand = 1:
+	end
+	if tipdarand = 2:
+
+	end
+end
+--- DanceWhore8 ---------------------------------
+

+ 605 - 0
locations/EvBoyBuh

@@ -0,0 +1,605 @@
+# EvBoyBuh
+$din_gorodok_boy_bj = {
+	act 'Squat':
+	cls
+	minut += 5
+	horny += 10
+	bj += 1
+	guy += 1
+	sub += 1
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\boybj.jpg"></center>'
+	'You squatted in front of the guy and began stroking his cock.'
+		act 'Suck':
+		cls
+		minut += 5
+		horny += 10
+			if GorSlut < 2:
+			resultrand = RAND(0,100)
+			if resultrand >= 80:
+			GorSlut = 2
+			end
+			end
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\boybj2.jpg"></center>'
+		dynamic $dinrandbj
+			act 'Suck on':
+			cls
+			minut += 5
+			horny += 10
+			cumface += 1
+			cumlip += 1
+			cumfrot += 1
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\boybj3.jpg"></center>'
+			dynamic $dinrandswallow
+			act 'Leave': gt 'gdkin'
+			end
+		end
+
+		act 'Stoop':
+		cls
+		minut += 5
+		horny += 10
+		boy += 1
+		$boy = $bname3
+			if GorSlut = 0:
+			resultrand = RAND(0,100)
+			if resultrand >= 80:
+			GorSlut = 1
+			end
+			end
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\boysex.jpg"></center>'
+		'You bent down and framed mooning guy.'
+		dynamic $sexstart
+		dynamic $sexstart2
+		dynamic $sexcum
+		act 'Leave': gt 'gdkin'
+		end
+	end
+}
+
+
+minut += 5
+gs 'stat'
+'<center><img src="images\etogame\dk_night.jpg"></center>'
+'You went out with a guy from the club he led the club for you.'
+if GorSlut = 0:
+'The guy pulled out a package poltorashku beer, chips and a couple of cups. You have found a place in the bush, and settled on the fallen tree.'
+	act 'Drink beer':
+	cls
+	alko += 1
+	manna += 30
+	fat += 5
+	energy += 20
+	minut += 10
+	gs 'stat'
+	'You will have fun chatting with a guy drinking beer from cups and seizing chips. The guy was hilarious and telling funny stories.'
+		if alko >= 3:
+		horny += 20
+		'<<$bname>> you hugged and kissed. You embraced the thrill of a kiss. You felt his hands on his chest.'
+			if horny < 75:
+				act 'Whisper, "Do not"':
+				cls
+				minut += 5
+				gs 'stat'
+					if DPtipe = 2:
+					'<center><img src="images\qwest\alter\Ev\grab.jpg"></center>'
+					'The guy was drunk and not paying attention to you.'
+
+					dynamic $din_gorodok_boy_bj
+
+						act 'Be silent':
+						cls
+						minut += 5
+						horny += 10
+						boy += 1
+						$boy = $bname3
+							if GorSlut = 0:
+							resultrand = RAND(0,100)
+								if resultrand >= 80:
+								GorSlut = 1
+								end
+							end
+						gs 'stat'
+						'<center><img src="images\picV\vag.jpg"></center>'
+						'The guy threw you to the ground and began to undress.'
+						dynamic $sexstart
+						dynamic $sexstart2
+						dynamic $sexcum
+						act 'Leave': gt 'gdkin'
+						end
+					else
+					horny += 10
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\tits.jpg"></center>'
+					'Male head slightly weakens, but still does not let you.'
+					if horny < 75:
+					act 'Leave': gt 'gdkin'
+					end
+
+					'You are standing in an embrace with a guy and he gently pulls your chest and begins to lick and suck her nipples.'
+					dynamic $din_gorodok_boy_bj
+					end
+
+					if dom > 0:
+						act 'Jerk guy':
+						cls
+						minut += 5
+						guy += 1
+						hj += 1
+						sub += 1
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+						'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+						act 'Leave': gt 'gdkin'
+						end
+					end
+				end
+			end
+
+			act 'Be silent':
+			cls
+			minut += 5
+			horny += 10
+			guy += 1
+			$boy = $bname3
+				if GorSlut = 0:
+				resultrand = RAND(0,100)
+					if resultrand >= 80:
+					GorSlut = 1
+					end
+				end
+			gs 'stat'
+			'<center><img src="images\picV\vag.jpg"></center>'
+			'The guy threw you to the ground and began to undress.'
+			dynamic $sexstart
+			dynamic $sexstart2
+			dynamic $sexcum
+			act 'Leave': gt 'gdkin'
+			end
+		end
+		if alko < 3:
+			if DPtipe = 1:
+			deystrand = rand(0,1)
+				if deystrand = 0:
+				'<<$bname>> said, "You´re a cool girl. Maybe we´ll meet again?"'
+				act 'And refuse to leave': gt 'gdkin'
+					act 'Tell him your phone':
+					cls
+					manna += 10
+					numboyFrend += 1
+					$nameBoyfrend[numboyFrend] = $bname
+					$nameBoyfrendFull[numboyFrend] = $bnamefull
+					dickBoyFrend[numboyFrend] = dick
+					silavagBoyFrend[numboyFrend] = siladick
+					otnBoyFrend[numboyFrend] = 50
+					minut += 30
+					gs 'stat'
+					'You told the guy my phone and he recorded it.'
+					act 'Leave': gt 'gdkin'
+					end
+				end
+				if deystrand = 1:
+				'<<$bname>> fits closer to you and starts kissing you.'
+				if horny <= 25: act 'Leave': gt 'gdkin'
+				dynamic $din_gorodok_boy_pristal
+				end
+			end
+			if DPtipe = 2:
+			horny += 5
+			gs 'stat'
+			'<<$bname>> suitable for you closer and starts kissing you.'
+			if horny <= 25: act 'Leave': gt 'gdkin'
+
+				act 'Kiss':
+				cls
+				horny += 5
+				minut += 3
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\kiss.jpg"></center>'
+				'<<$bname>> passionately kisses your <<$liptalk3>> and you reciprocate the kiss. You feel like your hands Man trying to pull your chest.'
+				if horny <= 50: act 'Leave': gt 'gdkin'
+					act 'Let him':
+					cls
+					horny += 10
+					minut += 3
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\tits.jpg"></center>'
+					'<<$bname>> pulls your breasts <<tits>> the size of the outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he´s got a hard cock.'
+					if horny <= 75: act 'Leave': gt 'gdkin'
+						if horny <= 90:
+							act 'Resist':
+							cls
+							horny += 10
+							minut += 3
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\petting.jpg"></center>'
+							'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'
+							if horny <= 90: act 'Remove his hands and walk away': gt 'gdkin'
+								if horny > 90:
+								cla
+								horny = 0
+								orgasm += 1
+								gs 'stat'
+								'Suddenly you feel like in the abdomen increases the pleasant warmth and you hit an orgasm. You bite my lip that would not yell at the sensation.'
+								act 'Moan':
+									cls
+									horny += 5
+									minut += 3
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\cock3.jpg"></center>'
+									'You moan with pleasure and your legs buckled, you squatted in front of the guy. When eyes brightened you will see in your face member.'
+										if sub > 0:
+											act 'Suck':
+											cls
+											minut += 5
+											horny += 10
+											bj += 1
+											guy += 1
+											sub += 1
+											gs 'stat'
+											'<center><img src="images\qwest\alter\Ev\cocksuck.jpg"></center>'
+											'You without even realizing suddenly kissed penis and realized that you do only when hard cock already filled your mouth and you are diligent it aspirated.'
+												act 'Further':
+												cls
+												minut += 5
+												horny += 10
+												cumlip += 1
+												cumface += 1
+												cumfrot += 1
+													if GorSlut < 2:
+													resultrand = RAND(0,100)
+														if resultrand >= 80:
+														GorSlut = 2
+														end
+													end
+												gs 'stat'
+												'<center><img src="images\qwest\alter\Ev\cocksuck2.jpg"></center>'
+												'Suddenly your mouth warm jet of sperm hit, you almost choked but continued to suck. Seed flowed on your lips on your cock and dripping clothes, finally became a member of the fall off in your mouth and the guy took it out and put it in his pants.'
+													act 'Look at the Man':
+													cls
+													minut += 1
+													gs 'stat'
+													'<center><img src="images\qwest\alter\Ev\cocksuck3.jpg"></center>'
+													'<<$bname>> still experience holding your head and you with a mouth full of sperm looked up into his face. The guy is quite bliss and looks at you. "Fucking suck!"'
+													act 'Get up and leave': gt 'gdkin'
+													end
+												end
+											end
+										end
+										if sub = 0 and dom = 0:
+											act 'Sit':
+										cls
+										minut += 5
+										guy += 1
+										facial += 1
+										sub += 1
+										cumface += 1
+										cumfrot += 1
+										gs 'stat'
+										'<center><img src="images\qwest\alter\Ev\facial.jpg"></center>'
+										'You as if spellbound remained seated on the ground and the guy started to masturbate in front of your face member. Everything happened very quickly, you do not have time to understand anything and suddenly you face, a member of the hot liquid jet takes off and lands on the nose. You flinch and squeezes his eyes shut eyes, feeling as new streams of sperm fall on your face.'
+										act 'Leave': gt 'gdkin'
+										end
+										end
+										if dom > 0:
+										act 'Jerk guy':
+										cls
+										minut += 5
+										guy += 1
+										hj += 1
+										dom = 0
+										gs 'stat'
+										'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+										'You had the courage to stand up and took it hard and hot cock in her hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+										act 'Leave': gt 'gdkin'
+										end
+										end
+
+									end
+								end
+							end
+						end
+
+
+						act 'Caress his cock through his pants':
+						cls
+						horny += 5
+						minut += 3
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\cock.jpg"></center>'
+						'You started stroking guy crotch, feeling the hardness of the penis.'
+						if horny <= 90: act 'Leave': gt 'gdkin'
+							act 'Going to the guy´s pants':
+							cls
+							horny += 10
+							minut += 3
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\cock2.jpg"></center>'
+							'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'
+							if horny <= 90: act 'Leave': gt 'gdkin'
+								if dom > 0:
+									act 'Jerk guy':
+									cls
+									minut += 5
+									guy += 1
+									hj += 1
+									sub += 1
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+									'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+									act 'Leave': gt 'gdkin'
+									end
+								end
+							dynamic $din_gorodok_boy_bj
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+$din_gorodok_boy_otkaz = {
+	if dom >= GorSlut:
+		act 'Leave':
+		cls
+		dom -= GorSlut
+		minut += 5
+		gs 'stat'
+		'You refused and the guy went back to the club.'
+		act 'Leave': gt 'gdkin'
+		end
+	end
+}
+$din_gorodok_boy_pristal = {
+act 'Kiss':
+cls
+horny += 5
+minut += 3
+gs 'stat'
+'<center><img src="images\qwest\alter\Ev\kiss.jpg"></center>'
+'<<$bname>> passionately kisses your <<$liptalk3>> and you reciprocate the kiss. You feel like your hands Man trying to pull your chest.'
+if horny <= 50: act 'Leave': gt 'gdkin'
+	act 'Let him':
+	cls
+	horny += 10
+	minut += 3
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\tits.jpg"></center>'
+	'<<$bname>> pulls your breasts <<tits>> size outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he´s got a hard cock.'
+	if horny <= 75: act 'Leave': gt 'gdkin'
+		if horny <= 90:
+			act 'Resist':
+			cls
+			horny += 10
+			minut += 3
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\petting.jpg"></center>'
+			'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'
+			if horny <= 90: act 'Remove his hands and walk away': gt 'gdkin'
+				if horny > 90:
+				cla
+				horny = 0
+				orgasm += 1
+				gs 'stat'
+				'Suddenly you feel like in the abdomen increases the pleasant warmth and you hit an orgasm. You bite my lip that would not yell at the sensation.'
+					act 'Moan':
+					cls
+					horny += 5
+					minut += 3
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\cock3.jpg"></center>'
+					'You moan with pleasure and your legs buckled, you squatted in front of the guy. When eyes brightened you will see in your face member.'
+						if sub > 0:
+							act 'Suck':
+							cls
+							minut += 5
+							horny += 10
+							bj += 1
+							guy += 1
+							sub += 1
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\cocksuck.jpg"></center>'
+							'You without even realizing suddenly kissed penis and realized that you do only when hard cock already filled your mouth and you are diligent it aspirated.'
+								act 'Further':
+								cls
+								minut += 5
+								horny += 10
+								cumlip += 1
+								cumface += 1
+								cumfrot += 1
+									if GorSlut < 2:
+									resultrand = RAND(0,100)
+										if resultrand >= 80:
+										GorSlut = 2
+										end
+									end
+								gs 'stat'
+								'<center><img src="images\qwest\alter\Ev\cocksuck2.jpg"></center>'
+								'Suddenly your mouth warm jet of sperm hit, you almost choked but continued to suck. Seed flowed on your lips on your cock and dripping clothes, finally became a member of the fall off in your mouth and the guy took it out and put it in his pants.'
+									act 'Look at the Man':
+									cls
+									minut += 1
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\cocksuck3.jpg"></center>'
+									'<<$bname>> still experience holding your head and you with a mouth full of sperm looked up into his face. Guy and quite blissfully happy looking at you. "Fucking suck!"'
+									act 'Get up and leave': gt 'gdkin'
+									end
+								end
+							end
+						end
+						if sub = 0 and dom = 0:
+							act 'Sit':
+							cls
+							minut += 5
+							guy += 1
+							facial += 1
+							sub += 1
+							cumface += 1
+							cumfrot += 1
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\facial.jpg"></center>'
+							'You as if spellbound remained seated on the ground and the guy started to masturbate in front of your face member. Everything happened very quickly, you do not have time to understand anything and suddenly you on the face of a member of hot liquid jet takes off and lands on the nose. You flinch and squeezes his eyes shut eyes, feeling like new streams of sperm fall on your face.'
+							act 'Leave': gt 'gdkin'
+							end
+						end
+						if dom > 0:
+							act 'jerk guy':
+							cls
+							minut += 5
+							guy += 1
+							hj += 1
+							dom = 0
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+							'You had the courage to stand up and took it hard and hot cock in her hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+							act 'Leave': gt 'gdkin'
+							end
+						end
+
+					end
+				end
+			end
+		end
+
+
+		act 'Caress his cock through his pants':
+		cls
+		horny += 5
+		minut += 3
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\cock.jpg"></center>'
+		'You started stroking guy crotch, feeling the hardness of the penis.'
+		if horny <= 90: act 'Leave': gt 'gdkin'
+			act 'Going to the guy´s pants':
+			cls
+			horny += 10
+			minut += 3
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\cock2.jpg"></center>'
+			'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'
+			if horny <= 90: act 'Leave': gt 'gdkin'
+				if dom > 0:
+					act 'jerk guy':
+					cls
+					minut += 5
+					guy += 1
+					hj += 1
+					sub += 1
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+					'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+					act 'Leave': gt 'gdkin'
+					end
+				end
+			dynamic $din_gorodok_boy_bj
+			end
+		end
+	end
+end
+
+}
+if GorSlut >= 1 and GorSlut <= 2:
+gsboyrand = rand(0,10)
+	if gsboyrand = 0:
+		if GorSlut = 1:
+		'<<$bname>> said, "Svetsik I heard that you all give." The guy got dick out of his pants.'
+		dynamic $din_gorodok_boy_bj
+		dynamic $din_gorodok_boy_otkaz
+		end
+		if GorSlut = 2:
+		'<<$bname>> said, "Svetsik I heard that you take in your mouth." The guy got dick out of his pants.'
+		dynamic $din_gorodok_boy_bj
+		dynamic $din_gorodok_boy_otkaz
+		end
+	end
+	if gsboyrand > 0:
+	alko += 1
+	minut += 15
+	gs 'stat'
+	'<<$bname>> beer and got you started drinking with him. When the beer was done with a guy came up to you and hug you.'
+	dynamic $din_gorodok_boy_otkaz
+	dynamic $din_gorodok_boy_pristal
+	exit
+	end
+end
+if GorSlut = 3 or GorSlut = 4:
+'<<$bname>> said, "you´re Svetsik <<$gnikname>>. I want to have fun." The guy got dick out of his pants.'
+dynamic $din_gorodok_boy_bj
+dynamic $din_gorodok_boy_otkaz
+end
+if GorSlut = 5:
+'<<$bname>> said, "you´re Svetsik <<$gnikname>>. I want to have fun." After that guy got dick out of his pants.'
+
+	dynamic $din_gorodok_boy_bj
+	dynamic $din_gorodok_boy_otkaz
+end
+if GorSlut = 6:
+'<<$bname>> said, "you´re Svetsik <<$gnikname>>. I want a blow job. Here you 50 rubles," After this guy got dick out of his pants.'
+	act 'Squat':
+	cls
+	minut += 5
+	horny += 10
+	bj += 1
+	guy += 1
+	sub += 1
+	money += 50
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\boybj.jpg"></center>'
+	'You squatted in front of the guy and began stroking his cock.'
+		act 'Suck':
+		cls
+		minut += 5
+		horny += 10
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\boybj2.jpg"></center>'
+		dynamic $dinrandbj
+			act 'Further':
+			cls
+			minut += 5
+			horny += 10
+			cumface += 1
+			cumlip += 1
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\boybj3.jpg"></center>'
+			dynamic $dinrandswallow
+			act 'Leave': gt 'gdkin'
+			end
+		end
+	end
+
+	act 'Leave': gt 'gdkin'
+end
+if GorSlut >= 1:
+	if dom >= 5:
+		act 'Swear Man':
+		cls
+		sub += 5
+		minut += 3
+		GorSlut -= 1
+		gs 'stat'
+		'You denied the kid "You do ohereli? His wife will make such proposals. Freak." The guy was confused, "Well boys as they say ..." You killed him, "said Moscow chickens milked, but just being milked, do not say you´re more ears hang, you moron!"'
+		act 'Leave': gt 'gdkin'
+		end
+	end
+	if GorSlut < 6:
+		if dom > 0:
+			act 'And you´ve got the money that is?':
+			cls
+			sub += 1
+			minut += 3
+			GorSlut = 6
+			money += 300
+			gs 'stat'
+			'You refused kid "And you have money that is?" The kid pulled out his 300 rubles. You took the money and put their own.'
+			dynamic $din_gorodok_boy_bj
+			end
+		end
+	end
+end
+!dynamic $dinrandswallow
+--- EvBoyBuh ---------------------------------
+

+ 280 - 0
locations/EvOtelMan

@@ -0,0 +1,280 @@
+# EvOtelMan
+$din_otel_man_end = {
+act 'Brush up':
+cls
+minut += 15
+gs 'stat'
+'Have you started to brush up. <<$bname>> stretched and rolled over on the bed. "It was great Svetsik."'
+if cumface > 0: cumface = 0 & 'You found napkins and wiped off the face of the sperm.'
+if cumanus > 0: 'Have you tried to wipe the cum with his priests, but how could you not wiped out of your anus still leaking sperm.'
+act 'Leave': gt 'vokzalG'
+end
+}
+$din_otel_man_blow = {
+act 'Squat':
+cls
+bj += 1
+guy += 1
+sub += 1
+minut += 10
+gs 'stat'
+'<center><img src="images\qwest\alter\Ev\bj.jpg"></center>'
+'You squatted in front of the man and took his cock hand. Slightly moving the skin on the penis you licked the head. Your nimble tongue began to caress hot and hard cock male. <<$bname>> said "<<$name>>, I will soon be over."'
+	act 'Suck':
+	cls
+	cumlip += 1
+	minut += 10
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\bj2.jpg"></center>'
+	'You lips wrapped around his cock and started sucking carefully clasping his solid shaft <<$liptalk2>>. <<$bname>> groans and you feel like your mouth hits the jet of sperm.'
+		act 'Sucking swallowing sperm':
+		cls
+		swallow += 1
+		water -= 10
+		minut += 10
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\bj3.jpg"></center>'
+		'You continued to suck cock and swallow cum sperm gets into your mouth. Semen was so much that you do not have time to swallow everything and it flows out of your mouth over the penis. Finally <<$bname>> ceases to finish and you get the dick out of your mouth smelling sperm. In the mouth, the taste of nasty cumshot obliznuvshis you realize that your <<$liptalk3>> wet with semen.'
+		dynamic $din_otel_man_end
+		end
+
+		act 'Remove the mouth':
+		cls
+		cumface += 1
+		facial += 1
+		minut += 10
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\bj4.jpg"></center>'
+		'You remove a member from his mouth and jet of sperm immediately slapped you in the face. You shut his eyes for fear that the sperm gets into your eyes and feel as another spurt of hot Cum landed on your face.'
+		dynamic $din_otel_man_end
+		end
+
+	end
+
+	act 'Substitute ass':
+	cls
+	minut += 30
+	$boy = $bname
+	cumanus += 1
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\anal.jpg"></center>'
+	dynamic $sexstart
+	dynamic $analsex
+	dynamic $din_otel_man_end
+	end
+
+	act 'Lie on your back.':
+	cls
+	minut += 30
+	!sex += 1
+	$boy = $bname
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\sex.jpg"></center>'
+	'You lay on your back. <<$bname>> lay on top and spread your legs.'
+	dynamic $sexstart
+	dynamic $sexstart2
+	dynamic $sexcum
+	dynamic $din_otel_man_end
+	end
+end
+}
+$din_otel_man_beforesex = {
+if horny < 75 and vagina = 0 and sex = 0 or dom > 0 and vagina = 0 and sex = 0:
+	act 'I have a girl and a bank of virginity':
+	cls
+	minut += 5
+	gs 'stat'
+	tiprandeom = RAND(0,2)
+		if tiprandeom < 2:
+		'You have admitted that you are a man and a girl would want to keep their virginity. The man smiled and said that sex can be engaged and remaining girl. <<$bname>> took a cock from his pants.'
+		dynamic $din_otel_man_blow
+			if dom > 0:
+				act 'Not even hope':
+				cls
+				sub += 1
+				gs 'stat'
+				'You laughed and refused to man. <<$bname>> scratching his head, "You want me to give you Piatihatki?"'
+					act 'Come on':
+					cls
+					money += 500
+					gs 'stat'
+					'You reached your palm and the man gave you five hundred rubles.'
+					dynamic $din_otel_man_blow
+					end
+
+					act 'Leave': gt 'vokzalG'
+				end
+			end
+		end
+		if tiprandeom = 2:
+		'<center><img src="images\qwest\alter\Ev\otel.jpg"></center>'
+		'<<$bname>> interested, "Really? Are you a virgin? Piatihatki I will give you, if you show me your pussy"'
+		if dom > 0:
+		act 'Not even hope':
+				cls
+				sub += 1
+				gs 'stat'
+				'You laughed and refused to man. <<$bname>> scratching his head, "Well then, can pososesh? Piatihatki I´ll give you."'
+					act 'Come on':
+					cls
+					money += 500
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\otel.jpg"></center>'
+					'You reached your palm and the man gave you five hundred rubles.'
+					dynamic $din_otel_man_blow
+					end
+
+					act 'Leave': gt 'vokzalG'
+				end
+		end
+
+			act 'Show':
+			cls
+			sub += 1
+			money += 500
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\kiska.jpg"></center>'
+			'You undressed and showed her pussy man. He considered with interest you. "Cool. Listen. I´ll give you five pieces if you let me be your first boyfriend."'
+				act 'Agree.':
+				cls
+				minut += 30
+				!sex += 1
+				$boy = $bname
+				money += 5000
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\sex.jpg"></center>'
+				'You stretched palm and man shaking hands you counted five thousand. After that <<$bname>> threw you on the bed and spread your legs.'
+				dynamic $sexstart
+				dynamic $sexstart2
+				dynamic $sexcum
+				dynamic $din_otel_man_end
+				end
+
+				if dom > 0:
+					act 'No, I´m going to stay a virgin until marriage':
+					cls
+					sub += 1
+					gs 'stat'
+					'You laughed and refused to man. <<$bname>> scratching his head, "Well then, can pososesh? Piatihatki I´ll give you."'
+						act 'Come on':
+						cls
+						money += 500
+						gs 'stat'
+						'You reached your palm and the man gave you five hundred rubles.'
+						dynamic $din_otel_man_blow
+						end
+
+						act 'Leave': gt 'vokzalG'
+					end
+				end
+
+				act 'Leave': gt 'vokzalG'
+			end
+		end
+	end
+end
+	if dom >= 5 and StoryLine > 0:
+		act 'Breeding for loot.':
+		cls
+		sub += 5
+		minut += 5
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\otel.jpg"></center>'
+		'You looked at the clock. "Well, we had a good time, but perhaps I´ll go. And then swear the nurse will not give money for lunch then." <<$bname>> You smiled, "I´ll give you three, it will suffice you for lunch?"'
+			act 'Agree to have sex for money.':
+			cls
+			minut += 30
+			!sex += 1
+			guy += 1
+			$boy = $bname
+			money += 3000
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\sex.jpg"></center>'
+			'You stretched palm and man shaking hands you counted five thousand. After that <<$bname>> threw you on the bed and spread your legs.'
+			dynamic $sexstart
+			dynamic $sexstart2
+			dynamic $sexcum
+			dynamic $din_otel_man_end
+			end
+
+			if dom > 0:
+		act 'Oral sex is the maximum':
+				cls
+				sub += 1
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\otel.jpg"></center>'
+				'You laughed and denied the men said that blowjob is the maximum for which he can rely. <<$bname>> scratching his head, "No problem, I´ll give you Piatihatki."'
+					act 'Come on':
+					cls
+					money += 500
+					gs 'stat'
+					'You reached your palm and the man gave you five hundred rubles.'
+					dynamic $din_otel_man_blow
+					end
+
+					act 'Leave': gt 'vokzalG'
+				end
+		end
+		end
+	end
+
+
+	act 'Next.':
+	cls
+	minut += 30
+	!sex += 1
+	guy += 1
+	$boy = $bname
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\sex.jpg"></center>'
+	'<<$bname>> threw you on the bed and spread your legs.'
+	dynamic $sexstart
+	dynamic $sexstart2
+	dynamic $sexcum
+	dynamic $din_otel_man_end
+	end
+
+}
+
+
+minut += 15
+gs 'stat'
+if DPtipe = 1:
+'The man came to standing next to a club and Takser spoken.a with him a couple of phrases turned to you. "Svetsik go." You with the man got into a taxi and drove to the hotel quickly. Man led you to your room.'
+end
+if DPtipe = 2:
+'The man came to standing next to a club and Takser spoken.a with him a couple of phrases turned to you. "Svetsik go." You with the man got into a taxi and drove to the hotel quickly. Man led you to your room.'
+end
+
+if DPtipe = 1:
+	act 'Walk into the room':
+	cls
+	minut += 5
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\otel.jpg"></center>'
+	'The room was quite decent. The man went to the fridge and began to spread on the table. Misted bottle of whiskey servilat banking caviar, fruit plate. Laying everything on the table, the man tripped you a chair on which you sat. He sat in the chair next to you and poured whiskey glasses. "Well, let´s drink to Svetsik acquaintance. I´m so glad to have met such a beautiful and wonderful girl like you."'
+		act 'Have a drink':
+		cls
+		horny += 20
+		alko += 2
+		minut += 5
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\kiss.jpg"></center>'
+		'You drank with the man and he got up from his chair walked up to you. His lips began to kiss your hands and began to pull off your clothes.'
+		dynamic $din_otel_man_beforesex
+		end
+	end
+end
+if DPtipe = 2:
+	act 'Walk into the room':
+	cls
+	minut += 5
+	gs 'stat'
+	'<center><img src="images\qwest\alter\Ev\kiss.jpg"></center>'
+	'You entered the room and closed the door barely a man as he stared at you with a kiss, and his hands began to fumble through your body trying to steal your clothes.'
+
+		dynamic $din_otel_man_beforesex
+	end
+end
+--- EvOtelMan ---------------------------------
+

+ 325 - 0
locations/EvgopBuh

@@ -0,0 +1,325 @@
+# EvgopBuh
+$din_gop_double_bj = {
+	act 'Open mouth':
+		cls
+		minut += 5
+		horny += 10
+		bj += 2
+		guy += 2
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\gop6.jpg"></center>'
+		'You obediently opened his mouth and the guys immediately inserted you both cocks into her mouth, stretching it to the limit. You started to suck two hard and hot cock in turn.'
+			act 'Further':
+				cls
+				minut += 5
+				horny += 10
+				cumlip += 2
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\gop7.jpg"></center>'
+				'Suddenly one of the guys started to cum in your mouth, followed immediately began to finish second. One of the guys grabbed you a head without letting you remove the face. Nakonchal you guys and got a mouthful of its members out of your mouth. Leaving you sitting on a stump with a mouth full of sperm.'
+				dynamic $din_gop_end
+			end
+		end
+}
+
+
+$din_gop_end = {
+	act 'Further':
+		cls
+		minut += 5
+		cumfrot += 1
+		manna -= 30
+		if GorSlut < 3: GorSlut = 3
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\gop8.jpg"></center>'
+		'You sit on a stump occurred stunned and out of your mouth dripping thin trailing jet sperm. You sluggish notice that the sperm gets into your clothing. Men poured vodka into cups and drank again. One chuckled looking at you "Very best cocksucker you found. Not bad she patted his lips elde me." Second laughed, "Look vaflersha sits struhnyu relishes." The third said thoughtfully, "We have to give the lads announced, so as not to zashkvarilis vaflersha."'
+		act 'Leave': gt 'gdk'
+	end
+}
+
+
+$din_gop_end2 = {
+	act 'Further':
+		cls
+		minut += 5
+		cumfrot += 1
+		manna -= 30
+		if GorSlut < 4: GorSlut = 4
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\gop8.jpg"></center>'
+		'Your feet are tired and podgibayutsya, you do not stand up and sit down on the ground, out of your mouth dripping thin trailing jet sperm. You sluggish notice that the sperm gets into your clothing. Men poured vodka into cups and drank again. One chuckled looking at you "Klasnaya pacifier you found. Not bad she patted his lips elde me." Second laughed, "Look, bitch still a can not come." The third said thoughtfully, "We have to give the lads announced, so as not to zashkvarilis slut."'
+		act 'Leave': gt 'gdk'
+	end
+}
+
+
+minut += 5
+gs 'stat'
+'<center><img src="images\etogame\dk_night.jpg"></center>'
+if GorSlut < 3:
+	'You went out with a guy from the club he led the club for you. There has flopped his two pals. On the ground, there was a bottle of vodka and plastic cups. The guy said "I <<$bname>> is <<$bname2>> and <<$bname3>>." You introduced "I <<$name>>." <<$bname2>> took a bottle and a plastic cup. He drunk, uncertain movements poured vodka into a glass, then handed the cup to you.'
+
+	act 'Drink.':
+		cls
+		minut += 5
+		alko += 2
+		gs 'stat'
+		'<center><img src="images\etogame\dk_night.jpg"></center>'
+		'You drank vodka and you breath away this booze. <<$bname3>> pulled out his candy "On <<$name>>, a snack." You get stuck in the mouth candy trying to kill the disgusting taste of vodka.'
+
+		if alko < 4:
+			act 'Go back to the club':
+				cls
+				willpower += RAND(0,1)
+				intel += RAND(0,1)
+				gt 'gdkin'
+			end
+		end
+
+		act 'Stay with the guys':
+			cls
+			minut += 5
+			horny += 10
+			gs 'stat'
+			'<center><img src="images\etogame\dk_night.jpg"></center>'
+			'You stayed with the guys. <<$bname>> come up to you and put his arm around your waist. "<<$name>>, you chuvikhi very best." His hands began to stroke your ass and squeeze her.'
+
+			if dom >= 10:
+				act 'Indignant "You ohuel what?"':
+					cls
+					minut += 5
+					sub += 1
+					gs 'stat'
+					'You rebelled ryavknuv on GREYHOUND kid "ohuel You what?" <<$bname>> even jerked his hands away from you. You left him on the pitch, "So keep your hands to yourself!"'
+
+					act 'Go back to the club':
+						cls
+						willpower += RAND(1,3)
+						intel += RAND(1,3)
+						gt 'gdkin'
+					end
+				end
+			end
+
+			act 'Whisper, "Do not"':
+				cls
+				minut += 5
+				horny += 10
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\gop.jpg"></center>'
+				'<<$bname>> put you on a stump next to the meadow where the boys drink. He unbuttoned his pants and pulled out his standing member. <<$bname>> said to you in a floor vote "Come on baby, do not be shy, look what a delicious caramel, you can lick."'
+
+				if horny < 75:
+					act 'Go back to the club':
+						cls
+						willpower += RAND(1,3)
+						intel += RAND(1,3)
+						gt 'gdkin'
+					end
+				end
+
+				if dom >= 5:
+					act 'Indignant "You ohuel what?"':
+					cls
+					minut += 5
+					sub += 1
+					gs 'stat'
+					'You rebelled ryavknuv on GREYHOUND kid "ohuel You what?" <<$bname>> did not expect such a reaction from you and embarrassed. You got up from the stump and said, "Shove your stub back in panties patsanchik!"'
+
+						act 'Go back to the club':
+							cls
+							willpower += RAND(1,3)
+							intel += RAND(1,3)
+							gt 'gdkin'
+						end
+					end
+				end
+
+				act 'Sitting on a tree stump':
+					cls
+					minut += 5
+					horny += 10
+					bj += 1
+					guy += 1
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\gop2.jpg"></center>'
+					'You covered apatite and you were sitting on a stump looking at cock. <<$bname>> taking a member of the hand you held them to her lips. You have opened my mouth, that would be indignant and immediately his cock slapped his crimson head of your wet tongue. Another second and his cock was in your mouth.'
+
+					act 'Suck':
+						cls
+						minut += 5
+						horny += 10
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\gop3.jpg"></center>'
+						'Without even realizing you started sucking hard cock obhvatyvyaya him with <<$liptalk2>>. You closed your eyes trying not to think about what you are doing. Hard and hot cock slid between your lips, filling your mouth to the throat.'
+						act 'Further':
+							cls
+							minut += 5
+							cumlip += 1
+							water -= 10
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\gop4.jpg"></center>'
+							'Suddenly you in the mouth of a member of the hot jet of sperm flew. Your mouth was filled with pungent, warm finish. <<$bname>> member took you out of his mouth and wiped it on your <<$liptalk2>>. Then he removed the cock in his pants. "Guys, can use vaflersha, I already othuesosil."'
+
+							if dom > 0:
+								act 'Indignant':
+									cls
+									minut += 5
+									dom = 0
+									sub += 1
+									GorSlut = 2
+									gs 'stat'
+									'You angrily spat sperm feet kid. "You ohuel what?" The kid started ruffle "Shut vaflersha." But you got up from the stump and obmaterili boys.'
+
+									act 'Go back to the club':
+										cls
+										willpower += RAND(0,1)
+										intel += RAND(0,1)
+										gt 'gdkin'
+									end
+								end
+							end
+
+							if horny <= 75:
+								act 'Spit sperm':
+									cls
+									minut += 5
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\gop5.jpg"></center>'
+									'You bent over and spat out semen at his feet. To you came <<$bname2>> and <<$bname3>>, they got out of his pants and framed their members for you to face.'
+									dynamic $din_gop_double_bj
+								end
+							end
+
+							act 'Swallow sperm':
+								cls
+								minut += 5
+								swallow += 1
+								water -= 10
+								gs 'stat'
+								'<center><img src="images\qwest\alter\Ev\gop5.jpg"></center>'
+								'You swallow sperm, feeling her lousy taste in your mouth. To you came <<$bname2>> and <<$bname3>>, they got out of his pants and framed their members for you to face.'
+								dynamic $din_gop_double_bj
+							end
+						end
+					end
+				end
+			end
+
+			act 'Be silent':
+				cls
+				minut += 5
+				horny += 10
+				gs 'stat'
+				'<center><img src="images\etogame\dk_night.jpg"></center>'
+				'<<$bname>> took to pull off your clothes, you drunkenly dangled in his hand and suddenly felt the breeze on my naked ass.'
+
+				act 'Further':
+					cls
+					minut += 5
+					horny += 10
+					sex += 1
+					$boy = $bname
+					guy += 1
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\gopd.jpg"></center>'
+					'<<$bname>> bent you and you grabbed his hands for something that would not fall.'
+					dynamic $sexstart
+					dynamic $sexstart2
+					dynamic $sexcum
+					'Male member removed his pants and said, "Guys, you can use davalkoy."'
+					act 'Further':
+						cls
+						minut += 5
+						horny += 10
+						sex += 1
+						guy += 2
+						bj += 1
+						$boy = $bname3
+						cumlip += 1
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\gopd2.jpg"></center>'
+						'<<$bname2>> come up to you and you saw him naked dick, though you tried to do something, but he grabbed you by the hair and then in your mouth was his cock. <<$bname3>> podeshel back to you and you feel his hands on your hips.'
+						dynamic $sexstart
+						dynamic $sexstart2
+						dynamic $sexcum
+						'You feel like your mouth starts to cum cock and <<$bname2>> even stronger holding your hair.'
+						dynamic $din_gop_end2
+					end
+				end
+			end
+		end
+	end
+end
+
+
+$din_gop_slut_triple_bj = {
+	act 'Squat':
+		cls
+		minut += 5
+		horny += 10
+		bj += 3
+		guy += 3
+		sub += 1
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\gopdbj.jpg"></center>'
+		'You obediently squatted and the guys got their members. You cupped his dick two fingers and began to masturbate them. The third guy immediately slapped you on <<$liptalk2>> member. You unclenched lips and absorbed dick in your mouth hot and humid.'
+
+		act 'Suck':
+			cls
+			minut += 5
+			horny += 10
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\gopdbj2.jpg"></center>'
+			'You have become members take turns to suck and caress hands those dicks who were not in your hot mouth. Finally the guys are already ready to cum.'
+
+			act 'Close your eyes':
+				cls
+				minut += 5
+				horny += 10
+				facial += 1
+				cumface += 3
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\gopdbj3.jpg"></center>'
+				'You closed your eyes and framed his face. Almost immediately you felt like hot jet of sperm fall on your face. Soon the boys run out completely covering your face with sperm.'
+				act 'Leave': gt 'gdk'
+			end
+		end
+	end
+}
+
+
+if GorSlut >= 3:
+	'You went out with a guy from the club he led the club for you. There has flopped his two pals. On the ground, there was a bottle of vodka and plastic cups. The guy said "I <<$bname>> is <<$bname2>> and <<$bname3>>. Incidentally, I know that You are the light spot <<$gnikname>>. Shortly not pull the rubber, take on the canine."'
+
+
+	dynamic $din_gop_slut_triple_bj
+
+	if dom > 0:
+		act 'Refuse':
+			cls
+			manna = 0
+			health -= 10
+			sub += 1
+			gs 'stat'
+			'You refused and the guy rassviripel. "What, are you a slut ohuel Yes I´m now eblische smash!" After these words, he shoots you in the stomach with his fist. You gasp in pain and doubled over. "What thing? Mind? Or you otpizdet and then shove a bottle in the ass?"'
+			dynamic $din_gop_slut_triple_bj
+
+			if dom >= 5:
+				act 'Send it':
+					cls
+					manna = 0
+					health -= 10
+					sub += 1
+					zub += 1
+					GorSlut = 2
+					gs 'stat'
+					'You guys spit searing his feet Vzlyad "Fuck you dick on the boy." Immediately rang in my head and realized that you are lying on the ground. Very much a toothache, you spit on the ground and saw that you´re bleeding on the ground and lay your tooth that you just knocked out. The guy jumped in beshensve to you, but he never dared to "Go here for dick, slut."'
+					act 'Leave': gt 'gdk'
+				end
+			end
+		end
+	end
+end
+--- EvgopBuh ---------------------------------
+

+ 49 - 0
locations/FSfight

@@ -0,0 +1,49 @@
+# FSfight
+minut += 1
+gs 'stat'
+'Your health <<FSHP>>.'
+'<<$FSnameV>>Health <<FSHPV>>'
+
+!конец боя
+if FSHP <= 0:
+FSloss += 1
+'You lost the fight'
+act 'Leave': gt 'FSgame'
+exit
+end
+if FSHPV <= 0:
+FSWin += 1
+'<<$FSnameV>> fell. You win the fight.'
+'You got <<FSPrizeM>> coins and <<FSPrizeExp>> experience'
+act 'Disengage': gt 'FSgame'
+exit
+end
+!инициатива
+KGOLiniV = RAND(FSreaktV/2, FSreaktV * 2)
+KGOLini = RAND(FSreakt/2, FSreakt * 2)
+if KGOLini = KGOLiniV:
+hodrand = RAND(0,1)
+if hodrand = 0: KGOLini = 1 & KGOLiniV = 0
+if hodrand = 1: KGOLini = 0 & KGOLiniV = 1
+end
+if KGOLini > KGOLiniV: KGOLiniSUM += 1
+if KGOLini < KGOLiniV: KGOLiniSUM -= 1
+if KGOLiniSUM > 3: KGOLini = 0 & KGOLiniV = 1 & KGOLiniSUM = 0
+if KGOLiniSUM<-3: KGOLini = 1 & KGOLiniV = 0 & KGOLiniSUM = 0
+!ходы
+if KGOLini > KGOLiniV:
+'Now your turn'
+	act 'Attack':
+	cls
+	''
+	dynamic $FSatk
+	act 'Further': gt $curloc
+	end
+else
+'Now opponents'
+'<<$FSnameV>> attacks you'
+	dynamic $FSatkV
+	act 'Further': gt $curloc
+end
+--- FSfight ---------------------------------
+

+ 42 - 0
locations/FSgame

@@ -0,0 +1,42 @@
+# FSgame
+minut += 1
+gs 'stat'
+gs 'FSstat'
+'<center><B>Hotel room</B></center>'
+''
+	if FSmedkit > 0:
+	'First aid kits <<FSmedkit>> pieces'
+		if FSHP < 100:
+			act 'Treated':
+			cls
+			FShour += 1
+			FSHP = 100
+			FSmedkit -= 1
+			minut += 1
+			gs 'stat'
+			'You heal health through kits.'
+			act 'Further': gt $curloc
+			end
+		end
+	end
+
+	act 'Laze':
+	cls
+	FShour += 1
+	minut += 1
+	gs 'stat'
+	'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'
+	act 'Further': gt $curloc
+	end
+
+
+	act 'Leave the room':
+	cls
+	FShour += 1
+	minut += 1
+	gs 'stat'
+	!'You left the room.'
+	gt 'FSroom'
+	end
+--- FSgame ---------------------------------
+

+ 30 - 0
locations/FSroom

@@ -0,0 +1,30 @@
+# FSroom
+minut += 1
+gs 'stat'
+gs 'FSstat'
+'<center><B>Street</B></center>'
+
+
+
+	act 'Walk into a room':
+	cls
+	FShour += 1
+	minut += 1
+	gs 'stat'
+	!'You left the room.'
+	gt 'FSgame'
+	end
+
+	act 'Wander':
+	cls
+	FShour += 1
+	minut += 1
+	gs 'stat'
+	'You wander through the deserted streets.'
+	act 'Further': gt $curloc
+	end
+
+
+										тдсмтссссссс
+--- FSroom ---------------------------------
+

+ 53 - 0
locations/FSstart

@@ -0,0 +1,53 @@
+# FSstart
+minut += 1
+nosave = 1
+gs 'stat'
+'<center><B>Albida</B></center>'
+'.'
+'<B>Your current character</B>'
+'<<$FSpers>>'
+
+if FSpers = 1: act 'Load a saved game': gt 'KGZgame'
+
+act 'Play a new game':
+cls
+FSfemin = 0
+FSfigur = 0
+FScolor = 0
+FSface = 0
+FSskin = 0
+FShvost = 0
+dicktipe = 0
+FSdick = 18
+FSvagina = 0
+FStits = 0
+FStitsLine = 0
+FSpers = 1
+FSday = 0
+FShour = 8
+FSsup = 1
+FSplace = 0
+FSgem = 0
+FSmedkit = 0
+
+FSlvl = 1
+FSexp = 0
+FSstren = 10
+FSspeed = 10
+FSagil = 10
+FSreakt = 10
+FSvital = 10
+FSHP = FSvital * 10
+
+FSbrona = 0
+FSweaponDam = 0
+
+$FSname = input("Enter nickname")
+if $FSname <= 0:$FSname = 'Player'
+'Character Name <<$FSname>>'
+act 'Play': gt 'FSgame'
+end
+
+act 'Exit': nosave = 0 & gt 'Komp','start'
+--- FSstart ---------------------------------
+

+ 135 - 0
locations/FSstat

@@ -0,0 +1,135 @@
+# FSstat
+FSneedExpNextLvl=(FSlvl * 10)*FSlvl
+FSneedExp = FSneedExpNextLvl - FSexp
+if FSneedExp <= 0 and FSlvl > FSlvlr: FSlvlr = FSlvl & FSpoint += 5 & FSlvl += 1 & FSexp = 0
+
+if FSfemin < 45:$FSfemin = 'Men'
+if FSfemin >= 45 and FSfemin >= 55:$FSfemin = 'Androgynous'
+if FSfemin > 55:$FSfemin = 'Female'
+
+if FSfigur < 45:$FSfigur = 'Male figure'
+if FSfigur >= 45 and FSfigur >= 55:$FSfigur = 'Androgynous figure'
+if FSfigur > 55:$FSfigur = 'Female figure'
+
+if FScolor < 0: FScolor = 0
+if FScolor > 5: FScolor = 5
+if FScolor = 0:$FScolor = 'Black hair' & $FSsherst = 'Black'
+if FScolor = 1:$FScolor = 'Brown hair' & $FSsherst = 'Brown'
+if FScolor = 2:$FScolor = 'Foxy hair' & $FSsherst = 'Redhead'
+if FScolor = 3:$FScolor = 'Blonde hair' & $FSsherst = '<<$name>>'
+if FScolor = 4:$FScolor = 'Pink hair' & $FSsherst = 'Pink'
+if FScolor = 5:$FScolor = 'White hair' & $FSsherst = 'White'
+
+if FSface <= 0:$FSface = '<<$FSfemin>> person. <<$FScolor>>'
+if FSface = 1:$FSface = '<<$FSfemin>> a person with cat ears and nose. <<$FScolor>>'
+if FSface = 2:$FSface = '<<$FSfemin>> a person with dog ears and nose. <<$FScolor>>'
+if FSface = 3:$FSface = '<<$FSfemin>> A person with fox ears and nose. <<$FScolor>>'
+if FSface = 4:$FSface = '<<$FSfemin>> The person with the protruding ears and nose. <<$FScolor>>'
+if FSface = 5:$FSface = '<<$FSfemin>> A person with cow´s ears and nose. <<$FScolor>>'
+if FSface >= 6:$FSface = '<<$FSfemin>> a person with ears and nose like a lizard. <<$FScolor>>'
+
+if FSskin <= 0:$FSskin = 'Normal skin'
+if FSskin = 1:$FSskin = '<<$FSsherst>> The fur on the body'
+if FSskin >= 2:$FSskin = 'Scales on body'
+
+if FShvost <= 0:$FShvost = ''
+if FShvost = 1:$FShvost = 'Cat´s tail'
+if FShvost = 2:$FShvost = 'Dog´s tail'
+if FShvost = 3:$FShvost = 'Foxtail'
+if FShvost = 4:$FShvost = 'Horse´s tail'
+if FShvost = 5:$FShvost = 'Cow´s Tail'
+if FShvost >= 6:$FShvost = 'Reptile tail'
+
+if dicktipe <= 0:$dicktipe = 'Normal male'
+if dicktipe = 1:$dicktipe = 'Conical, covered with soft spines cat'
+if dicktipe = 2:$dicktipe = 'Red, a large dog at the base node'
+if dicktipe = 3:$dicktipe = 'Covered with coarse, black leather bull'
+if dicktipe >= 4:$dicktipe = 'Powerful horse'
+
+if FSdick > 0:$FSdick = '<<$dicktipe>> long dick <<FSdick>>, see'
+if FSdick <= 0:$FSdick = ''
+
+if FSvagina > 0:$FSvagina = 'Between the legs of you is Snatch.'
+if FSvagina <= 0:$FSvagina = ''
+
+if FStits = 1:$FStitrazm = 'AA'
+if FStits = 2:$FStitrazm = 'A resolution'
+if FStits = 3:$FStitrazm = 'size B'
+if FStits = 4:$FStitrazm = 'size C'
+if FStits = 5:$FStitrazm = 'size D'
+if FStits = 6:$FStitrazm = 'size E'
+if FStits = 7:$FStitrazm = 'size F'
+if FStits > 8:$FStitrazm = 'size F +'
+
+if FStits > 0 and FStitsLine = 0:$FStits = 'Female breast <<$FStitrazm>>'
+if FStits > 0 and FStitsLine = 1:$FStits = 'Two pairs of women´s breasts <<$FStitrazm>>'
+if FStits > 0 and FStitsLine >= 2:$FStits = 'Three pairs of nipples <<$FStitrazm>>'
+
+if FSpers = 0:$FSpers = 'You have no character'
+if FSpers > 0:$FSpers = '<<$FSname>>. <<$FSface>> <<$FSfigur>> <<$FStits>> <<$FSskin>> <<$FShvost>> <<$FSdick>> <<$FSvagina>>'
+'Level <<FSlvl>>, exp <<FSexp>>, need for next level <<FSneedExp>> exp'
+'Life <<FSHP>>'
+'Strength <<FSstren>>'
+'Speed <<FSspeed>>'
+'Agility <<FSagil>>'
+'Initiative <<FSreakt>>'
+'Endurance <<FSvital>>'
+
+
+if FShour >= 24:
+FShour -= 24
+FSday += 1
+	if FSsup = 0:
+	FSHP -= 10
+	else
+	FSsup -= 1
+	end
+end
+
+if FSHP > 100: FSHP = 100
+
+'<a href="exec:GT ''FSstart''">Get out of the game</a>'
+'Day <<FSday>>, h <<FShour>>'
+'<<FSgem>> of coins. Food enough for <<FSsup>> days'
+''
+
+$FSatk = {
+KGOLzas = RAND(FSagilV/4, FSagilV)
+KGOLataka = RAND(FSspeed/2, FSspeed * 2)
+if KGOLataka >= KGOLzas:
+	if KGOLataka >= KGOLzas * 2:
+	KGHPnpow = RAND(FSstren/2, FSstren)+ RAND(FSweaponDam/2, FSweaponDam)
+	FSHPV -= KGHPnpow
+	'<font color = green>CRETE <<KGHPnpow>></font>'
+	else
+	KGHPnpow = RAND(FSstren/4, FSstren/2)+ RAND(FSweaponDam/4, FSweaponDam/2)
+	KGHPntpow = KGHPnpow - FSbronaV
+	if KGHPntpow <= 0: KGHPntpow = 1
+	FSHPV -= KGHPnpow
+	'<font color = blue>Contact with <<KGHPnpow>></font>'
+	end
+else
+'<font color = red><<$FSnameV>> dodged your attack</font>'
+end
+}
+$FSatkV = {
+KGOLzas = RAND(FSagil/4, FSagil)
+KGOLataka = RAND(FSspeedV/2, FSspeedV * 2)
+if KGOLataka >= KGOLzas:
+	if KGOLataka >= KGOLzas * 2:
+	KGHPnpow = RAND(FSstrenV/2, FSstrenV)+ RAND(FSweaponDamV/2, FSweaponDamV)
+	FSHP -= KGHPnpow
+	'<font color = red>CRETE <<KGHPnpow>></font>'
+	else
+	KGHPnpow = RAND(FSstrenV/4, FSstrenV/2)+ RAND(FSweaponDamV/4, FSweaponDamV/2)
+	KGHPntpow = KGHPnpow - FSbrona
+	if KGHPntpow <= 0: KGHPntpow = 1
+	FSHP -= KGHPnpow
+	'<font color = brown>Contact with <<KGHPnpow>></font>'
+	end
+else
+'<font color = green>You dodged the attack</font>'
+end
+}
+--- FSstat ---------------------------------
+

File diff suppressed because it is too large
+ 29 - 0
locations/FedorEv


+ 158 - 0
locations/Gnpc

@@ -0,0 +1,158 @@
+# Gnpc
+!парни
+GvstreBoyAfter[numnpc] = 0
+GvstreBoy = 0
+boyvstre[numnpc] += 1
+gs 'stat'
+'<center><B><font color = maroon><<$nameBoyfrend[numnpc]>></font></B></center>'
+!'<center><img src="images\qwest\alter\npc<<numnpc>>. Jpg "></center>'
+'<<$nameBoyfrend[numnpc]>> your guy.'
+if otnBoyFrend[numnpc]<20: 'You have a bad attitude.'
+if otnBoyFrend[numnpc] >= 20 and otnBoyFrend[numnpc]<40: 'You tensions.'
+if otnBoyFrend[numnpc] >= 40 and otnBoyFrend[numnpc]<60: 'You have a normal relationship.'
+if otnBoyFrend[numnpc] >= 60 and otnBoyFrend[numnpc]<80: 'You have a good relationship.'
+if otnBoyFrend[numnpc] >= 80: 'You have a great relationship.'
+''
+''
+
+if GboyBalabol[numnpc] = 1:
+	act 'Blame the guy that he yap':
+	cls
+	gs 'stat'
+	'You accused guy that he blabbed about your relationship now and all surrounding believe that you <<$gnikname>>'
+	reaktrand = RAND(0,2)
+		if reaktrand = 0:
+		'<<$nameBoyfrend[numnpc]>> it began to apologize, he accidentally drunk one friend said, and he blabbed all bitch. <<$nameBoyfrend[numnpc]>> vowed that more of this does not happen again.'
+		end
+		if reaktrand = 1:
+		'<<$nameBoyfrend[numnpc]>> began to soothe you, say nothing terrible happened, chat and forget.'
+		end
+		if reaktrand = 2:
+		'<<$nameBoyfrend[numnpc]>> said with a grin. Yes Relax, you is the real <<$gnikname>>, that this fact?'
+		end
+
+		act 'quit Man':
+		cls
+		dom += 10
+		GboyBalabol[numnpc] = 2
+		otnBoyFrend[numnpc] = 0
+		gs 'stat'
+		'You covered a rage and you sent the guy on the dick. And then left.'
+		act 'Leave': gt $loc, $metka
+		end
+
+		act 'just a guy':
+		cls
+		sub += 10
+		GboyBalabol[numnpc] = 2
+		gs 'stat'
+		'You thought a little and decided to forgive the guy.'
+		act 'Leave': gt $loc, $metka
+		end
+
+	end
+end
+
+act 'Walking through the square':
+cls
+if hapri = 0: otnBoyFrend[numnpc] -= 1
+if hapri = 1: otnBoyFrend[numnpc] += 1
+if mop = 2: otnBoyFrend[numnpc] += 1
+if mop = 3: otnBoyFrend[numnpc] += 2
+if mop = 4: otnBoyFrend[numnpc] += 3
+if ski > 0 or glamur > 0: otnBoyFrend[numnpc] += 2
+minut += 15
+gs 'stat'
+'You walk through the square with a guy and fun to hang out.'
+	if kotovLoveQW > 0:
+	otnBoyFrend[numnpc] = 0
+	'Suddenly you see is what you go to a meeting Witek Kotov he comes to the guy and silently slap in his face. <<$nameBoyfrend[numnpc]>> falls to the ground. Witek naklonyaetsya over him "Hey you fucker, it´s my girls, see you again with her, living in the woods to bury you understand?" The guy nods his head and says that he understood.'
+	act 'Leave': gt $loc, $metka
+	exit
+	end
+gboyrand = RAND(0,1)
+	if gboyrand = 0:
+	'<<$nameBoyfrend[numnpc]>> offered to go to the movies.'
+	act 'Apologize and leave': otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
+		act 'Going to the cinema':
+		cls
+		minut += 15
+		gs 'stat'
+		'You went with a guy in a movie theater located in the park. <<$nameBoyfrend[numnpc]>> bought movie tickets. You came together in a small movie theater and found their seats.'
+			act 'Watch a movie':
+			cls
+			manna += 100
+			minut += 120
+			otnBoyFrend[numnpc] += 5
+			gs 'stat'
+			'You got a guy on the chair placed in the back row. Soon the lights dimmed and the movie started on the screen.'
+				if otnBoyFrend[numnpc]<80:
+				'You watched the movie a couple of hours sitting in a chair next to the guy.'
+				act 'Go to the exit': gt 'Gnpc2'
+				end
+				if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
+				'You have been watching a movie and suddenly felt a hand on my knee Man.'
+					act 'Remove his hands':
+					cls
+					dom += 1
+					otnBoyFrend[numnpc] -= 20
+					gs 'stat'
+					'You have removed palm guy with his knees and continued to watch the movie. Movie finally ended. In the hall lights went on and the screen went titles.'
+					act 'Go to the exit': gt 'Gnpc2'
+					end
+
+					act 'Ignore':
+					cls
+					otnBoyFrend[numnpc] += 5
+					gs 'stat'
+					'You pretended that nothing happens and the guy started more actively stroking your leg. Movie finally ended. In the hall lights went on and the screen went titles.'
+					act 'Go to the exit': gt 'Gnpc2'
+					end
+				end
+				if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc]>0:
+				'You have been watching the movies, and <<$nameBoyfrend[numnpc]>> put his hand on your foot and began to stroke your knee. Movie finally ended. In the hall lights went on and the screen went titles.'
+				act 'Go to the exit': gt 'Gnpc2'
+				end
+			end
+		end
+	end
+	if gboyrand = 1:
+	'<<$nameBoyfrend[numnpc]>> suggested to drink beer in the park.'
+	act 'Apologize and leave': otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
+		act 'Go for a beer':
+		cls
+		manna += 100
+		minut += 15
+		gs 'stat'
+		'You went with a guy to the nearest kiosk. <<$nameBoyfrend[numnpc]>> bought a beer and a snack. Then you went on the bench in the far corner of the square.'
+			act 'Drink':
+			cls
+			manna += 100
+			minut += 30
+			alko += 2
+			fat += 2
+			salo += 1
+			energy += 10
+			otnBoyFrend[numnpc] += 5
+			gs 'stat'
+			'<<$nameBoyfrend[numnpc]>> beer poured into glasses and you have been drinking beer. <<$nameBoyfrend[numnpc]>> tell different funny stories.'
+				if otnBoyFrend[numnpc]<80:
+				'You drank beer with a guy, and plenty of fun.'
+				act 'Further': gt 'Gnpc2'
+				end
+				if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
+				'You drank beer with a guy, and plenty of fun.'
+				act 'Further': gt 'Gnpc2'
+				end
+				if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc]>0:
+				'You drank beer with a guy, and plenty of fun.'
+				act 'Дальше': gt 'Gnpc2'
+				end
+			end
+		end
+	end
+end
+
+act 'Apologize and leave': otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
+--- Gnpc ---------------------------------
+

+ 1170 - 0
locations/Gnpc2

@@ -0,0 +1,1170 @@
+# Gnpc2
+$din_gboy_end_to_disco = {
+	!:markgoondisco
+	discofirsttime += 1
+	gs 'stat'
+	gdeystboyrand = RAND(0,1)
+	if gnpcSex[numnpc] = 0:
+		if gdeystboyrand = 0:
+			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
+			dynamic $din_gboy_go_to_boyhome
+		act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+		end
+
+		if gdeystboyrand = 1:
+			'<<$nameBoyfrend[numnpc]>> offered to accompany you home.'
+			act 'go home': gt 'gorodok'
+		end
+	end
+
+	if gnpcSex[numnpc]>0:
+		'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
+		dynamic $din_gboy_go_to_boyhome
+		act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+	end
+}
+
+
+$din_gboy_go_to_disco = {
+	act 'Go to the disco':
+		cls
+		minut += 120
+		dance += 1
+		manna += 10
+		gs 'stat'
+		'<<$nameBoyfrend[numnpc]>> paid an entrance fee and you came along to the disco. Together with her boyfriend you went to the dance floor and started dancing together.'
+		diskoIvRand = rand(0,100)
+		if discofirsttime = 0: diskoIvRand = 0
+
+		if diskoIvRand >= 90:
+			diskoIvTipeRand = rand(0,1)
+
+			if diskoIvTipeRand = 0:
+				'You dance with her boyfriend, to you suited drunk kid in sweatpants and sweatshirts.'
+
+				if GorSlut < 3:
+					'Gopnik pushes your guy to the side and grabs you by the waist. "Let´s dance, chikulya."'
+
+					act 'Leave':
+						cls
+						dom += 1
+						gs 'stat'
+						'You escape from the clutches of steel Gopnik. <<$nameBoyfrend[numnpc]>> drunk kid pushed and immediately went to the dance floor buddies Gopnik. Bazaar started. Gopnik began to show your boyfriend that he bykuet.'
+						tiprand = rand(0,100)
+
+						if tiprand <= 70:
+							'<<$nameBoyfrend[numnpc]>> managed to get out of the winner of the fight verbally, accusing Gopnik that he began to molest his girlfriend. But the evening was spoiled and finally <<$nameBoyfrend[numnpc]>> offered to leave the disco.'
+							act 'Go home': gt 'gorodok'
+						end
+
+						if tiprand > 70 and tiprand < 90:
+							otnBoyFrend[numnpc] -= 20
+							'Gopnik quickly downloaded your guy and lit it on the headstock. <<$nameBoyfrend[numnpc]>> Gopnik gave all the money and apologized for a long time before them. whereupon <<$nameBoyfrend[numnpc]>> suggested that you spend.'
+							act 'Go home': gt 'gorodok'
+						end
+
+						if tiprand >= 90:
+							'Discussions quickly escalated into a fight and three Gopnik began to beat your guy in the middle of the disco.'
+
+							act 'Watch the fight by':
+								cls
+								otnBoyFrend[numnpc] -= 20
+								gs 'stat'
+								'<<$nameBoyfrend[numnpc]>> could oppose the three Gopnik nothing and soon fell under a barrage of punches. Gopari dragged him into the street where the seized money, took off his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+								act 'Go home': gt 'gorodok'
+							end
+
+							act 'separate fighting':
+								cls
+								gs 'stat'
+
+								if stren < 90:
+									'You tried to push Gopnik, but someone pushed you and you will fly away from fighting a few meters from all force crashed to the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+									act 'Go home': gt 'gorodok'
+								end
+
+								if stren >= 90:
+									'You Gopnik pushed with all his strength, and he flew away from you. But the second Gopnik turned to you and you saw how he punches you in the face.'
+
+									if agil < 90:
+										zub += 1
+										gs 'stat'
+										'In my head rang and you realize that you are lying on the floor. Severe pain in the teeth and mouth full of salty liquid. You spit on the floor and saw that you knocked out a tooth. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+										act 'Go home': gt 'gorodok'
+									end
+
+									if agil >= 90:
+										'You abruptly removed his head to the side and cut the air Gopnik fist near your head.'
+
+										act 'Hit in the face with his fist Gopnik':
+											cls
+
+											if speed >= 50:
+												zub += 1
+												gs 'stat'
+												'You hit Gopnik and hit him right on the nose. The guy yelled, "Oh, you bitch!" and lashed out at you. In my head rang and you realize that you are lying on the floor. Severe pain in the teeth and mouth full of salty liquid. You spit on the floor and saw that you knocked out a tooth. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+												act 'Go home': gt 'gorodok'
+											end
+
+											if speed < 50:
+												'You tried to hit hooligan punched in the face, but your blow was too slow. Gopnik pushed you and you flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+												act 'Go home': gt 'gorodok'
+											end
+										end
+
+										act 'Hooligan kick Jodan':
+											cls
+
+											if speed >= 90:
+												'You charge a good kick in the face hooligan. Head Gopnik strongly swayed and he grabbed his face. "Shit! Fucking bitch, You broke my nose, I now you´ll break the whole fucking mouth, bitch!" Your guy at this point punched hooligan with a broken nose and he will fly away for a couple of meters down to the dance floor. Two other goparey hung on your guy trying to unscrew his hands.'
+
+												act 'Grab one of Gopnik´s face':
+													cls
+													gs 'stat'
+													GopWin[numnpc] += 1
+													'You nails clutching hooligan in the face and began to scratch his skin and ripping it. Gopnik does not break down and cry with unhooked from your guy. Your guy meanwhile rid of one of Gopnik manages to punch a second, then again and again. Gopnik fell on the floor like a sack. Gopnik with scarred muzzle pounced on your guy, but without success, blood flooded his eyes and your guy punched him in the face of what Gopnik flopped down on his ass. In the meantime, began to rise to his feet one of Gopnik. "Okay, motherfucker, piss with your bitch We´ll still find it!"'
+													act 'Go home': gt 'gorodok'
+												end
+											end
+
+											if speed < 90:
+												'You tried to kick hooligan Jodan but he managed to push you before you even have time to do something. You flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+												act 'Go home': gt 'gorodok'
+											end
+										end
+
+										act 'Hooligan kick in the balls':
+											cls
+
+											if speed >= 70:
+												bollrand = rand(0,1)
+
+												if bollrand = 0:
+													'You got the balls Gonick and he flopped down on his knees howling pinching sore hands. Two other Gopnik hung on your guy trying to unscrew his hands.'
+
+													act 'Grab one of Gopnik´s face':
+														cls
+														gs 'stat'
+														GopWin[numnpc] += 1
+														'You nails clutching hooligan in the face and began to scratch his skin and ripping it. Gopnik does not break down and cry with unhooked from your guy. Your guy meanwhile rid of one of Gopnik manages to punch a second, then again and again. Gopnik fell on the floor like a sack. Gopnik with scarred muzzle pounced on your guy, but without success, blood flooded his eyes and your guy punched him in the face of what Gopnik flopped down on his ass. In the meantime, began to rise to his feet one of Gopnik. "Okay, motherfucker, piss with your bitch We´ll still find it!"'
+														act 'Go home': gt 'gorodok'
+													end
+												end
+
+												if bollrand = 1:
+													'You tried to kick hooligan between his legs but he ducked and shoved you. You flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+													act 'Go home': gt 'gorodok'
+												end
+											end
+
+											if speed < 70:
+												'You tried to kick hooligan between his legs but he ducked and shoved you. You flew away from him for a few meters and with a sweep crashed on the floor. Gopari meanwhile pulled your guy beaten on the street where the money away, removed his shoes, and threw him into the bushes. You helped her boyfriend to his feet and carried him home. His face was covered in blood and bruises began to swim.'
+												act 'Go home': gt 'gorodok'
+											end
+										end
+									end
+								end
+							end
+						end
+					end
+
+					act 'Dance':
+						cls
+						sub += 1
+						otnBoyFrend[numnpc] = 0
+						DPtipe = 2
+						gs 'BnameGen'
+						gs 'stat'
+						'You danced with Gopnik. <<$nameBoyfrend[numnpc]>> approached him and grabbed his shoulder. "Hey you! That´s my girl!" For your guy approached couple Gopnik and steel grind with him, but failing to come to you and to the hooligan dancing with you. soon <<$nameBoyfrend[numnpc]>> spat and sending you to the dick left the disco. Gopnik suggested you plunk him.'
+						act 'Go thump': gt 'EvgopBuh'
+					end
+				end
+
+				if GorSlut >= 3:
+					otnBoyFrend[numnpc] = 0
+					'Gopnik looks at you and then starts laughing "hear potsik. What´re you dance with her? Same <<$name>> <<$gnikname>>. Take her into the bushes, but Nava her mouth. You know how it is sweet smacked when sucks dick. "Red with the words you Gopnik and embarrassed. <<$nameBoyfrend[numnpc]>> Gopnik began to run into, "What did you say? Come again!" By hooligan immediately approached his friends. "Hears the boy. Bykuy not. Svetku For all the boys in the neighborhood knows that she <<$gnikname>>." <<$nameBoyfrend[numnpc]>> looks at you with surprise. "What is truth?" Boys laugh "Well, you and the brake." <<$nameBoyfrend[numnpc]>> beats you hand over his face, "Fuck you on the dick, slut!" whereupon <<$nameBoyfrend[numnpc]>> leaves the dance floor.'
+					act 'rubbing cheek': gt 'gdkin'
+				end
+			end
+
+			if diskoIvTipeRand = 1:
+				'<<$nameBoyfrend[numnpc]>> said he wanted a beer and invited you to go with him to drink beer.'
+
+				act 'And refuse to dance one':
+					cls
+					dance += 1
+					minut += 3
+					gs 'stat'
+					'Your guy came from a disco that would buy a beer and drink it in the meantime you continue to dance.'
+
+					if GorSlut >= 3:
+						'It suits you guy "Heh. I´ve been observing how <<$gnikname>> <<$name>> fun with a guy. He still does not know who you are? Can I tell him?"'
+
+						act 'Send it':
+							cls
+							dom += 1
+							otnBoyFrend[numnpc] = 0
+							gs 'stat'
+							'You will send the guy to go to hell and he´s not a good smile stepped aside. At this point, you came <<$nameBoyfrend[numnpc]>> and asked, "What this guy should have been?" You lied to him on the move "To dance like, I turned him down." Then a guy came up to you and your guy to talk withdrawn. After a while, you came <<$nameBoyfrend[numnpc]>> and said "I´ll throw. turns you real damn, I´m out of a garbage found that would waste their time on such a whore!"'
+							act 'move away': gt 'gdkin'
+						end
+
+						act 'Ask him not to tell':
+							cls
+							sub += 1
+							gs 'stat'
+							'You have been asking for a Man not to tell anything to his young man. He chuckled. "Well, if otsosesh, then so be it, do not tell."'
+
+							act 'Send it':
+								cls
+								dom += 1
+								otnBoyFrend[numnpc] = 0
+								gs 'stat'
+								'You will send the guy to go to hell and he´s not a good smile stepped aside. At this point, you came <<$nameBoyfrend[numnpc]>> and asked, "What this guy should have been?" You lied to him on the move "To dance like, I turned him down." Then a guy came up to you and your guy to talk withdrawn. After a while, you came <<$nameBoyfrend[numnpc]>> and said "I´ll throw. turns you real damn, I´m out of a garbage found that would waste their time on such a whore!"'
+								act 'move away': gt 'gdkin'
+							end
+
+							act 'Agree':
+								cls
+								sub += 1
+								gs 'stat'
+								'You agreed and the guy said you go to the toilet. You immediately depressed. Toilet in the club was something of a thoroughfare, someone out there smoking, someone defecate in booths half door was not. The guy took you to the men´s room. When you opened the door there, they saw that some drunk guys standing at the threshold of smoke. In one of the booths heard as someone pukes. Boys bewildered looked at you, "Baby, you do not mistake? This male toilet." The guy who brought you smiled "She´s with me." He turned his head to you, "Well that cocksucker. Bury in his mouth." You looked at the guys and asked, "What right here or what?" Boys laughed "C´mon. Smuschaeshsya What are you?"'
+
+								act 'Send it':
+									cls
+									dom += 1
+									otnBoyFrend[numnpc] = 0
+									gs 'stat'
+									'You will send the guy to go to hell and he´s not a good smile stepped aside. At this point, you came <<$nameBoyfrend[numnpc]>> and asked, "What this guy should have been?" You lied to him on the move "To dance like, I turned him down." Then a guy came up to you and your guy to talk withdrawn. After a while, you came <<$nameBoyfrend[numnpc]>> and said "I´ll throw. turns you real damn, I´m out of a garbage found that would waste their time on such a whore!"'
+									act 'Move away': gt 'gdkin'
+								end
+
+								act 'Suck':
+									cls
+									sub += 5
+									guy += 1
+									bj += 1
+									cumlip += 1
+									swallow += 1
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\public.jpg"></center>'
+									'You squatted man unbuttoned his pants and pulled out his standing member. Other boys were smoked and watched the scene. You opened your mouth and licked maroon penis, then cupped her own <<$liptalk>> and took the cock in her mouth. Boys started laughing komentirovat what they see, "Look how vaflersha smacked." Another echoed, "Where did you just find a cocksucker" Once someone know you "So it´s <<$name>> <<$surname>>. Damn it down and out." You blushed and burned with shame sucking dick in front of other guys. Finally the guy started to cum in your mouth and you try as quickly as possible to swallow sperm. Cock finally went limp and he tucked in his pants. You got up from the floor and began to wipe his mouth, feeling out of your mouth smells like sperm. One of the guys chuckled, "Hey star blowjob, suck, and I have."'
+
+									act 'Slip out of the closet':
+										cls
+										gs 'stat'
+										'You are trying not to pay attention to the guys slipped back out of the closet on the floor. <<$nameBoyfrend[numnpc]>> have been looking for you, he came up to you and asked, "Where are you gone? everywhere you here I am looking for." You sovreali first thing that came to mind, "went to the toilet." <<$nameBoyfrend[numnpc]>> asked "A mouth that wipe?"'
+
+										act 'suggest leave':
+											cls
+											gs 'stat'
+											'You offered her boyfriend to leave the disco. <<$nameBoyfrend[numnpc]>> shrugged and you go to the exit.'
+
+											act 'Leave':
+												cls
+												dynamic $din_gboy_end_to_disco
+											end
+										end
+
+										act 'Dance':
+											cls
+											otnBoyFrend[numnpc] = 0
+											gs 'stat'
+											'You continued to dance with her boyfriend and suddenly saw how out of toilet boys who
+                                            witnessed how you give a blowjob. They also see you and guffawed, noisily discussing something. <<$NameBoyfrend[numnpc]>> puzzled look at them, "What are they?" The boys shouted to him, "until you wandered somewhere, your teen in the men´s toilet sucks dicks!" <<$NameBoyfrend[numnpc]>> came up to them, "You bazaar?" Boys started to tell him how you just suck dick in front of them. <<$NameBoyfrend[numnpc]>> came up to you and slapped you podschechinu "Get the fuck out whore! And so I did not see you anymore!"'
+											act 'Move away': gt 'gdkin'
+										end
+									end
+								end
+							end
+						end
+					end
+
+					if GorSlut < 3:
+						'While your guy went for a beer came to you what that guy is not familiar with you and began to dance.'
+
+						act 'Dance':
+							cls
+							otnBoyFrend[numnpc] -= 20
+							gs 'stat'
+							'You danced with unfamiliar guy and at this moment entered the hall <<$nameBoyfrend[numnpc]>> he came up to you and pulled you by the hand dragged from another guy. "You do something ohrenela? To retreat is impossible, and you´ve found someone!" He was offended at you and walked away from the disco.'
+							act 'Move away': gt 'gdkin'
+						end
+
+						act 'Refuse to dance with a stranger':
+							cls
+							otnBoyFrend[numnpc] += 5
+							gs 'stat'
+							'You refused to dance with a stranger and noticed that <<$nameBoyfrend[numnpc]>> come back to the club. You have a little dance with her boyfriend and he offered to go.'
+
+							act 'Leave':
+								cls
+								dynamic $din_gboy_end_to_disco
+							end
+						end
+					end
+				end
+
+				act 'Go Man and drink beer':
+					cls
+					alko += 2
+					minut += 3
+					horny += 5
+					gs 'stat'
+					'You came out of discos and find a secluded place where he started drinking beer with her boyfriend.'
+
+					act 'Leave':
+						cls
+						dynamic $din_gboy_end_to_disco
+					end
+
+					act 'Kiss':
+						cls
+						minut += 5
+						kissBoyFrend[numnpc] += 1
+						horny += 10
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\kiss.jpg"></center>'
+						'<<$nameBoyfrend[numnpc]>> you tenderly embraced and began to kiss your lips.'
+
+						if gnpcSex[numnpc]>0:
+							'<<$nameBoyfrend[numnpc]>> whispered in your ear, "Svetsik can Let us than anything right here?"'
+
+							act 'jerk guy':
+								cls
+								minut += 5
+								if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+								dick = dickBoyFrend[numnpc]
+								hj += 1
+								hja += 1
+								sub += 1
+								gs 'stat'
+								'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+								'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+
+								act 'Further':
+									cls
+									dynamic $din_gboy_end_to_disco
+								end
+							end
+
+							act 'Take by mouth':
+								cls
+								minut += 5
+								horny += 10
+								bj += 1
+								bja += 1
+								dick = dickBoyFrend[numnpc]
+								if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+
+								if GorSlut < 2:
+									resultrand = RAND(0,100)
+
+									if resultrand >= 100:
+										GorSlut = 2
+										GboyBalabol[numnpc] = 1
+									end
+								end
+
+								sub += 1
+								gs 'stat'
+								'<center><img src="images\qwest\alter\Ev\cocksucker.jpg"></center>'
+								'You squatted in front of the guy and brought her face to his cock.'
+								dynamic $dinrandbj
+								'Soon <<$nameBoyfrend[numnpc]>> groaned "Svetsik, I´m going to come."'
+
+								act 'suck on':
+									cls
+									minut += 5
+									horny += 10
+									cumlip += 1
+									swallow += 1
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\cocksuckerSwallow.jpg"></center>'
+									dynamic $dinrandswallow
+
+									act 'further':
+										cls
+										dynamic $din_gboy_end_to_disco
+									end
+								end
+
+								act 'Remove the mouth':
+									cls
+									minut += 5
+									horny += 10
+									cumface += 1
+									facial += 1
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\cocksuckerFacial.jpg"></center>'
+									'You remove a member from the mouth and then hit you in the face a stream of hot sperm, then another and another and finally stopped the guy cum on your face.'
+
+									act 'Further':
+										cls
+										dynamic $din_gboy_end_to_disco
+									end
+								end
+							end
+						end
+
+						if gnpcSex[numnpc] = 0:
+							'You feel like your guy hands caress your breasts.'
+
+							act 'Stop':
+								cls
+								dynamic $din_gboy_end_to_disco
+							end
+
+							act 'Let him':
+								cls
+								horny += 10
+								minut += 3
+								gs 'stat'
+								'<center><img src="images\qwest\alter\Ev\tits.jpg"></center>'
+								'<<$nameBoyfrend[numnpc]>> pulls your breast size <<tits>> outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he´s got a hard cock.'
+
+								act 'Caress his cock through his pants':
+									cls
+									horny += 5
+									minut += 3
+									gs 'stat'
+									'<center><img src="images\qwest\alter\Ev\cock.jpg"></center>'
+									'You started stroking guy crotch, feeling the hardness of his member risen through matter.'
+
+									if horny < 80:
+										act 'Remove hands':
+											cls
+											minut += 5
+											otnBoyFrend[numnpc] -= 10
+											dom += 1
+											gs 'stat'
+											'Man you have cleaned your hands off my chest, and he lost his head, not knowing what to do.'
+
+											act 'Further':
+												cls
+												dynamic $din_gboy_end_to_disco
+											end
+										end
+									end
+
+									act 'Going to the guy´s pants':
+										cls
+										horny += 10
+										minut += 3
+										gs 'stat'
+										'<center><img src="images\qwest\alter\Ev\cock2.jpg"></center>'
+										'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'
+
+										if dom > 0:
+											act 'jerk guy':
+												cls
+												minut += 5
+												if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+												dick = dickBoyFrend[numnpc]
+												hj += 1
+												hja += 1
+												sub += 1
+												gs 'stat'
+												'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+												'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+												act 'Further':
+													cls
+													dynamic $din_gboy_end_to_disco
+												end
+											end
+										end
+
+										act 'Take by mouth':
+											cls
+											minut += 5
+											horny += 10
+											bj += 1
+											bja += 1
+											dick = dickBoyFrend[numnpc]
+											if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+
+											if GorSlut < 2:
+												resultrand = RAND(0,100)
+
+												if resultrand >= 100:
+													GorSlut = 2
+													GboyBalabol[numnpc] = 1
+												end
+											end
+
+											sub += 1
+											gs 'stat'
+											'<center><img src="images\qwest\alter\Ev\cocksucker.jpg"></center>'
+											'You squatted in front of the guy and brought her face to his cock.'
+											dynamic $dinrandbj
+											'Soon <<$nameBoyfrend[numnpc]>> groaned "Svetsik, I´m going to come."'
+
+											act 'suck on':
+												cls
+												minut += 5
+												horny += 10
+												cumlip += 1
+												swallow += 1
+												gs 'stat'
+												'<center><img src="images\qwest\alter\Ev\cocksuckerSwallow.jpg"></center>'
+												dynamic $dinrandswallow
+
+												act 'Further':
+													cls
+													dynamic $din_gboy_end_to_disco
+												end
+											end
+
+											act 'Remove the mouth':
+												cls
+												minut += 5
+												horny += 10
+												cumface += 1
+												facial += 1
+												gs 'stat'
+												'<center><img src="images\qwest\alter\Ev\cocksuckerFacial.jpg"></center>'
+												'You remove a member from the mouth and then hit you in the face a stream of hot sperm, then another and another and finally stopped the guy cum on your face.'
+
+												act 'Further':
+													cls
+													dynamic $din_gboy_end_to_disco
+												end
+											end
+										end
+									end
+								end
+
+								if horny <= 90:
+									act 'Resist':
+										cls
+										horny += 10
+										minut += 3
+										gs 'stat'
+										'<center><img src="images\qwest\alter\Ev\petting.jpg"></center>'
+										'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'
+
+										if horny < 70:
+											act 'Remove his hand':
+											cls
+											minut += 5
+											otnBoyFrend[numnpc] -= 10
+											dom += 1
+											gs 'stat'
+											'You have removed themselves from male hands and he lost his head, not knowing what to do.'
+
+											act 'Further':
+												cls
+												dynamic $din_gboy_end_to_disco
+											end
+										end
+									end
+
+									act 'Enjoy':
+										cls
+										minut += 5
+										sub += 1
+										horny += 10
+										gs 'stat'
+										'<center><img src="images\qwest\alter\Ev\petting.jpg"></center>'
+										'You cease to resist and just relaxed feeling pleasant warmth from the guy caresses your pussy. <<$nameBoyfrend[numnpc]>> began to undress you and soon you were naked.'
+
+										act 'Surrender':
+											cls
+											minut += 5
+											horny += 10
+											sexa += 1
+											if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+											$boy = $nameBoyfrend[numnpc]
+											dick = dickBoyFrend[numnpc]
+											silavag = silavagBoyFrend[numnpc]
+
+											if GorSlut = 0:
+												resultrand = RAND(0,100)
+
+												if resultrand >= 100:
+
+													GorSlut = 1
+													GboyBalabol[numnpc] = 1
+												end
+											end
+
+											gs 'stat'
+											'<center><img src="images\picV\vag.jpg"></center>'
+											'Man quickly took off his clothes and lay down on top of you.'
+											dynamic $sexstart
+											dynamic $sexstart2
+											dynamic $sexcum
+
+											act 'Further':
+												cls
+												dynamic $din_gboy_end_to_disco
+											end
+										end
+
+										if dom > 0 or anal > 0:
+											act 'substitute ass':
+												cls
+												minut += 30
+												cumanus += 1
+												anala += 1
+												$boy = $nameBoyfrend[numnpc]
+												dick = dickBoyFrend[numnpc]
+												silavag = silavagBoyFrend[numnpc]
+												if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+
+												if GorSlut = 0:
+													resultrand = RAND(0,100)
+
+													if resultrand >= 100:
+														GorSlut = 1
+														GboyBalabol[numnpc] = 1
+													end
+												end
+												gs 'stat'
+												'<center><img src="images\qwest\alter\Ev\anal.jpg"></center>'
+												dynamic $sexstart
+												dynamic $analsex
+												'Finally the guy dies and you feel like something warm fills your ass.'
+
+												act 'Further':
+													cls
+													dynamic $din_gboy_end_to_disco
+												end
+											end
+										end
+									end
+								end
+							end
+						end
+					end
+				end
+			end
+			end
+
+			if diskoIvTipeRand = 2:
+				''
+			end
+
+			if diskoIvTipeRand = 3:
+				''
+			end
+
+			exit
+		end
+
+		if kissBoyFrend[numnpc]>0:
+			''
+		end
+
+		if kissBoyFrend[numnpc] = 0:
+			''
+		end
+
+		dynamic $din_gboy_end_to_disco
+
+	end
+}
+
+$din_gboy_tits = {
+	'<<$nameBoyfrend[numnpc]>> began to get your breasts <<tits>> the size of a garment.'
+	act 'let him':
+		cls
+		horny += 10
+		minut += 3
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\tits.jpg"></center>'
+		'<<$nameBoyfrend[numnpc]>> pulls your breast size <<tits>> outside and begins to knead your breasts and kiss them. Guy takes your hand and puts it on the groin, you feel that he´s got a hard cock.'
+
+		act 'Caress his cock through his pants':
+			cls
+			horny += 5
+			minut += 3
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\cock.jpg"></center>'
+			'You started stroking guy crotch, feeling the hardness of his member risen through matter.'
+
+			if horny < 80:
+				act 'Remove hands':
+					cls
+					minut += 5
+					otnBoyFrend[numnpc] -= 10
+					dom += 1
+					gs 'stat'
+					'Man you have cleaned your hands off my chest, and he lost his head, not knowing what to do.'
+					act 'Go home': gt 'gorodok'
+				end
+			end
+
+			act 'Going to the guy´s pants':
+				cls
+				horny += 10
+				minut += 3
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\cock2.jpg"></center>'
+				'You hand the guy stuck in his pants and felt his fingers and his hard hot cock.'
+
+				if dom > 0:
+					act 'jerk guy':
+						cls
+						minut += 5
+						if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+						dick = dickBoyFrend[numnpc]
+						hj += 1
+						hja += 1
+						sub += 1
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\hj.jpg"></center>'
+						'You got him hard and hot cock out of his pants and took his hand. You started kissing a guy at the same time masturbate his penis. Finally the guy strangled groan and you´ll see how his cock off sperm.'
+						act 'Go home': gt 'gorodok'
+					end
+				end
+
+				act 'Take by mouth':
+					cls
+					minut += 5
+					horny += 10
+					bj += 1
+					bja += 1
+					dick = dickBoyFrend[numnpc]
+					if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+
+					if GorSlut < 2:
+						resultrand = RAND(0,100)
+
+						if resultrand >= 100:
+							GorSlut = 2
+							GboyBalabol[numnpc] = 1
+						end
+					end
+
+					sub += 1
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\cocksucker.jpg"></center>'
+					'You squatted in front of the guy and brought her face to his cock.'
+					dynamic $dinrandbj
+					'Soon <<$nameBoyfrend[numnpc]>> groaned "Svetsik, I´m going to come."'
+					act 'Suck on':
+						cls
+						minut += 5
+						horny += 10
+						cumlip += 1
+						swallow += 1
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\cocksuckerSwallow.jpg"></center>'
+						dynamic $dinrandswallow
+						act 'Go home': gt 'gorodok'
+					end
+
+					act 'Remove the mouth':
+						cls
+						minut += 5
+						horny += 10
+						cumface += 1
+						facial += 1
+						gs 'stat'
+						'<center><img src="images\qwest\alter\Ev\cocksuckerFacial.jpg"></center>'
+						'You remove a member from the mouth and then hit you in the face a stream of hot sperm, then another and another and finally stopped the guy cum on your face.'
+						act 'Go home': gt 'gorodok'
+					end
+
+					act 'Surrender':
+						cls
+						minut += 5
+						horny += 10
+						sexa += 1
+						if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+						$boy = $nameBoyfrend[numnpc]
+						dick = dickBoyFrend[numnpc]
+						silavag = silavagBoyFrend[numnpc]
+
+						if GorSlut = 0:
+							resultrand = RAND(0,100)
+
+							if resultrand >= 100:
+								GorSlut = 1
+								GboyBalabol[numnpc] = 1
+							end
+						end
+
+						gs 'stat'
+						'<center><img src="images\picV\vag.jpg"></center>'
+						'Man quickly took off his clothes and lay down on top of you.'
+						dynamic $sexstart
+						dynamic $sexstart2
+						dynamic $sexcum
+						act 'Go home': gt 'gorodok'
+					end
+
+					if dom > 0 or anal > 0:
+						act 'substitute ass':
+							cls
+							minut += 30
+							cumanus += 1
+							anala += 1
+							$boy = $nameBoyfrend[numnpc]
+							dick = dickBoyFrend[numnpc]
+							silavag = silavagBoyFrend[numnpc]
+							if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+
+							if GorSlut = 0:
+								resultrand = RAND(0,100)
+								if resultrand >= 100:
+									GorSlut = 1
+									GboyBalabol[numnpc] = 1
+								end
+							end
+
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\anal.jpg"></center>'
+							dynamic $sexstart
+							dynamic $analsex
+							'Finally the guy dies and you feel like something warm fills your ass.'
+							act 'Leave.': gt 'gorodok'
+						end
+					end
+				end
+			end
+		end
+
+		if horny <= 90:
+			act 'Resist':
+				cls
+				horny += 10
+				minut += 3
+				gs 'stat'
+				'<center><img src="images\qwest\alter\Ev\petting.jpg"></center>'
+				'You removed his hand from his pants and the guy stuck his hand in your pants, you felt his fingers caress your wet pussy.'
+
+				if horny < 70:
+					act 'Remove his hand':
+						cls
+						minut += 5
+						otnBoyFrend[numnpc] -= 10
+						dom += 1
+						gs 'stat'
+						'You have removed themselves from male hands and he lost his head, not knowing what to do.'
+						act 'Go home': gt 'gorodok'
+					end
+				end
+
+				act 'Enjoy':
+					cls
+					minut += 5
+					sub += 1
+					horny += 10
+					gs 'stat'
+					'<center><img src="images\qwest\alter\Ev\petting.jpg"></center>'
+					'You cease to resist and just relaxed feeling pleasant warmth from the guy caresses your pussy. <<$nameBoyfrend[numnpc]>> began to undress you and soon you were naked.'
+
+					act 'Surrender':
+						cls
+						minut += 5
+						horny += 10
+						sexa += 1
+						if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+						$boy = $nameBoyfrend[numnpc]
+						dick = dickBoyFrend[numnpc]
+						silavag = silavagBoyFrend[numnpc]
+
+						if GorSlut = 0:
+							resultrand = RAND(0,100)
+
+							if resultrand >= 100:
+								GorSlut = 1
+								GboyBalabol[numnpc] = 1
+							end
+						end
+
+						gs 'stat'
+						'<center><img src="images\picV\vag.jpg"></center>'
+						'Man quickly took off his clothes and lay down on top of you.'
+						dynamic $sexstart
+						dynamic $sexstart2
+						dynamic $sexcum
+						act 'Go home': gt 'gorodok'
+					end
+
+					if dom > 0 or anal > 0:
+						act 'substitute ass':
+							cls
+							minut += 30
+							cumanus += 1
+							anala += 1
+							$boy = $nameBoyfrend[numnpc]
+							dick = dickBoyFrend[numnpc]
+							silavag = silavagBoyFrend[numnpc]
+							if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
+
+							if GorSlut = 0:
+								resultrand = RAND(0,100)
+
+								if resultrand >= 100:
+									GorSlut = 1
+									GboyBalabol[numnpc] = 1
+								end
+							end
+
+							gs 'stat'
+							'<center><img src="images\qwest\alter\Ev\anal.jpg"></center>'
+							dynamic $sexstart
+							dynamic $analsex
+							'Finally the guy dies and you feel like something warm fills your ass.'
+							act 'Leave.': gt 'gorodok'
+						end
+					end
+				end
+			end
+		end
+	end
+
+	if horny < 90:
+		act 'Remove his hand':
+			cls
+			minut += 5
+			otnBoyFrend[numnpc] -= 10
+			dom += 1
+			gs 'stat'
+			'Man you have cleaned your hands off my chest, and he lost his head, not knowing what to do.'
+			act 'Go home': gt 'gorodok'
+		end
+	end
+}
+
+
+$din_gboy_kiss = {
+	act 'Kiss':
+		cls
+		minut += 5
+		kissBoyFrend[numnpc] += 1
+		horny += 10
+		gs 'stat'
+		'<center><img src="images\qwest\alter\Ev\kiss.jpg"></center>'
+		'You turn your head to the guy and your lips met. <<$nameBoyfrend[numnpc]>> became passionately stroking her hands over your body and kiss you.'
+		dynamic $din_gboy_tits
+	end
+}
+
+$din_gboy_knee = {
+	if horny < 75 or dom > 0:
+		act 'Remove his hand':
+			cls
+			minut += 5
+			otnBoyFrend[numnpc] -= 10
+			if dom > 0 and horny >= 75: dom -= 1
+			if horny < 75: dom += 1
+			gs 'stat'
+			'You removed the hand guy and he lost his head, not knowing what to do.'
+			act 'Go home': gt 'gorodok'
+		end
+	end
+
+	act 'Pretend that nothing happens':
+		cls
+		minut += 5
+		gs 'stat'
+		'You pretended that nothing was happening and <<$nameBoyfrend[numnpc]>> not hesitate vengeance fumbled with his hands on your feet. <<$nameBoyfrend[numnpc]>> tilted towards your face trying to kiss you.'
+		dynamic $din_gboy_kiss
+
+		if horny < 75 or dom > 5:
+			act 'Remove his hand':
+				cls
+				minut += 5
+				otnBoyFrend[numnpc] -= 10
+				if dom > 0 and horny >= 75: dom -= 5
+				if horny < 75: dom += 5
+				gs 'stat'
+				'You removed the hand guy and he lost his head, not knowing what to do.'
+				act 'Go home': gt 'gorodok'
+			end
+		end
+	end
+
+	if dom > 0 or horny >= 75:
+		act 'Man kiss':
+			cls
+			minut += 5
+			dom += 1
+			kissBoyFrend[numnpc] += 1
+			horny += 10
+			gs 'stat'
+			'<center><img src="images\qwest\alter\Ev\kiss.jpg"></center>'
+			'You turn your head to the guy and bent his face. Then you kissed and <<$nameBoyfrend[numnpc]>> became passionately stroking her hands over your body.'
+			dynamic $din_gboy_tits
+		end
+	end
+}
+
+$din_gboy_go_to_boyhome = {
+	act 'Go-to guy home':
+		cls
+		minut += 15
+		gs 'stat'
+		boyhouserand = rand(0,2)
+		'<<$nameBoyfrend[numnpc]>> led you to his home. You came to a small two-story house, in which there were several apartments and <<$nameBoyfrend[numnpc]>> guide you to your apartment. He opened the door with a key and let you.'
+
+		if boyhouserand = 0:
+			'Man at home there was no one and he suggested you go to the gym and see Vidic.'
+
+			act 'See Vidic':
+				cls
+				minut += 30
+				gs 'stat'
+				'You settled on comfortably on the sofa and <<$nameBoyfrend[numnpc]>> rummaging in the drawers put one of them in the VCR and turning it sat next to you.'
+				boyvideorand = rand(0,3)
+
+				if boyvideorand = 0:
+					'When did the movie you saw this porn. Protagonists do not have time to exchange a few sentences and the girl was already naked and kneeling in front of a guy with his cock in her mouth.'
+
+					act 'watch porn':
+						cls
+						minut += 30
+						horny += 10
+						gs 'stat'
+						'You began with a guy to watch porn and what is happening gradually began to excite you. You feel like <<$nameBoyfrend[numnpc]>> put his hand on your knee and began to stroke.'
+						dynamic $din_gboy_knee
+					end
+
+					act 'a scandal':
+						cls
+						minut += 30
+						dom += 1
+						otnBoyFrend[numnpc] -= 20
+						gs 'stat'
+						'You got up from the couch and a scandal guy claiming that you are not so and it from you only need one. <<$nameBoyfrend[numnpc]>> embarrassed and blushing began bubnet apology.'
+						act 'Go home': gt 'gorodok'
+					end
+				end
+
+				if boyvideorand > 0:
+					'Started Hollywood thriller in which the protagonist smashed everything around him while he managed to not even scratched. In the film, killed his best friend, after which the hero on his knees beside the body screaming NO! in the rain. Finally got to the main hero and villain after a hard fight killed them, ended the film as expected explosion in the background from which the hero escaped.'
+					boyprirand = rand(0,2)
+
+					if boyprirand = 0:
+					'You feel as you lay Man hand on his knee and began to stroke.'
+					dynamic $din_gboy_knee
+
+						if horny < 75 or dom > 5:
+							act 'Remove his hand':
+								cls
+								minut += 5
+								otnBoyFrend[numnpc] -= 10
+								if dom > 0 and horny >= 75: dom -= 5
+								if horny < 75: dom += 5
+								gs 'stat'
+								'You removed the hand guy and he lost his head, not knowing what to do.'
+								act 'Go home': gt 'gorodok'
+							end
+						end
+
+					else
+						act 'Go home': gt 'gorodok'
+						if dom > 0 or horny >= 75:
+							act 'Man kiss':
+
+								cls
+								minut += 5
+								dom += 1
+								gs 'stat'
+								'You turn your head to the guy and bent his face. Then you kissed and <<$nameBoyfrend[numnpc]>> became passionately stroking her hands over your body.'
+								dynamic $din_gboy_tits
+							end
+						end
+					end
+				end
+			end
+		end
+
+		if boyhouserand = 1:
+			'Man at home there was no one and he suggested that you go to his room. In his room, a guy sat next to you and started stroking your knee.'
+			dynamic $din_gboy_knee
+		end
+		if boyhouserand = 2:
+			'Man at home were parents and he quickly walks you to your room. In his room, a guy sat next to you and started stroking your knee.'
+			dynamic $din_gboy_knee
+		end
+
+		!act 'Идти домой': gt 'gorodok'
+	end
+}
+
+gs 'stat'
+'<center><B><font color = maroon><<$nameBoyfrend[numnpc]>></font></B></center>'
+!'<center><img src="images\qwest\alter\npc<<numnpc>>.jpg"></center>'
+'<<$nameBoyfrend[numnpc]>> your guy.'
+if otnBoyFrend[numnpc]<20: 'You have a bad attitude.'
+if otnBoyFrend[numnpc] >= 20 and otnBoyFrend[numnpc]<40: 'You tensions.'
+if otnBoyFrend[numnpc] >= 40 and otnBoyFrend[numnpc]<60: 'You have a normal relationship.'
+if otnBoyFrend[numnpc] >= 60 and otnBoyFrend[numnpc]<80: 'You have a good relationship.'
+if otnBoyFrend[numnpc] >= 80: 'You have a great relationship.'
+''
+''
+
+if hour < 20:
+	if otnBoyFrend[numnpc]<80:
+		'<<$nameBoyfrend[numnpc]>> offered to accompany you home.'
+		act 'Go home': gt 'gorodok'
+	end
+
+	if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
+		gdeystboyrand = RAND(0,1)
+
+		if gdeystboyrand = 0:
+			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
+			dynamic $din_gboy_go_to_boyhome
+			act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+		end
+
+		if gdeystboyrand = 1:
+			'<<$nameBoyfrend[numnpc]>> offered to accompany you home.'
+			act 'Go home': gt 'gorodok'
+		end
+	end
+
+	if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc]>0:
+		'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
+		dynamic $din_gboy_go_to_boyhome
+		act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+	end
+end
+
+if hour >= 20:
+	if otnBoyFrend[numnpc]<80:
+		'<<$nameBoyfrend[numnpc]>> offered to accompany you home.'
+		act 'Go home': gt 'gorodok'
+	end
+
+	if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
+		tipgbrand = rand(0,1)
+
+		if tipgbrand = 0:
+			'<<$nameBoyfrend[numnpc]>> offered to go to the disco.'
+			dynamic $din_gboy_go_to_disco
+			act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+		end
+
+		if tipgbrand = 1:
+			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
+			dynamic $din_gboy_go_to_boyhome
+			act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+		end
+	end
+
+	if otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc]>0:
+		gdeystboyrand = RAND(0,1)
+
+		if gdeystboyrand = 0:
+			'<<$nameBoyfrend[numnpc]>> offered to go to his home.'
+			dynamic $din_gboy_go_to_boyhome
+			act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+		end
+
+		if gdeystboyrand = 1:
+			'<<$nameBoyfrend[numnpc]>> offered to go to the disco.'
+			dynamic $din_gboy_go_to_disco
+			act 'And refuse to go home': otnBoyFrend[numnpc] -= 10 & gt 'gorodok'
+		end
+
+	end
+end
+--- Gnpc2 ---------------------------------
+

+ 95 - 0
locations/Hall

@@ -0,0 +1,95 @@
+# Hall
+*PL '<right><img src="images\casino\zdcasino.jpg"></right>'
+*PL 'You entered the foyer of the building of a giant casino.'
+*PL 'You can go:'
+ACT 'Get out of the casino':
+	gt 'casino'
+END
+USEHTML = 1
+*clear
+
+clr
+gs 'stat'
+set minut += 5
+
+picrand = RAND(0,2)
+if picrand = 0: '<right><img src="images\casino\hcasino1.jpg"></right>'
+if picrand = 1: '<right><img src="images\casino\hcasino2.jpg"></right>'
+if picrand = 2: '<right><img src="images\casino\hcasino3.jpg"></right>'
+
+'By <a href="exec:GT ''headwaiter''">the head waiter</a>'
+'In the Hall <a href="exec:GT ''igravt''">slot machines</a>'
+'In room games <a href="exec:GT ''roulette''">Roulette</a>'
+'In room games <a href="exec:GT ''cards''">Cards</a>'
+!'In <a href="exec:GT ''restaurant''">restaurant</a>'
+!'In <a href="exec:GT ''bar''">bar</a>'
+!'In <a href="exec:GT ''theater''">Theatre</a>'
+'K <a href="exec:GT ''hotel''">Hotel</a>'
+--- Hall ---------------------------------
+
+# $menu_skills
+dynamic $objskills
+--- $menu_skills ---------------------------------
+
+# $menu_descrip
+dynamic $objdescrip
+--- $menu_descrip ---------------------------------
+
+# $menu_statistika
+dynamic $objstatistika
+--- $menu_statistika ---------------------------------
+
+# $menu_mobila
+dynamic $objmobila
+--- $menu_mobila ---------------------------------
+
+# $menu_magic
+dynamic $objmagic
+--- $menu_magic ---------------------------------
+
+# $menu_face
+dynamic $objface
+--- $menu_face ---------------------------------
+
+# $menu_body
+dynamic $objbody
+--- $menu_body ---------------------------------
+
+# $menu_clothes
+dynamic $objclothes
+--- $menu_clothes ---------------------------------
+
+# $menu_tattoos
+dynamic $objtattoos
+--- $menu_tattoos ---------------------------------
+
+# $menu_pirs
+dynamic $objpirsing
+--- $menu_pirs ---------------------------------
+
+# $menu_obnovit
+gs 'stat'
+--- $menu_obnovit ---------------------------------
+
+# $menu_bloknot
+dynamic $objbloknot
+--- $menu_bloknot ---------------------------------
+
+# $menu_avariya
+dynamic $objavariya
+--- $menu_avariya ---------------------------------
+
+# $menu_addoldmenu
+dynamic $objoldmenu
+--- $menu_addoldmenu ---------------------------------
+
+# $menu_automatica
+gs 'automatics'
+dynamic $automatica
+--- $menu_automatica ---------------------------------
+
+# $menu_helper
+gs 'menu_helper'
+dynamic $helper_start
+--- $menu_helper ---------------------------------
+

+ 37 - 0
locations/IgorEv

@@ -0,0 +1,37 @@
+# IgorEv
+gs 'stat'
+'<center><B><font color = maroon><<$npcName[4]>> <<$npcSurName[4]>></font></B></center>'
+'<center><img src="images\qwest\alter\npc4.jpg"></center>'
+if fedorKozlovQW >= 10 or $loc = 'gdkin':
+'To you and Igor suitable Fedor. "Gosh, you do not confused? <<$name>> my girl." Igor blushed "Well Fed, you know, I did not know. But if you insist, then okay, I´m just a joke." Fyodor nodded, "Well, go wherever you go, a practical joker."'
+act 'Go with Fedor': IdorBlock = 1 & gt 'FedorEv'
+exit
+end
+'Igor eagerly tell you, "Well what? Come to my house?".'
+
+
+if IgorLove > 0:
+	act 'Go to Igor':
+	cls
+	minut += 15
+	gs 'stat'
+	'You came home to Igor.'
+			if IgorDominaQW = 0:
+		'Igor starts hugging and kissing you.'
+
+		end
+
+		if IgorDominaQW > 0:
+		'Igor gets up on his knees in front of you, "Madam, I pray for a kiss!"'
+
+		end
+	act 'Leave': IgorLove -= 1 & gt 'gorodok'
+	end
+end
+if IgorLove <= 0:
+IgorLoverQW = -1
+'Along the way, Igor began to chant "<<$name>>, I love you so much, but you do not know me, you know, I began to wonder if perhaps we should leave."'
+act 'Leave': gt 'gorodok'
+end
+--- IgorEv ---------------------------------
+

+ 222 - 0
locations/IrinaRoom

@@ -0,0 +1,222 @@
+# IrinaRoom
+if $ARGS[0] = 'start':
+cla
+*clr
+set minut += 5
+'<center><B><font color = maroon>Entrance where your girlfriend lives Ira</font></B></center>'
+'<center><img src="images\etogame\podezdhr.jpg"></center>'
+clr
+gs 'stat'
+fcolor = rgb(0,0,0)
+bcolor = rgb(255,255,255)
+LCOLOR = rgb(106,90,205)
+
+	act 'QUIT':
+	cla
+	set minut += 5
+	gt 'street'
+	end
+
+	act 'Ring the doorbell Irina':
+	cla
+		if hour >= 16 and hour <= 21 and week >= 6 and IrinaQW ! 2:
+		'You have reached the door and you opened the IRA, she smiled and invited you to join.'
+			act 'Take the apartment': gt 'IrinaRoom','first'
+		else
+		'You rang the doorbell but no one answers.'
+			act 'QUIT':
+			cla
+			set minut += 5
+			gt 'street'
+			end
+		end
+	end
+
+end
+
+if $ARGS[0] = 'first':
+cla
+*clr
+set minut += 5
+'<center><B><font color = maroon>Apartment Ira</font></B></center>'
+'<center><img src="images\etogame\IrinaRoom.jpg"></center>'
+'Small studio apartment Ira neat and tidy'
+clr
+gs 'stat'
+	act 'Drinking in the kitchen': gt 'IrinaRoom','first1'
+end
+
+if $ARGS[0] = 'first1':
+cla
+*clr
+set minut += 60
+set manna += 50
+'<center><img src="images\picVA\IrinaQW.jpg"></center>'
+'You Ira settled in the kitchen with a bottle of wine and a snack of fruit, you talked and chatted merrily.'
+'And Ira and you´re a bit tipsy and the conversation became more candid flow into shape.'
+clr
+gs 'stat'
+	act 'Leave':
+	cla
+	set minut += 60
+	set manna += 50
+	gt 'street'
+	end
+
+	if IrinaQW = 1:
+		act 'Suggest drink brotherhood': gt 'IrinaRoom','first2'
+	end
+	if IrinaQW >= 10:
+		act 'Tselovatsya': gt 'IrinaRoom','kiss'
+	end
+end
+
+if $ARGS[0] = 'kiss':
+cla
+*clr
+set minut += 10
+set manna += 50
+set horny += 20
+'<center><img src="images\picVA\IrinaKiss.jpg"></center>'
+'You passionately kissing with Ira, and caress her firm breasts with his hands.'
+clr
+gs 'stat'
+	act 'Sex': gt 'IrinaRoom','sex'
+end
+
+if $ARGS[0] = 'sex':
+cla
+*clr
+set minut += 60
+set manna += 50
+set lesbian += 1
+set manna += 100
+set willpower += 100
+'<center><img src="images\picVA\IrinaSex.jpg"></center>'
+	if horny < 50:
+	horny -= 10
+	'Once in bed you caress each other with passion and lick wet pussies each other. But the excitement gradually disappears and you feel that the orgasm you will not be.'
+	end
+	if horny >= 50:
+	horny = 0
+	set orgasm += 1
+	'Once in bed you caress each other with passion and lick wet pussies each other. Finally you are both satisfied.'
+	end
+clr
+gs 'stat'
+	act 'QUIT':
+	cla
+	set minut += 5
+	gt 'street'
+	end
+end
+
+
+if $ARGS[0] = 'first2':
+cla
+*clr
+set minut += 60
+set manna += 50
+'<center><img src="images\picVA\IrinaQW1.jpg"></center>'
+'You offered Ira drink brotherhood, after dating.'
+clr
+gs 'stat'
+	act 'Kiss': gt 'IrinaRoom','first3'
+end
+
+if $ARGS[0] = 'first3':
+cla
+*clr
+set manna += 50
+set horny += 20
+'<center><img src="images\picVA\IrinaQW2.jpg"></center>'
+'You kissed Il in her warm, soft, smelling wine lips. Irina flushed after the kiss and looks at you a little embarrassed and frightened.'
+clr
+gs 'stat'
+	act 'Ira undress': gt 'IrinaRoom','first4'
+	act 'Ira drink more': gt 'IrinaRoom','first5'
+end
+
+if $ARGS[0] = 'first4':
+cla
+*clr
+set IrinaQW = 2
+'You started filming blouse with Ira, she jumped up and jumped from his chair screaming "What are you doing? I´m not a lesbian!"'
+'She was very afraid of your attack and you pointed to the door.'
+clr
+gs 'stat'
+	act 'QUIT':
+	cla
+	set minut += 5
+	gt 'street'
+	end
+end
+
+if $ARGS[0] = 'first5':
+cla
+*clr
+set IrinaQW = 10
+set horny += 20
+'<center><img src="images\picVA\IrinaQW3.jpg"></center>'
+'You pumped Er wine, it is highly intoxicated and spilled wine on myself. She went into the bathroom to change. You, too, went in and spredlozhili help her.'
+'She undressed and you have decided to follow suit and also undressed climbed into the shower. You started lathering body Ira and saw how she stood erect nipples.'
+clr
+gs 'stat'
+	act 'Kiss': gt 'IrinaRoom','first6'
+end
+
+if $ARGS[0] = 'first6':
+cla
+*clr
+set horny += 20
+'<center><img src="images\picVA\IrinaQW4.jpg"></center>'
+'You passionately dug lips in luscious lips Ira, she suddenly said, your kiss very passionately.'
+clr
+gs 'stat'
+	act 'Fondle breasts': gt 'IrinaRoom','first7'
+end
+
+if $ARGS[0] = 'first7':
+cla
+*clr
+set horny += 20
+'<center><img src="images\picVA\IrinaQW5.jpg"></center>'
+'You lowered his head to his chest and Ira began to suck and lick her hard nipples Ira zastonalya pleasure.'
+clr
+gs 'stat'
+	act 'Licking pussy': gt 'IrinaRoom','first8'
+end
+
+if $ARGS[0] = 'first8':
+cla
+*clr
+set horny += 20
+set girl += 1
+set lesbian += 1
+'<center><img src="images\picVA\IrinaQW6.jpg"></center>'
+'You began to kiss lower and lower until it fell to the level of moisture seeping pussy Ira. Your reed began to caress her clit and soon she shuddered and began to moan from orgasm.'
+'Ira decided to pay you back in the same coin and not speak a word not put you on the edge of the tub and her lips stuck into your pussy.'
+clr
+gs 'stat'
+	act 'Licking pussy': gt 'IrinaRoom','first9'
+end
+
+if $ARGS[0] = 'first9':
+cla
+*clr
+set horny = 0
+set orgasm += 1
+set manna += 100
+set willpower += 100
+'<center><img src="images\picVA\IrinaQW7.jpg"></center>'
+'Lips and tongue Ira quickly vozimeli effect and you finished with passionate moans.'
+clr
+gs 'stat'
+	act 'QUIT':
+	cla
+	set minut += 5
+	gt 'street'
+	end
+end
+--- IrinaRoom ---------------------------------
+

+ 66 - 0
locations/IvanEv

@@ -0,0 +1,66 @@
+# IvanEv
+ivansportday = day
+gs 'stat'
+'<center><B><font color = maroon><<$npcName[3]>> <<$npcSurName[3]>></font></B></center>'
+'<center><img src="images\qwest\alter\npc3.jpg"></center>'
+if $loc = 'gdksport':
+'Ivan grinned seeing you "Hello <<$name>>, you´re here too zanimaeshsya sports?" You confirmed his words. Ivan nodded. "I´ve been training for boxing go. Soon the competition."'
+act 'Leave': gt 'gdksport'
+	if kotovVSprohorov = 1:
+
+	end
+	if kotovVSprohorov = 0:
+	'Ivan thought about something and said, "I have today sparring with Kotov from our class. Want to see?"'
+		act 'Want':
+		cls
+		kotovVSprohorov = 1
+		gs 'stat'
+		'You entered the hall where trained local boxing club. In the hall stood ineradicable smell of old leather pears and sweat. A few guys hit on pears practicing strokes, several mirrors before doing the moves. In the ring was already Kotov, shorts, helmet and gloves. "Hey Proshka I´ll wait for you much? Go to the ring!" Prokhorov smirked, quickly pulled the helmet on your head, put on gloves and entered the ring. You sat down on the bench. Many of the guys, too, began to look, what will happen in the ring.'
+			act 'Watch':
+			cls
+			minut += 3
+			dom += 1
+			gs 'stat'
+			'Immediately struck that Ivan is much higher than Vitek Kotov Kotov but broader in the shoulders and much more muscular. Guys bumped gloves in salute and departed from each other stood in the rack. Cats like a whirlwind attacked Ivan. Ivan began to retreat fighting jabs. Became apparent that Kotov embedded in shots, but can not get Ivan. Ivan is not strong blows of his left hand almost immediately began to get cats in the head. Here there was a loud bang, and the head jerked Kotova, and the Vitek otsupil step. Ivan kick right hand was very sharp and detailed. Vitek began to retreat and fight. Roles were reversed in the ring, now crushed and put pressure Ivan Kotov. It became apparent that Vic is the sweat pours and he began to choke. And Ivan Kotov meanwhile shot sharp and precise strokes of the race. Vitek also fighting could not get Prokhorov. There was another loud bang and Vic head jerked to the side, and he was visibly staggered. Coach whistle whistle "So at the corners, the end of the round. Victor, What the hell you like a tank Presch Ivan? Ivan class above you. Use jab feint if you will shove, I can not catch you separate them, then you will treat a concussion. " Witek standing in the corner and tried sweating prodyshatsya. Ivan looked fresh and not tired. Finally coach whistle whistle "second round."'
+				act 'Watch':
+				cls
+			minut += 3
+				dom += 1
+				gs 'stat'
+				'In the second round, Ivan became easy on your feet moving around the circle and beat Victor light blows with his left hand, almost all the blows fell cats in the head, but Victor was not responding to them trying to get closer Ivan suddenly he abruptly threw a left hook to the head of Ivan Prokhorov had time to raise hands and close the head, but then a second blow Kotova landed with a loud bang Ivan in the stomach. Ivan noticeably bent down and began to retreat and move from side to side. Cats happy and began to settle on Ivan throwing hands with incredible speed. Here he managed to get Ivan´s head and legs buckled Ivan. Coach again whistled the whistle. "Ivan, keep him at a distance, do not let close!" It has been seen as Ivan nose bleeds he wipes his glove. Coach whistled again "Round."'
+					act 'Watch':
+					cls
+					minut += 3
+					dom += 1
+					gs 'stat'
+					'Ivan began to move easily on his feet throwing his left hand on his head which regularly ran constantly attacking Kotov. Victor threw hand, but Ivan managed to remove the head from bumps and knocks over his arm Kotova, there was a loud bang and Kotov got ass in the ring. Some of the guys who are watching the fight with admiration said "Great cross struck Vanya." Long and nasty whistle whistle coach. "Ivan, well done, well caught on the cross. Victor, are you okay?" Witek got to his feet and angrily looked at Ivan through clenched teeth. "I´m all right." Coach nodded "Well, then continue." The guys came back to the center of the ring and greeting each other blow gloves started the fight. Witek was noticeably quieter and often tried to go away from the blows Prokhorov. Ivan was moving on his feet and threw scathing attack, many of them hit the target. Witek suddenly intensified and tucked in the corner of Ivan, two powerful blows immediately hit in the stomach and Ivan Prokhorov clutching Vic hung on it. Whistle blew trainer "Ivan, protect body. Okay, relax a little bit." Boys stood in their corners, it was noticeable that they are both covered in sweat and panting. Ivan wiped the blood flowing from the nose, and Victor hands kneaded. Coach whistle whistle "fourth round"'
+						act 'Watch':
+						cls
+						minut += 3
+						dom += 1
+						gs 'stat'
+						'Began the fourth round and Victor began circling around the ring trying to drive into the corner of Ivan. Ivan noticeably tired and his movements became slower in the ring, but his punches are still regularly fetched Kotova. Suddenly there was a cotton and Ivan staggered Victor still got him in the head. Ivan began to retreat from close hands Kotova and Witek with renewed vigor to protect Ivan thrashed. Suddenly, one of the blows to the stomach slapped Prokhorov and he bent down, Kotov hit uppercut swing and the head of Ivan. Ivan hung on Victor. Coach whistle whistle "Ivan, move on his feet, hit jab, do not sleep in the ring." Coach whistled again and the guys continued. Witek were pressing on Ivan, but Ivan has already recovered and fought light and quick strokes. Here´s head jerked from Ivan and Ivan hit hard recoiling hanging on the ropes, Kotov immediately rushed to Ivan with a view to finish it, but the whistle blew coach. "Okay, enough for today. Ivan, get some rest and paws will practice defense corps. You weak this part." Witek scowled, "What do I do?" Coach shrugged "Invent something, not small."'
+							act 'Ask the coach who won':
+							cls
+							minut += 3
+							gs 'stat'
+							'You asked an elderly coach who won. Coach looked at you as if you had just said. "It´s sparring, there are no winners. But if it was a real battle, it would certainly be defeated Ivan. In combat count the number of strokes, their strength does not matter. Ivan struck a dozen times more punches." Kotov heard coach zabubnel "Certainly otpizdish in shit, and then another and lose. Proshka same broke, if not whistle, I would put it. Fucking master of sports." On the coach said with exasperation, "Kotov, you´re not in the alley, it is a sport and it has rules, according to the rules you lose, learn not to expose all your head off." Cats with exasperation took off his gloves and went to the corner where lay the rod and weights. Coach looked after him "That´s only and can swing." Prokhorov has already recovered and went to the coach. Coach began to wear long leather paws on his hands.'
+								act 'Can I like to practice?':
+								cls
+								minut += 3
+								gs 'stat'
+								'You asked an elderly trainer whether you can train too. Coach grinned. "You see, there´s no other girls. Who are you going to stand in sparring? And without sparing it will not stall, and a children´s game." You offered to put you in sparring with guys. Surround you guys giggled. Smiled even coach. "You saw the fight, imagine what will happen to you if some sort Kotov you accidentally hit in full force. I´m not going in my old age, still in jail get for what you in training accidentally injure somebody."'
+								act 'Leave': gt 'gdksport'
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+else
+
+end
+--- IvanEv ---------------------------------
+

+ 12 - 0
locations/KGDbefore

@@ -0,0 +1,12 @@
+# KGDbefore
+
+KGDhealth = KGDHP
+KGDhealth2 = KGDHP2
+KGDhealth3 = KGDHP3
+KGDhealth4 = KGDHP4
+KGDhealth5 = KGDHP5
+KGDhealth6 = KGDHP6
+
+gt 'KGDfight'
+--- KGDbefore ---------------------------------
+

+ 26 - 0
locations/KGDexp

@@ -0,0 +1,26 @@
+# KGDexp
+KGDneedExpNextLvl=(KGDlvl * 10)*KGDlvl
+KGDneedExp = KGDneedExpNextLvl - KGDexp
+if KGDneedExp <= 0 and KGDlvl > KGDlvlr: KGDlvlr = KGDlvl & KGDlvl += 1 & KGDexp = 0 & KGDHP += 10 & KGDdam += 5
+
+KGDneedExpNextLvl2=(KGDlvl2 * 10)*KGDlvl2
+KGDneedExp2 = KGDneedExpNextLvl2 - KGDexp2
+if KGDneedExp2 <= 0 and KGDlvl2 > KGDlvlr2: KGDlvlr2 = KGDlvl2 & KGDlvl2 += 1 & KGDexp2 = 0 & KGDHP2 += 10 & KGDdam2 += 5
+
+KGDneedExpNextLvl3=(KGDlvl3 * 10)*KGDlvl3
+KGDneedExp3 = KGDneedExpNextLvl3 - KGDexp3
+if KGDneedExp3 <= 0 and KGDlvl3 > KGDlvlr3: KGDlvlr3 = KGDlvl3 & KGDlvl3 += 1 & KGDexp3 = 0 & KGDHP3 += 10 & KGDdam3 += 5
+
+KGDneedExpNextLvl4=(KGDlvl4 * 10)*KGDlvl4
+KGDneedExp4 = KGDneedExpNextLvl4 - KGDexp4
+if KGDneedExp4 <= 0 and KGDlvl4 > KGDlvlr4: KGDlvlr4 = KGDlvl4 & KGDlvl4 += 1 & KGDexp4 = 0 & KGDHP4 += 10 & KGDdam4 += 5
+
+KGDneedExpNextLvl5=(KGDlvl5 * 10)*KGDlvl5
+KGDneedExp5 = KGDneedExpNextLvl5 - KGDexp5
+if KGDneedExp5 <= 0 and KGDlvl5 > KGDlvlr5: KGDlvlr5 = KGDlvl5 & KGDlvl5 += 1 & KGDexp5 = 0 & KGDHP5 += 10 & KGDdam5 += 5
+
+KGDneedExpNextLvl6=(KGDlvl6 * 10)*KGDlvl6
+KGDneedExp6 = KGDneedExpNextLvl6 - KGDexp6
+if KGDneedExp6 <= 0 and KGDlvl6 > KGDlvlr6: KGDlvlr6 = KGDlvl6 & KGDlvl6 += 1 & KGDexp6 = 0 & KGDHP6 += 10 & KGDdam6 += 5
+--- KGDexp ---------------------------------
+

+ 16 - 0
locations/KGDfight

@@ -0,0 +1,16 @@
+# KGDfight
+'Your Party'
+'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
+'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
+''
+'Game enemy'
+''
+'First line. <<$kgdplacev>> <<$kgdplacev2>> <<$kgdplacev3>>'
+'Second line. <<$kgdplacev4>> <<$kgdplacev5>> <<$kgdplacev6>>'
+
+act 'Leave': gt 'KGDgame'
+
+
+!вот тут то я и обосрался, ниасилив групповой бой
+--- KGDfight ---------------------------------
+

+ 310 - 0
locations/KGDgame

@@ -0,0 +1,310 @@
+# KGDgame
+minut += 1
+gs 'stat'
+gs 'KGDexp'
+'<center><B>Date <<KGDday>></B></center>'
+'<center><B>Your town</B></center>'
+'<center>Buildings</center>'
+'Tower Hero, which stores <<KGDmoney>> Resources'
+'Farms <<KGDfarm>> pieces'
+''
+'<center><B>List Party hero (6t people maximum)</B></center>'
+'Hero. Level <<KGDlvl>>Life <<KGDHP>>Done <<KGDdam>>'
+if KGDsput2 > 0: '<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>Done <<KGDdam2>>'
+if KGDsput3 > 0: '<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>Done <<KGDdam3>>'
+if KGDsput4 > 0: '<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>Done <<KGDdam4>>'
+if KGDsput5 > 0: '<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>Done <<KGDdam5>>'
+if KGDsput6 > 0: '<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>Done <<KGDdam6>>'
+''
+'<center><B>Brands for</B></center>'
+'Do you own <<KGDkarta>>% of'
+
+
+act 'Next Day':
+cls
+KGDbrod = 0
+KGDday += 1
+KGDmoney += KGDkarta * 5 + KGDfarm * 10
+gt $curloc
+end
+
+if KGDmoney >= 150 and KGDfarm > KGDkarta:
+	act 'Build a farm (150 resources)':
+	cls
+	KGDmoney -= 150
+	KGDfarm += 1
+	gt $curloc
+	end
+end
+
+	act 'Arrange the soldiers':
+	cls
+	KGDpartyCreate = 1
+	$kgdplace = '1st place empty'
+	$kgdplace2 = '2nd place is empty'
+	$kgdplace3 = '3rd place is empty'
+	$kgdplace4 = '4th place is empty'
+	$kgdplace5 = '5th place is empty'
+	$kgdplace6 = '6th place is empty'
+	kgdplace = 0
+	kgdplace2 = 0
+	kgdplace3 = 0
+	kgdplace4 = 0
+	kgdplace5 = 0
+	kgdplace6 = 0
+	gt 'KGDparty'
+	end
+
+if KGDbrod = 0 and KGDpartyCreate > 0:
+	act 'Win territory':
+	cls
+	KGDbrod = 1
+
+	gt 'KGDbefore'
+	end
+end
+
+
+
+if KGDsput6 = 0 and KGDmoney >= 250:
+	act 'Hire a satellite (250 resources)':
+	cls
+	KGDmoney -= 250
+	KGDpartyCreate = 0
+		act 'Warrior':
+			if KGDsput2 = 0:
+			$KGDname2 = 'Warrior'
+			KGDlvl2 = 1
+			KGDHP2 = 100
+			KGDdam2 = 10
+			KGDsput2 = 1
+			KGDexp2 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput3 = 0:
+			$KGDname3 = 'Warrior'
+			KGDlvl3 = 1
+			KGDHP3 = 100
+			KGDdam3 = 10
+			KGDsput3 = 1
+			KGDexp3 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput4 = 0:
+			$KGDname4 = 'Warrior'
+			KGDlvl4 = 1
+			KGDHP4 = 100
+			KGDdam4 = 10
+			KGDsput4 = 1
+			KGDexp4 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput5 = 0:
+			$KGDname5 = 'Warrior'
+			KGDlvl5 = 1
+			KGDHP5 = 100
+			KGDdam5 = 10
+			KGDsput5 = 1
+			KGDexp5 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput6 = 0:
+			$KGDname6 = 'Warrior'
+			KGDlvl6 = 1
+			KGDHP6 = 100
+			KGDdam6 = 10
+			KGDsput6 = 1
+			KGDexp6 = 0
+			gt $curloc
+			exit
+			end
+
+		end
+
+		act 'Magician':
+			if KGDsput2 = 0:
+			$KGDname2 = 'Magician'
+			KGDlvl2 = 1
+			KGDHP2 = 60
+			KGDdam2 = 20
+			KGDsput2 = 1
+			KGDexp2 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput3 = 0:
+			$KGDname3 = 'Magician'
+			KGDlvl3 = 1
+			KGDHP3 = 60
+			KGDdam3 = 20
+			KGDsput3 = 1
+			KGDexp3 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput4 = 0:
+			$KGDname4 = 'Magician'
+			KGDlvl4 = 1
+			KGDHP4 = 60
+			KGDdam4 = 20
+			KGDsput4 = 1
+			KGDexp4 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput5 = 0:
+			$KGDname5 = 'Magician'
+			KGDlvl5 = 1
+			KGDHP5 = 60
+			KGDdam5 = 20
+			KGDsput5 = 1
+			KGDexp5 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput6 = 0:
+			$KGDname6 = 'Magician'
+			KGDlvl6 = 1
+			KGDHP6 = 60
+			KGDdam6 = 20
+			KGDsput6 = 1
+			KGDexp6 = 0
+			gt $curloc
+			exit
+			end
+
+		end
+
+		act 'Archer':
+			if KGDsput2 = 0:
+			$KGDname2 = 'Archer'
+			KGDlvl2 = 1
+			KGDHP2 = 80
+			KGDdam2 = 15
+			KGDsput2 = 1
+			KGDexp2 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput3 = 0:
+			$KGDname3 = 'Archer'
+			KGDlvl3 = 1
+			KGDHP3 = 80
+			KGDdam3 = 15
+			KGDsput3 = 1
+			KGDexp3 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput4 = 0:
+			$KGDname4 = 'Archer'
+			KGDlvl4 = 1
+			KGDHP4 = 80
+			KGDdam4 = 15
+			KGDsput4 = 1
+			KGDexp4 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput5 = 0:
+			$KGDname5 = 'Archer'
+			KGDlvl5 = 1
+			KGDHP5 = 80
+			KGDdam5 = 15
+			KGDsput5 = 1
+			KGDexp5 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput6 = 0:
+			$KGDname6 = 'Archer'
+			KGDlvl6 = 1
+			KGDHP6 = 80
+			KGDdam6 = 15
+			KGDsput6 = 1
+			KGDexp6 = 0
+			gt $curloc
+			exit
+			end
+
+		end
+
+		act 'Priest':
+			if KGDsput2 = 0:
+			$KGDname2 = 'Priest'
+			KGDlvl2 = 1
+			KGDHP2 = 40
+			KGDdam2 = 20
+			KGDsput2 = 1
+			KGDexp2 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput3 = 0:
+			$KGDname3 = 'Priest'
+			KGDlvl3 = 1
+			KGDHP3 = 40
+			KGDdam3 = 20
+			KGDsput3 = 1
+			KGDexp3 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput4 = 0:
+			$KGDname4 = 'Priest'
+			KGDlvl4 = 1
+			KGDHP4 = 40
+			KGDdam4 = 20
+			KGDsput4 = 1
+			KGDexp4 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput5 = 0:
+			$KGDname5 = 'Priest'
+			KGDlvl5 = 1
+			KGDHP5 = 40
+			KGDdam5 = 20
+			KGDsput5 = 1
+			KGDexp5 = 0
+			gt $curloc
+			exit
+			end
+
+			if KGDsput6 = 0:
+			$KGDname6 = 'Priest'
+			KGDlvl6 = 1
+			KGDHP6 = 40
+			KGDdam6 = 20
+			KGDsput6 = 1
+			KGDexp6 = 0
+			gt $curloc
+			exit
+			end
+
+		end
+	end
+end
+
+act 'Quit Game': gt 'Komp','start'
+--- KGDgame ---------------------------------
+

+ 128 - 0
locations/KGDparty

@@ -0,0 +1,128 @@
+# KGDparty
+'In part 2 of the line, front, protects a back. Each maximum of 3 fighter.'
+''
+if KGDrazm = 0:
+'Hero. Level <<KGDlvl>>Life <<KGDHP>>damage <<KGDdam>>. <a href="exec:KGDrazm = 1 & KGDsubsp = 1 & dynamic $kgddin ">Post</a>'
+else
+'Hero. Level <<KGDlvl>>Life <<KGDHP>>Done <<KGDdam>>'
+end
+if KGDsput2 > 0:
+	if KGDrazm2 = 0:
+	'<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>, damage <<KGDdam2>>. <a href="exec:KGDrazm2 = 1 & KGDsubsp = 2 & dynamic $kgddin ">Place</a>'
+	else
+	'<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>Done <<KGDdam2>>'
+	end
+end
+if KGDsput3 > 0:
+	if KGDrazm3 = 0:
+	'<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>, damage <<KGDdam3>>. <a href="exec:KGDrazm3 = 1 & KGDsubsp = 3 & dynamic $kgddin ">Place</a>'
+	else
+	'<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>Done <<KGDdam3>>'
+	end
+end
+if KGDsput4 > 0:
+	if KGDrazm4 = 0:
+	'<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>, damage <<KGDdam4>>. <a href="exec:KGDrazm4 = 1 & KGDsubsp = 4 & dynamic $kgddin ">Place</a>'
+	else
+	'<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>Done <<KGDdam4>>'
+	end
+end
+if KGDsput5 > 0:
+	if KGDrazm5 = 0:
+	'<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>, damage <<KGDdam5>>. <a href="exec:KGDrazm5 = 1 & KGDsubsp = 5 & dynamic $kgddin ">Place</a>'
+	else
+	'<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>Done <<KGDdam5>>'
+	end
+end
+if KGDsput6 > 0:
+	if KGDrazm6 = 0:
+	'<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>, damage <<KGDdam6>>. <a href="exec:KGDrazm6 = 1 & KGDsubsp = 6 & dynamic $kgddin ">Place</a>'
+	else
+	'<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>Done <<KGDdam6>>'
+	end
+end
+
+'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
+'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
+
+$kgddin = {
+cls
+'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
+'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
+if kgdplace = 0:
+	act '1st place':
+	kgdplace = 1
+		if KGDsubsp = 1:$kgdplace = 'Hero'&KGDsput = 1
+		if KGDsubsp = 2:$kgdplace = $KGDname2 & KGDsput2 = 1
+		if KGDsubsp = 3:$kgdplace = $KGDname3 & KGDsput3 = 1
+		if KGDsubsp = 4:$kgdplace = $KGDname4 & KGDsput4 = 1
+		if KGDsubsp = 5:$kgdplace = $KGDname5 & KGDsput5 = 1
+		if KGDsubsp = 6:$kgdplace = $KGDname6 & KGDsput6 = 1
+	gt $curloc
+	end
+end
+if kgdplace2 = 0:
+	act '2nd place':
+	kgdplace2 = 1
+		if KGDsubsp = 1:$kgdplace2 = 'Hero'&KGDsput = 2
+		if KGDsubsp = 2:$kgdplace2 = $KGDname2 & KGDsput2 = 2
+		if KGDsubsp = 3:$kgdplace2 = $KGDname3 & KGDsput3 = 2
+		if KGDsubsp = 4:$kgdplace2 = $KGDname4 & KGDsput4 = 2
+		if KGDsubsp = 5:$kgdplace2 = $KGDname5 & KGDsput5 = 2
+		if KGDsubsp = 6:$kgdplace2 = $KGDname6 & KGDsput6 = 2
+	gt $curloc
+	end
+end
+if kgdplace3 = 0:
+	act '3rd place':
+	kgdplace3 = 1
+		if KGDsubsp = 1:$kgdplace3 = 'Hero'&KGDsput = 3
+		if KGDsubsp = 2:$kgdplace3 = $KGDname2 & KGDsput2 = 3
+		if KGDsubsp = 3:$kgdplace3 = $KGDname3 & KGDsput3 = 3
+		if KGDsubsp = 4:$kgdplace3 = $KGDname4 & KGDsput4 = 3
+		if KGDsubsp = 5:$kgdplace3 = $KGDname5 & KGDsput5 = 3
+		if KGDsubsp = 6:$kgdplace3 = $KGDname6 & KGDsput6 = 3
+	gt $curloc
+	end
+end
+if kgdplace4 = 0:
+	act '4th place':
+	kgdplace4 = 1
+		if KGDsubsp = 1:$kgdplace4 = 'Hero'&KGDsput = 4
+		if KGDsubsp = 2:$kgdplace4 = $KGDname2 & KGDsput2 = 4
+		if KGDsubsp = 3:$kgdplace4 = $KGDname3 & KGDsput3 = 4
+		if KGDsubsp = 4:$kgdplace4 = $KGDname4 & KGDsput4 = 4
+		if KGDsubsp = 5:$kgdplace4 = $KGDname5 & KGDsput5 = 4
+		if KGDsubsp = 6:$kgdplace4 = $KGDname6 & KGDsput6 = 4
+	gt $curloc
+	end
+end
+if kgdplace5 = 0:
+	act '5th place':
+	kgdplace5 = 1
+		if KGDsubsp = 1:$kgdplace5 = 'Hero'&KGDsput = 5
+		if KGDsubsp = 2:$kgdplace5 = $KGDname2 & KGDsput2 = 5
+		if KGDsubsp = 3:$kgdplace5 = $KGDname3 & KGDsput3 = 5
+		if KGDsubsp = 4:$kgdplace5 = $KGDname4 & KGDsput4 = 5
+		if KGDsubsp = 5:$kgdplace5 = $KGDname5 & KGDsput5 = 5
+		if KGDsubsp = 6:$kgdplace5 = $KGDname6 & KGDsput6 = 5
+	gt $curloc
+	end
+end
+if kgdplace6 = 0:
+	act '6th place':
+	kgdplace6 = 1
+		if KGDsubsp = 1:$kgdplace6 = 'Hero'&KGDsput = 6
+		if KGDsubsp = 2:$kgdplace6 = $KGDname2 & KGDsput2 = 6
+		if KGDsubsp = 3:$kgdplace6 = $KGDname3 & KGDsput3 = 6
+		if KGDsubsp = 4:$kgdplace6 = $KGDname4 & KGDsput4 = 6
+		if KGDsubsp = 5:$kgdplace6 = $KGDname5 & KGDsput5 = 6
+		if KGDsubsp = 6:$kgdplace6 = $KGDname6 & KGDsput6 = 6
+	gt $curloc
+	end
+end
+}
+
+act 'Leave': gt 'KGDgame'
+--- KGDparty ---------------------------------
+

+ 35 - 0
locations/KGDstart

@@ -0,0 +1,35 @@
+# KGDstart
+'<center><B>Disopl</B></center>'
+''
+
+if KGDsave > 0: act 'Load a saved game': gt 'KGDgame'
+
+act 'Play a new game':
+KGDsave = 1
+KGDmoney = 1000
+KGDHP = 100
+KGDlvl = 1
+KGDexp = 0
+KGDdam = 10
+KGDkarta = 5
+KGDsput2 = 0
+KGDsput3 = 0
+KGDsput4 = 0
+KGDsput5 = 0
+KGDsput6 = 0
+KGDday = 1
+KGDfarm = 0
+KGDlvlr = 0
+KGDlvlr2 = 0
+KGDlvlr3 = 0
+KGDlvlr4 = 0
+KGDlvlr5 = 0
+KGDlvlr6 = 0
+KGDpartyCreate = 0
+gt 'KGDgame'
+end
+
+
+act 'Exit': gt 'Komp','start'
+--- KGDstart ---------------------------------
+

+ 35 - 0
locations/KGOLboss

@@ -0,0 +1,35 @@
+# KGOLboss
+if $ARGS[0] = '1':
+$KGname = 'BOSS "Blue rat"'
+KGOLstrenV = 30
+KGOLspeedV = 30
+KGOLvitalV = 100
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(25,50)
+KGOLPrizeM = RAND(150,350)
+KGOLennumBoss = 1
+KGOLbronaV = 0
+KGOLneedDist = 3
+KGOLpowerV = KGOLstrenV
+KGOLennum = -1
+end
+
+if $ARGS[0] = '2':
+
+end
+
+if $ARGS[0] = '3':
+
+end
+
+if $ARGS[0] = '4':
+
+end
+
+if $ARGS[0] = '5':
+
+end
+--- KGOLboss ---------------------------------
+

+ 166 - 0
locations/KGOLenemy

@@ -0,0 +1,166 @@
+# KGOLenemy
+if $ARGS[0] = '0':
+$KGname = 'Predatory flower'
+KGOLstrenV = 10
+KGOLspeedV = 10
+KGOLvitalV = 10
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(1,3)
+KGOLPrizeM = RAND(10,30)
+KGOLennum = 0
+KGOLbronaV = 0
+KGOLneedDist = 10
+KGOLpowerV = KGOLintelV
+end
+
+if $ARGS[0] = '1':
+$KGname = 'Iridescent beetle'
+KGOLstrenV = 20
+KGOLspeedV = 10
+KGOLvitalV = 10
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(2,5)
+KGOLPrizeM = RAND(15,35)
+KGOLennum = 1
+KGOLbronaV = 0
+KGOLneedDist = 4
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '2':
+$KGname = 'Sundew'
+KGOLstrenV = 20
+KGOLspeedV = 20
+KGOLvitalV = 10
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(3,7)
+KGOLPrizeM = RAND(20,40)
+KGOLennum = 2
+KGOLbronaV = 0
+KGOLneedDist = 5
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '3':
+$KGname = 'Toothless dog'
+KGOLstrenV = 25
+KGOLspeedV = 20
+KGOLvitalV = 20
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(5,10)
+KGOLPrizeM = RAND(30,50)
+KGOLennum = 3
+KGOLbronaV = 0
+KGOLneedDist = 5
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '4':
+$KGname = 'Young cactus'
+KGOLstrenV = 25
+KGOLspeedV = 25
+KGOLvitalV = 20
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(7,14)
+KGOLPrizeM = RAND(35,60)
+KGOLennum = 4
+KGOLbronaV = 0
+KGOLneedDist = 6
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '5':
+$KGname = 'Toad'
+KGOLstrenV = 25
+KGOLspeedV = 30
+KGOLvitalV = 25
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(10,18)
+KGOLPrizeM = RAND(40,65)
+KGOLennum = 5
+KGOLbronaV = 0
+KGOLneedDist = 6
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '6':
+$KGname = 'Royal beetle'
+KGOLstrenV = 25
+KGOLspeedV = 30
+KGOLvitalV = 35
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(12,20)
+KGOLPrizeM = RAND(45,65)
+KGOLennum = 6
+KGOLbronaV = 0
+KGOLneedDist = 4
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '7':
+$KGname = 'Spotted mantis'
+KGOLstrenV = 35
+KGOLspeedV = 30
+KGOLvitalV = 35
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(14,22)
+KGOLPrizeM = RAND(50,70)
+KGOLennum = 7
+KGOLbronaV = 0
+KGOLneedDist = 4
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '8':
+$KGname = 'Plague Rat'
+KGOLstrenV = 40
+KGOLspeedV = 30
+KGOLvitalV = 40
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(16,24)
+KGOLPrizeM = RAND(55,75)
+KGOLennum = 8
+KGOLbronaV = 0
+KGOLneedDist = 4
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '9':
+$KGname = 'Prickly cactus'
+KGOLstrenV = 40
+KGOLspeedV = 40
+KGOLvitalV = 40
+KGOLintelV = 10
+KGHPV = KGOLvitalV * 10
+KGMannaV = KGOLintelV * 10
+KGOLPrizeExp = RAND(18,20)
+KGOLPrizeM = RAND(60,85)
+KGOLennum = 9
+KGOLbronaV = 0
+KGOLneedDist = 4
+KGOLpowerV = KGOLstrenV
+end
+
+if $ARGS[0] = '10':
+
+end
+--- KGOLenemy ---------------------------------
+

+ 151 - 0
locations/KGOLexpa

@@ -0,0 +1,151 @@
+# KGOLexpa
+KGOLneedExpNextLvl=(KGOLlvl * 10)*KGOLlvl
+KGOLneedExp = KGOLneedExpNextLvl - KGOLexp
+if KGOLneedExp <= 0 and KGOLlvl > KGOLlvlr: KGOLlvlr = KGOLlvl & KGOLpoint += 10 & KGOLspellpoint += 1 & KGOLlvl += 1 & KGOLexp = 0
+
+$KGOLatk = {
+KGOLzasV = RAND(KGOLspeedV/4, KGOLspeedV)
+KGOLataka = RAND(KGOLspeed/2, KGOLspeed * 2)
+if KGOLataka >= KGOLzasV:
+	if KGOLataka >= KGOLzasV * 2:
+	KGHPnpow = RAND(KGOLpower/2, KGOLpower)
+	KGHPV -= KGHPnpow
+	'<font color = green>CRETE <<KGHPnpow>></font>'
+	else
+	KGHPnpow = RAND(KGOLpower/10, KGOLpower/4)
+	KGHPntpow = KGHPnpow - KGOLbronaV
+	if KGHPntpow <= 0: KGHPntpow = 1
+	KGHPV -= KGHPnpow
+	'<font color = blue>Contact with <<KGHPnpow>></font>'
+	end
+else
+'<font color = red><<$KGname>> dodged your attack</font>'
+end
+}
+$KGOLatkPoison = {
+KGOLzasV = RAND(KGOLspeedV/4, KGOLspeedV)
+KGOLataka = RAND(KGOLspeed/2, KGOLspeed * 2)
+if KGOLataka >= KGOLzasV:
+poison += KGOLspell4 + 1
+	if KGOLataka >= KGOLzasV * 2:
+	KGHPnpow = RAND(KGOLpower/2, KGOLpower)
+	KGHPV -= KGHPnpow
+	'<font color = green>CRETE <<KGHPnpow>></font>'
+	else
+	KGHPnpow = RAND(KGOLpower/10, KGOLpower/4)
+	KGHPntpow = KGHPnpow - KGOLbronaV
+	if KGHPntpow <= 0: KGHPntpow = 1
+	KGHPV -= KGHPnpow
+	'<font color = blue>Contact with <<KGHPnpow>></font>'
+	end
+else
+'<font color = red><<$KGname>> dodged your attack</font>'
+end
+}
+$KGOLatkFB = {
+KGHPV -= KGOLpower
+'<font color = green>Faerbol inflicts damage <<KGOLpower>> U</font>'
+}
+$KGOLatkV = {
+KGOLzas = RAND(KGOLspeed/4, KGOLspeed)
+KGOLatakaV = RAND(KGOLspeedV/2, KGOLspeedV * 2)
+if KGOLatakaV >= KGOLzas:
+	if KGOLatakaV >= KGOLzas * 2:
+	KGHPnpow = RAND(KGOLpowerV/2, KGOLpowerV)
+	KGHP -= KGHPnpow
+	'<font color = red>CRETE <<KGHPnpow>></font>'
+	else
+	KGHPnpow = RAND(KGOLpowerV/10, KGOLpowerV/4)
+	KGHPntpow = KGHPnpow - KGOLbrona
+	if KGHPntpow <= 0: KGHPntpow = 1
+	KGHP -= KGHPnpow
+	'<font color = brown>Contact with <<KGHPnpow>></font>'
+	end
+else
+'<font color = green>You dodged the attack</font>'
+end
+}
+
+$KGOLrise = {
+cls
+'<center><B>increasing the screen layer</B></center>'
+'Power <<KGOLstren>>, speed and evasion <<KGOLspeed>>, endurance <<KGOLvital>>Intelligence <<KGOLintel>>'
+'Improve skills points available <<KGOLpoint>>'
+if KGOLpoint > 0:
+	act 'Force':
+	KGOLstren += 1
+	KGOLpoint -= 1
+	dynamic $KGOLrise
+	end
+
+	act 'Speed ​​/Dodge':
+	KGOLspeed += 1
+	KGOLpoint -= 1
+	dynamic $KGOLrise
+	end
+
+	act 'Endurance':
+	KGOLvital += 1
+	KGOLpoint -= 1
+	dynamic $KGOLrise
+	end
+
+	act 'Intelligence':
+	KGOLintel += 1
+	KGOLpoint -= 1
+	dynamic $KGOLrise
+	end
+end
+
+act 'Exit the screen improve': gt 'KGOLgame'
+}
+$KGOLrise2 = {
+cls
+'<center><B>Screen skills</B></center>'
+'Available skill points increase <<KGOLspellpoint/4>>'
+''
+if KGOLspellpoint >= 4:
+if KGOLklass = 1:
+!воин
+'Powerful punch Skill =<<KGOLspell>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Multiple blow Skill =<<KGOLspell2>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell2 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Increased armor Skill =<<KGOLspell3>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell3 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+elseif KGOLklass = 2:
+!вор
+'Sneaky blow Skill =<<KGOLspell4>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell4 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Poison Blade, Skill =<<KGOLspell5>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell5 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Invisibility Skill =<<KGOLspell6>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell6 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+elseif KGOLklass = 3:
+!маг
+'Faerbol, Skill =<<KGOLspell7>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell7 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Dropping, Skill =<<KGOLspell8>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell8 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Circle of fire, Skill =<<KGOLspell9>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell9 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+elseif KGOLklass = 4:
+!жрец
+'Hit, Skill =<<KGOLspell10>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell10 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Treatment Skill =<<KGOLspell11>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell11 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Obkast, Skill =<<KGOLspell12>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell12 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+elseif KGOLklass = 5:
+!лучник
+'Powerful shot, Skill =<<KGOLspell13>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell13 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Triple shot, Skill =<<KGOLspell14>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell14 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Regen mana Skill =<<KGOLspell15>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell15 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+else
+!варвар
+'Thunderbolt, Skill =<<KGOLspell16>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell16 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Stan Skill =<<KGOLspell17>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell17 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+'Recovery, Skill =<<KGOLspell18>>. <a href="exec:KGOLspellpoint -= 4 & KGOLspell18 += 1 & dynamic $KGOLrise2 ">Attach a skill point</a>'
+end
+end
+act 'Exit the screen skills': gt 'KGOLgame'
+}
+
+
+$KGOLatkKGOLspell2 = {
+:multiloop
+KGLOloop -= 1
+dynamic $KGOLatk
+if KGLOloop > 0: jump 'multiloop'
+}
+--- KGOLexpa ---------------------------------
+

+ 279 - 0
locations/KGOLfight

@@ -0,0 +1,279 @@
+# KGOLfight
+minut += 1
+gs 'stat'
+if otkathirki > 0: otkathirki -= 1
+
+if KGHP < KGHPMAX and KGOLhirka > 0 and otkathirki <= 0:
+kghneed = KGHPMAX - KGHP
+otkathirki = 3
+	if KGOLhirka >= kghneed:
+	KGOLhirka -= kghneed
+	KGHP = KGHPMAX
+	else
+	KGHP = KGOLhirka
+	KGOLhirka = 0
+	end
+end
+if KGOLdist < 0: KGOLdist = 0
+if KGOLtimer > 0:
+KGOLtimer -= 1
+	if KGOLtimer <= 0:
+	KGOLbrona -= KGOLbronaMod
+	KGOLbronaMod = 0
+	KGOLstren -= KGOLstrenMod
+	KGOLstrenMod = 0
+	KGOLspeed -= KGOLspeedMod
+	KGOLspeedMod = 0
+	KGOLvital -= KGOLvitalMod
+	KGOLvitalMod = 0
+	KGOLintel -= KGOLintelMod
+	KGOLintelMod = 0
+	KGOLwpower -= KGOLwpowerMod
+	KGOLwpowerMod = 0
+	end
+end
+if unvis > 0: 'You are invisible'
+if poison > 0: poison -= 1 & KGHPV -= KGOLspell4 * 10 & 'The poison causes damage to the enemy <<KGOLspell4*10>>'
+if firecircle > 0: firecircle -= 1 & KGHPV -= KGOLspell9 * 50 & 'Circle of fire causes damage to the enemy <<KGOLspell9*50>>'
+'Life <<KGHP>>, the manna <<KGManna>>'
+'<<$KGname>> Life <<KGHPV>>manna <<KGMannaV>>'
+if KGOLhirka > 0: 'Hirka can restore automatically <<KGOLhirka>> health units'
+if otkathirki > 0: 'Hirka retrace through <<otkathirki>> moves.'
+'Distance <<KGOLdist>>'
+if KGOLtimer > 0: 'Obkast will act more <<KGOLtimer>> Rounds'
+if KGOLcooldown > 0: 'Rollback skills completed by <<KGOLcooldown>> Rounds'
+!конец боя
+if KGHP <= 0:
+KGOLloss += 1
+poison = 0
+firecircle = 0
+manna -= 100
+'You lost the fight'
+act 'Go to Rep.': gt 'KGOLgame'
+exit
+end
+if KGHPV <= 0:
+poison = 0
+firecircle = 0
+KGOLWin += 1
+KGOLmoney += KGOLPrizeM
+KGOLexp += KGOLPrizeExp
+manna += 100
+'<<$KGname>> fell. You win the fight.'
+'You got <<KGOLPrizeM>> coins and <<KGOLPrizeExp>> experience'
+if KGOLennumBoss = 1 and boss5lvl = 0: boss5lvl = 1 & KGOLhirka += 5000 & 'With boss tumbled small hirka'
+if KGOLennum = 0 and KGOLmqw = 1: KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
+if KGOLennum = 1 and KGOLmqw = 3: KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
+if KGOLennum = 2 and KGOLmqw = 5: KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
+if KGOLennum = 3 and KGOLmqw = 7: KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
+if KGOLennum = 4 and KGOLmqw = 9: KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
+if KGOLennum = 5 and KGOLmqw = 11: KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
+if KGOLennum = 6 and KGOLmqw = 13: KGOLqwvip += 1 & 'Another mob zafarmlen quest for'
+act 'Disengage': gt 'KGOLgame'
+exit
+end
+!инициатива
+KGOLiniV = RAND(KGOLspeedV/2, KGOLspeedV * 2)
+KGOLini = RAND(KGOLspeed/2, KGOLspeed * 2)
+if KGOLini = KGOLiniV:
+hodrand = RAND(0,1)
+if hodrand = 0: KGOLini = 1 & KGOLiniV = 0
+if hodrand = 1: KGOLini = 0 & KGOLiniV = 1
+end
+if KGOLini > KGOLiniV: KGOLiniSUM += 1
+if KGOLini < KGOLiniV: KGOLiniSUM -= 1
+if KGOLiniSUM > 3: KGOLini = 0 & KGOLiniV = 1 & KGOLiniSUM = 0
+if KGOLiniSUM<-3: KGOLini = 1 & KGOLiniV = 0 & KGOLiniSUM = 0
+!ходы
+if KGOLini > KGOLiniV or unvis > 0:
+'Now your turn'
+	if KGOLklass = 1:
+	!воин
+		if KGOLdist < 3:
+		act 'Attack':
+		cla
+		KGOLpower = KGOLstren + KGOLwpower
+		dynamic $KGOLatk
+		act 'Further': gt $curloc
+		end
+
+		if KGOLspell > 0 and KGManna >= KGOLspell * 10:
+		act 'Powerful blow (<<KGOLspell*10>> manna)':
+				cla
+				KGManna -= KGOLspell
+				KGOLpower = KGOLstren + KGOLwpower+(KGOLspell * 100)
+				dynamic $KGOLatk
+				act 'Further': gt $curloc
+				end
+		end
+
+		if KGOLspell2 > 0 and KGManna >= KGOLspell2 * 10:
+		act 'Multiple shot (<<KGOLspell2*10>> manna)':
+				cla
+				KGManna -= KGOLspell2
+				KGOLpower = KGOLstren + KGOLwpower
+				KGLOloop = KGOLspell2 + 1
+				dynamic $KGOLatkKGOLspell2
+				act 'Further': gt $curloc
+				end
+		end
+
+		if KGOLspell3 > 0 and KGManna >= KGOLspell3 * 10 and KGOLcooldown <= 0:
+		act 'Increase armor (<<KGOLspell3*10>> manna)':
+				cla
+				KGManna -= KGOLspell3
+				KGOLbronaMod += KGOLspell3 * 5
+				KGOLtimer += KGOLspell3 + 1
+				KGOLcooldown += KGOLspell3 + 3
+				act 'Further': gt $curloc
+				end
+		end
+		end
+	elseif KGOLklass = 2:
+	!вор
+		if KGOLdist < 5:
+		act 'Attack':
+		cla
+		KGOLpower = KGOLstren + KGOLwpower
+		dynamic $KGOLatk
+		act 'Further': gt $curloc
+		end
+
+		if KGOLspell4 > 0 and KGManna >= KGOLspell4 * 10:
+		act 'Sneaky shot (<<KGOLspell4*10>> manna)':
+				cla
+				KGManna -= KGOLspell4
+				KGOLpower = KGOLstren + KGOLwpower+(KGOLspell5 * 100)
+				dynamic $KGOLatk
+				act 'Further': gt $curloc
+				end
+		end
+
+		if KGOLspell5 > 0 and KGManna >= KGOLspell5 * 10:
+		act 'Poison Blade (<<KGOLspell5*10>>manna)':
+				cla
+				KGManna -= KGOLspell5
+				KGOLpower = KGOLstren + KGOLwpower
+				dynamic $KGOLatkPoison
+				act 'Further': gt $curloc
+				end
+		end
+
+		if KGOLspell6 > 0 and KGManna >= KGOLspell6 * 10 and KGOLcooldown <= 0:
+		act 'Invisibility (<<KGOLspell6*10>> manna)':
+				cla
+				KGManna -= KGOLspell6
+				unvis += KGOLspell6 + 1
+				KGOLcooldown += KGOLspell6 + 3
+				act 'Further': gt $curloc
+				end
+		end
+		end
+	elseif KGOLklass = 3:
+	!маг
+		act 'Attack':
+		cla
+		KGOLpower = KGOLintel + KGOLwpower
+		dynamic $KGOLatk
+		act 'Further': gt $curloc
+		end
+
+		if KGOLspell7 > 0 and KGManna >= KGOLspell7 * 10:
+			act 'Faerboll (<<KGOLspell7*10>> manna)':
+			cla
+			KGManna -= KGOLspell7
+			KGOLpower = RAND(KGOLspell7 * 100, KGOLspell7 * 200)
+			dynamic $KGOLatkFB
+			act 'Further': gt $curloc
+			end
+		end
+
+		if KGOLspell8 > 0 and KGManna >= KGOLspell8 * 10:
+			act 'Dropping (<<KGOLspell5*10>> manna)':
+			cla
+			KGManna -= KGOLspell5
+			KGOLdist += RAND(KGOLspell5 * 10, KGOLspell5 * 50)
+			'You flung the enemy and now the distance between you <<KGOLdist>> meter'
+			act 'Further': gt $curloc
+			end
+		end
+
+		if KGOLspell9 > 0 and KGManna >= KGOLspell9 * 10 and KGOLcooldown <= 0:
+			act 'Circle of fire (<<KGOLspell9*10>> manna)':
+			cla
+			KGManna -= KGOLspell9
+			firecircle += KGOLspell9 + 1
+			KGOLcooldown += KGOLspell9 + 3
+			'Everything around you is burning hellfire'
+			act 'Further': gt $curloc
+			end
+		end
+	elseif KGOLklass = 4:
+	!жрец
+		act 'Attack':
+		cla
+		KGOLpower = KGOLintel + KGOLwpower
+		dynamic $KGOLatk
+		act 'Further': gt $curloc
+		end
+	elseif KGOLklass = 5:
+	!лучник
+		act 'Attack':
+		cla
+		KGOLpower = KGOLspeed + KGOLwpower
+		dynamic $KGOLatk
+		act 'Further': gt $curloc
+		end
+	else
+	!варвар
+		if KGOLdist < 2:
+		act 'Attack':
+			cla
+			KGOLpower = KGOLstren + KGOLwpower
+			dynamic $KGOLatk
+			act 'Further': gt $curloc
+			end
+		end
+	end
+
+	if KGOLdist > 0:
+		act 'Flee to the enemy':
+		KGOLdist -= RAND(KGOLspeed/20, KGOLspeed/10)
+		gt $curloc
+		end
+	end
+
+	act 'Flee from the enemy':
+	KGOLdist += RAND(KGOLspeed/20, KGOLspeed/10)
+	gt $curloc
+	end
+
+	if KGOLpotionH > 0:
+		act 'Drink a health potion':
+		KGOLpotionH -= 1
+		KGHP += 100
+		gt $curloc
+		end
+	end
+
+	if KGOLpotionM > 0:
+		act 'Drink the potion manna':
+		KGOLpotionM -= 1
+		KGManna += 100
+		gt $curloc
+		end
+	end
+else
+'Now opponents'
+	if KGOLdist <= KGOLneedDist:
+	'<<$KGname>> attacks you'
+	dynamic $KGOLatkV
+	else
+	KGOLdist -= RAND(KGOLspeedV/20, KGOLspeedV/10)
+	'<<$KGname>> running toward you'
+	end
+
+	act 'Further': gt $curloc
+end
+--- KGOLfight ---------------------------------
+

+ 296 - 0
locations/KGOLgame

@@ -0,0 +1,296 @@
+# KGOLgame
+minut += 1
+gs 'stat'
+if KGOLset = 0:$KGOLset = 'On the head there is nothing'
+if KGOLset2 = 0:$KGOLset2 = 'Body simple clothes'
+if KGOLset3 = 0:$KGOLset3 = 'Simple shoes on his feet'
+if KGOLset4 = 0:$KGOLset4 = 'No gloves on hands'
+if KGOLset5 = 0:$KGOLset5 = 'No weapon'
+$KGOLstat = {
+clr
+pl '<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'
+pl '<a href="exec:dynamic $KGOLstat2 ">Close Statistics</a>'
+if KGOLneedExp > 0: pl 'Total experiment <<KGOLexp>>, it is necessary to next level <<KGOLneedExp>> experience'
+if KGOLneedExp <= 0: pl '<a href="exec:dynamic $KGOLrise "><font color = red>You need to increase the level.</font></a>'
+pl 'Power <<KGOLstren>>, speed and evasion <<KGOLspeed>>, endurance <<KGOLvital>>Intelligence <<KGOLintel>>, armor protection <<KGOLbrona>>, the bonus damage from weapons <<KGOLwpower>>'
+nl
+pl '<center>Exodus</center>'
+pl '<<$KGOLset>>'
+pl '<<$KGOLset2>>'
+pl '<<$KGOLset3>>'
+pl '<<$KGOLset4>>'
+pl '<<$KGOLset5>>'
+nl
+pl '<center>Equipment</center>'
+if KGOLpotionH > 0: pl 'Health potions <<KGOLpotionH>> pieces. <a href="exec:KGOLpotionH -= 1 & KGHP += 100 & gs ''stat''&gt $curloc "><font color = red>Drink.</font></a>'
+if KGOLpotionM > 0: pl 'Mana potions <<KGOLpotionM>> pieces. <a href="exec:KGOLpotionM -= 1 & KGManna += 100 & gs ''stat''&gt $curloc "><font color = red>Drink.</font></a>'
+
+pl '<center>PVE</center>'
+pl 'Ratio <<KGOLWin>>, losses <<KGOLLoss>>'
+pl '<center>PVP</center>'
+pl 'Ratio <<KGOLpvpWin>>, losses <<KGOLpvpLoss>>'
+}
+$KGOLstat2 = {
+gs 'stat'
+}
+KGHPMAX = KGOLvital * 10
+KGMannaMax = KGOLintel * 10
+if KGHP > KGHPMAX: KGHP = KGHPMAX
+if KGManna > KGMannaMax: KGManna = KGMannaMax
+KGOLbrona -= KGOLbronaMod
+KGOLbronaMod = 0
+KGOLstren -= KGOLstrenMod
+KGOLstrenMod = 0
+KGOLspeed -= KGOLspeedMod
+KGOLspeedMod = 0
+KGOLvital -= KGOLvitalMod
+KGOLvitalMod = 0
+KGOLintel -= KGOLintelMod
+KGOLintelMod = 0
+KGOLwpower -= KGOLwpowerMod
+KGOLwpowerMod = 0
+KGOLcooldown = 0
+
+if KGHP < KGHPMAX and KGOLhirka > 0:
+kghneed = KGHPMAX - KGHP
+	if KGOLhirka >= kghneed:
+	KGOLhirka -= kghneed
+	KGHP = KGHPMAX
+	else
+	KGHP = KGOLhirka
+	KGOLhirka = 0
+	end
+end
+if KGHP < 0: KGHP = 0
+
+gs 'KGOLexpa'
+'<a href="exec:GT ''KGstart''">Get out of the game</a>'
+'<a href="exec:dynamic $KGOLstat ">View Statistics</a>'
+'<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'
+'Life <<KGHP>>, the manna <<KGManna>>'
+if KGHP < KGHPMAX: 'You´ve got <<KGHP*100/KGHPMAX>>% of life'
+if KGManna < KGMannaMax: 'You´ve got <<KGManna*100/KGMannaMax>>% of manna'
+if KGOLhirka > 0: 'Hirka can restore automatically <<KGOLhirka>> health units'
+if KGOLPrizeM > 0: 'You have <<KGOLmoney>> coins'
+if KGOLneedExp <= 0: '<a href="exec: dynamic $KGOLrise "><font color = red>You need to increase the level.</font></a>'
+if KGOLpoint > 0: '<a href="exec: dynamic $KGOLrise "><font color = red>You have not allocated skill points.</font></a>'
+if KGOLspellpoint >= 4: '<a href="exec: dynamic $KGOLrise2 "><font color = red>You can choose your skill.</font></a>'
+'<<KGOLspellpoint>>'
+''
+
+'<center><B>Countryside</B></center>'
+'You are in the picturesque village where to spawn characters stand motionless. NPC standing pillars and in the distance one can see the monsters.'
+
+act 'Approach the NPC':
+cls
+minut += 1
+	if KGOLmqw = 12 and KGOLlvl >= 5:
+	KGOLmqw = 13
+	'(NPS) - <<$KGOLname>> you need to kill the royal 10t beetles. Reward 200 experience.'
+	end
+
+	if KGOLmqw = 13 and KGOLqwvip >= 10:
+	KGOLqwvip = 0
+	KGOLmqw = 14
+	KGOLexp += 200
+	'(NPS) - <<$KGOLname>> congratulations, that´s a reward of 200 experience.'
+	end
+
+	if KGOLmqw = 10 and KGOLlvl >= 5:
+	KGOLmqw = 11
+	'(NPS) - <<$KGOLname>> you need to kill toads 10t. Reward 100 experience.'
+	end
+
+	if KGOLmqw = 11 and KGOLqwvip >= 10:
+	KGOLqwvip = 0
+	KGOLmqw = 12
+	KGOLexp += 100
+	'(NPS) - <<$KGOLname>> congratulations, that´s a reward of 100 experience.'
+	end
+
+	if KGOLmqw = 8:
+	KGOLmqw = 9
+	'(NPS) - <<$KGOLname>> you need to kill 30t young cacti. Then I´ll give you a helmet.'
+	end
+
+	if KGOLmqw = 9 and KGOLqwvip >= 30:
+	KGOLqwvip = 0
+	KGOLmqw = 10
+	KGOLset = 1
+	KGOLbrona += 2
+	$KGOLset = 'Helm of rough skin'
+	'(NPS) - <<$KGOLname>> congratulations, here´s your helmet.'
+	end
+
+	if KGOLmqw = 6:
+	KGOLmqw = 7
+	'(NPS) - <<$KGOLname>> you need to kill wolves 25t toothless. Then I´ll give you mittens.'
+	end
+
+	if KGOLmqw = 7 and KGOLqwvip >= 25:
+	KGOLqwvip = 0
+	KGOLmqw = 8
+	KGOLset4 = 1
+	KGOLbrona += 2
+	$KGOLset4 = 'Gauntlets of rough skin'
+	'(NPS) - <<$KGOLname>> congratulations, here´s your mittens.'
+	end
+
+	if KGOLmqw = 4:
+	KGOLmqw = 5
+	'(NPS) - <<$KGOLname>> you need to kill 20t sundews. Then I will give you boots.'
+	end
+
+	if KGOLmqw = 5 and KGOLqwvip >= 20:
+	KGOLqwvip = 0
+	KGOLmqw = 6
+	KGOLset3 = 1
+	KGOLbrona += 2
+	$KGOLset3 = 'Rugged Leather Boots'
+	'(NPS) - <<$KGOLname>> congratulations, here are your boots.'
+	end
+
+	if KGOLmqw = 2:
+	KGOLmqw = 3
+	'(NPS) - <<$KGOLname>> you need to kill 10t rainbow beetles. Then I will give you armor.'
+	end
+
+	if KGOLmqw = 3 and KGOLqwvip >= 10:
+	KGOLqwvip = 0
+	KGOLmqw = 4
+	KGOLset2 = 1
+	KGOLbrona += 10
+	$KGOLset2 = 'Simple armor'
+	'(NPS) - <<$KGOLname>> congratulations, here´s your armor.'
+	end
+
+	if KGOLmqw = 0:
+	KGOLmqw = 1
+	'(NPS) - <<$KGOLname>> you need to kill prey 5t colors. Then I´ll give you a weapon.'
+	end
+
+	if KGOLmqw = 1 and KGOLqwvip >= 5:
+	KGOLqwvip = 0
+	KGOLmqw = 2
+	KGOLset5 = 1
+	KGOLwpower = 10
+	if KGOLklass = 1 or KGOLklass = 6:$KGOLset5 = 'In the hands of a simple sword'
+	if KGOLklass = 2:$KGOLset5 = 'In the hands of ordinary daggers'
+	if KGOLklass = 3 or KGOLklass = 4:$KGOLset5 = 'In the hands of a simple staff'
+	if KGOLklass = 5:$KGOLset5 = 'In the hands of a simple bow'
+	'(NPS) - <<$KGOLname>> congratulations, here´s your gun.'
+	end
+act 'Leave': gt $curloc
+end
+
+act 'Go to the store':
+cls
+minut += 1
+	if KGOLmoney >= 300:
+		act 'Buy health potion 300':
+		KGOLmoney -= 300
+		KGOLpotionH += 1
+		gt $curloc
+		end
+	end
+	if KGOLmoney >= 300:
+		act 'Buy a potion of mana 300':
+		KGOLmoney -= 300
+		KGOLpotionM += 1
+		gt $curloc
+		end
+	end
+	if KGOLmoney >= 1500 and KGOLhirka <= 0:
+		act 'Buy hirka 1500':
+		KGOLmoney -= 1500
+		KGOLhirka += 10000
+		gt $curloc
+		end
+	end
+act 'Leave': gt $curloc
+end
+
+if KGHP < KGHPMAX or KGManna<KGMannaMax:
+	act 'Regenerate (1:00)':
+	cls
+	minut += 60
+	KGHP = KGHPMAX
+	KGManna = KGMannaMax
+	'It was very sad. You´ve been sitting for an hour to regenerate your character. But free.'
+	act 'Leave': gt $curloc
+	end
+end
+
+if KGHP > 0:
+	act 'Farm near the village':
+	cls
+	minut += 1
+	KGOLdist = RAND(1,10)
+	'On a variety of monsters roam the field'
+		act 'Predatory flower':
+		gs 'KGOLenemy','0'
+		gt 'KGOLfight'
+		end
+
+		act 'Iridescent beetle':
+		gs 'KGOLenemy','1'
+		gt 'KGOLfight'
+		end
+
+		act 'Sundew':
+		gs 'KGOLenemy','2'
+		gt 'KGOLfight'
+		end
+
+		act 'Toothless dog':
+		gs 'KGOLenemy','3'
+		gt 'KGOLfight'
+		end
+
+		act 'Young cactus':
+		gs 'KGOLenemy','4'
+		gt 'KGOLfight'
+		end
+	end
+end
+
+if KGOLlvl >= 5 and KGHP > 0:
+	act 'Farm near the mill':
+	cls
+	minut += 1
+	KGOLdist = RAND(1,10)
+	'Mill about a variety of monsters roam'
+		act 'Toad':
+		gs 'KGOLenemy','5'
+		gt 'KGOLfight'
+		end
+
+		act 'Royal beetle':
+		gs 'KGOLenemy','6'
+		gt 'KGOLfight'
+		end
+
+		act 'Spotted mantis':
+		gs 'KGOLenemy','7'
+		gt 'KGOLfight'
+		end
+
+		act 'Plague Rat':
+		gs 'KGOLenemy','8'
+		gt 'KGOLfight'
+		end
+
+		act 'Prickly cactus':
+		gs 'KGOLenemy','9'
+		gt 'KGOLfight'
+		end
+	end
+
+	act 'Boss Level 5':
+	gs 'KGOLboss','1'
+	gt 'KGOLfight'
+	end
+
+end
+--- KGOLgame ---------------------------------
+

+ 1080 - 0
locations/KGZdyn

@@ -0,0 +1,1080 @@
+# KGZdyn
+
+if KGZweapon = 0:$KGZweapon = 'Fists' & $KGZweapona = 'Fist'
+if KGZweapon = 1:$KGZweapon = 'Baton' & $KGZweapona = 'Shillelagh'
+if KGZweapon = 2:$KGZweapon = 'Ax' & $KGZweapona = 'Ax'
+if KGZgun > 0:$KGZgun = 'Pistol, cartridges <<bullet>>piece'
+if KGZgun2 > 0:$KGZgun2 = 'Shotgun cartridges <<bullet2>>piece'
+if KGZgun3 > 0:$KGZgun3 = 'Automatic, cartridges <<bullet3>>piece'
+
+if KGZhour >= 24:
+KGZhour -= 24
+KGZday += 1
+	if KGZsup = 0:
+	KGZHP -= 10
+	else
+	KGZsup -= 1
+	end
+
+end
+
+
+
+$KGZvihod = {
+if KGZweapon = 0: KGZweapon = 1 & 'You found a good cudgel lying on the pavement and took her'
+	act 'Go to the apartment':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 0
+	KGZbatl = 0
+	'You went to the apartment carefully trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the store':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 2
+	KGZbatl = 0
+	'You cautiously went to the store with smashed storefronts trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the hospital':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 3
+	KGZbatl = 0
+	'You went to the hospital carefully, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the boulevard':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 4
+	KGZbatl = 0
+	'You gingerly walked down the street, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod2 = {
+	act 'Go to the street':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 1
+	KGZbatl = 0
+	'You carefully went into the street trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search provisions':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+	'Noiselessly you started searching the store looking for food.'
+	KGZsupoisk = RAND(0,100)
+		if KGZsupoisk = 100:
+		KGZsup += 1
+		'You found enough food to stretch another day.'
+		elseif KGZday<KGZsupoisk:
+		KGZsup += 1
+		'You found enough food to stretch another day.'
+		else
+		'You are not able to find anything edible, all that you have found rotten and no good for eating.'
+		end
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod3 = {
+	act 'Go to the street':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 1
+	KGZbatl = 0
+	'You carefully went into the street trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search kits':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+	'Noiselessly you started searching the hospital looking kit.'
+	KGZsupoisk = RAND(0,100)
+		if KGZsupoisk = 100:
+		KGZmedkit += 1
+		'You have found a first aid kit.'
+		elseif KGZday<KGZsupoisk:
+		KGZmedkit += 1
+		'You have found a first aid kit.'
+		else
+		'You are not able to find anything useful.'
+		end
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod4 = {
+	act 'Go to the street to the side of his house':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 1
+	KGZbatl = 0
+	'You carefully went into the street trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the hunting store':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 5
+	KGZbatl = 0
+	'You carefully went hunting store trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the police station':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 6
+	KGZbatl = 0
+	'You cautiously went to the police station trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the hardware store':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 7
+	KGZbatl = 0
+	'You cautiously went to the hardware store trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZcopcar = 0:
+		act 'Search the police car':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		!KGZplace = 2
+		KGZbatl = 1
+		KGZcopcar = 1
+		'Noiselessly you started searching the police car.'
+		if KGZgun = 0: KGZgun = 1 & 'You have found a pistol'
+		bullet += 10
+		'You found 10t ammunition for the gun.'
+		act 'Further': gt $curloc
+		end
+	end
+
+	act 'Go on the highway':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 8
+	KGZbatl = 0
+	'You cautiously walked towards the highway trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+}
+
+$KGZvihod5 = {
+	act 'Leave the store':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 4
+	KGZbatl = 0
+	'You carefully went into the street trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search salesroom':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+	'Noiselessly you started searching the hunting store.'
+	if KGZgun2 = 0: KGZgun2 = 1 & 'You found a shotgun'
+	bulletrand = RAND(3,20)
+	bullet2 += bulletrand
+	'You have found <<bulletrand>>to be shotgun cartridges.'
+	act 'Further': gt $curloc
+	end
+
+}
+
+$KGZvihod6 = {
+	act 'Get Outside':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 4
+	KGZbatl = 0
+	'You carefully went into the street trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search the police station':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+	'Noiselessly you started searching the police station.'
+	if KGZgun = 0: KGZgun = 1 & 'You have found a pistol'
+	bulletrand = RAND(3,20)
+	bullet += bulletrand
+	'You have found <<bulletrand>>be ammo for the gun.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZcopdoor = 0:
+	'Armed room is locked on a massive iron door which can be opened only grinder, but the trouble is, there is no electricity.'
+		if KGZgenerator > 0 and KGZbenzin > 0 and KGZbolgarka > 0:
+			act 'Uncover grinder armed room':
+			cls
+			KGZhour += 1
+			minut += 1
+			gs 'stat'
+			KGZcopdoor = 1
+			KGZbatl = 0
+			'Noiselessly you started searching the police station.'
+			if KGZgun3 = 0: KGZgun3 = 1 & 'You found Machine'
+			bullet3 += 500
+			'You have found 500 tons of ammunition for machine.'
+			KGZdead = KGZday * 10
+			'The noise from the grinder ran dead and attacked you.'
+			act 'Srazhatsya': KGZdist = RAND(5,8)&gt 'KGZfight'
+			end
+		end
+	end
+
+	if KGZcopdoor = 1:
+	'Armory room is empty, just a bunch of dead on the floor, according to a recent fight with you.'
+		if KGZratia = 0:
+			act 'Pick up radio':
+			cls
+			KGZhour += 1
+			minut += 1
+			gs 'stat'
+			KGZratia = 1
+			KGZbatl = 1
+			'You have found a radio. Including it you heard the voice repeating the same phrase. "Everyone who hears me. Safe Haven is 10m kilometer highway. Go to Fort Bragg."'
+			act 'Further': gt $curloc
+			end
+		end
+	end
+
+}
+$KGZvihod7 = {
+	act 'Get Outside':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 4
+	KGZbatl = 0
+	'You carefully went into the street trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search the store':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+	'Noiselessly you started searching the hardware store.'
+		if KGZweapon < 2:
+		KGZweapon = 2
+		'You found an ax'
+		act 'Further': gt $curloc
+		exit
+		end
+
+		if KGZgenerator = 0:
+		KGZgenerator = 1
+		'You found refillable portable generator gasoline.'
+		act 'Further': gt $curloc
+		exit
+		end
+
+		if KGZbolgarka = 0:
+		KGZbolgarka = 1
+		'You found grinder is powered by electricity.'
+		act 'Further': gt $curloc
+		exit
+		end
+	'You did not find anything useful.'
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod8 = {
+	act 'Exit at Boulevard':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 4
+	KGZbatl = 0
+	'You went to the boulevard carefully trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the gas station':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 9
+	KGZbatl = 0
+	'Noiselessly you went to the gas station.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZratia > 0:
+		act 'Go in the direction of Fort Bragg':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZplace = 10
+		KGZplaceA = 1
+		KGZbatl = 0
+		'Noiselessly you went toward Fort Bragg.'
+		act 'Further': gt $curloc
+		end
+	end
+
+}
+$KGZvihod9 = {
+	act 'Exit the highway':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 8
+	KGZbatl = 0
+	'You went to the highway carefully, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZbenzin = 0:
+		act 'Pour gasoline':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZbenzin = 1
+		KGZbatl = 0
+		'Noiselessly you poured gasoline from the column.'
+		act 'Further': gt $curloc
+		end
+	end
+
+}
+$KGZvihod10 = {
+if KGZplaceA < 10:$KGZplaceA = 'Fort Bragg' & $KGZplaceB = 'from the city'
+if KGZplaceA > 10:$KGZplaceA = 'from the city' & $KGZplaceB = 'Fort Bragg'
+	act 'Go in the direction <<$KGZplaceA>>':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplaceA += 1
+	KGZbatl = 0
+	'You went to the highway carefully, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go in the direction <<$KGZplaceB>>':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplaceA -= 1
+	KGZbatl = 0
+	'You went to the highway carefully, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZplaceA > 10:
+		act 'Go to the forest':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZbatl = 0
+		KGZplace = 200
+		'You have gone off the highway into the woods.'
+		act 'Further': gt $curloc
+		end
+
+	end
+
+}
+$KGZvihod11 = {
+if KGZfortQW = 0: 'From the roof of a shot is fired with a sniper rifle.'
+if KGZfortQW = 0: 'The man on the roof screaming you. "Fort Bragg fell. I stayed living person. Save me. Ammo I end, and ghouls and climb."'
+	act 'Probivatsya the roof':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	if KGZfortQW = 0: KGZfortQW = 1
+	KGZplace = 12
+	KGZbatl = 0
+	KGZdead = RAND(KGZday * 20, KGZday * 30)
+	'You ran into a fort surrounded on all sides dead.'
+	act 'Srazhatsya': KGZdist = RAND(5,12)&gt 'KGZfight'
+	end
+
+	act 'Go to the side of the highway (the side leading to the city)':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplaceA = 9
+	KGZplace = 10
+	KGZbatl = 0
+	'You went to the highway carefully, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the side of the highway (leading side of the city)':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplaceA = 11
+	KGZplace = 10
+	KGZbatl = 0
+	'You went to the highway carefully, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZfortQW = 2:
+		act 'Probivatsya on food warehouse':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZplace = 13
+		KGZbatl = 0
+		KGZdead = RAND(KGZday * 20, KGZday * 30)
+		'You ran to the warehouse surrounded on all sides dead.'
+		act 'Srazhatsya': KGZdist = RAND(5,12)&gt 'KGZfight'
+		end
+
+		act 'Probivatsya infirmary':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZplace = 14
+		KGZbatl = 0
+		KGZdead = RAND(KGZday * 20, KGZday * 30)
+		'You ran into the hospital surrounded on all sides dead.'
+		act 'Srazhatsya': KGZdist = RAND(5,12)&gt 'KGZfight'
+		end
+
+		act 'Probivatsya armory':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZplace = 15
+		KGZbatl = 0
+		KGZdead = RAND(KGZday * 20, KGZday * 30)
+		'You ran into the hospital surrounded on all sides dead.'
+		act 'Srazhatsya': KGZdist = RAND(5,12)&gt 'KGZfight'
+		end
+
+		act 'Probivatsya in garage':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZplace = 16
+		KGZbatl = 0
+		KGZdead = RAND(KGZday * 20, KGZday * 30)
+		'You ran into the hospital surrounded on all sides dead.'
+		act 'Srazhatsya': KGZdist = RAND(5,12)&gt 'KGZfight'
+		end
+
+	end
+
+}
+
+$KGZvihod13 = {
+	act 'Exit at Fort Bragg':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 11
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search the warehouse':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+	'Noiselessly you started searching the dark warehouse.'
+	udacharand = RAND(0,1)
+		if udacharand = 1:
+		KGZsuprand = RAND(1,3)
+		KGZsup += KGZsuprand
+		'You have found the diet <<KGZsuprand>> days'
+		end
+		if udacharand = 0:
+		KGZdead = RAND(KGZday * 5, KGZday * 10)
+		'On the box seemed barely visible in the dark and dead with uterine howling toward you.'
+		act 'Srazhatsya': KGZdist = RAND(5,10)&gt 'KGZfight'
+		exit
+		end
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod14 = {
+	act 'Exit at Fort Bragg':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 11
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search the infirmary':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+	'Noiselessly you started searching the dark infirmary.'
+	udacharand = RAND(0,1)
+		if udacharand = 1:
+		KGZmedkit += 1
+		'You have found a first aid kit'
+		end
+		if udacharand = 0:
+		KGZdead = RAND(KGZday * 5, KGZday * 10)
+		'On the box seemed barely visible in the dark and dead with uterine howling toward you.'
+		act 'Srazhatsya': KGZdist = RAND(5,10)&gt 'KGZfight'
+		exit
+		end
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod15 = {
+	act 'Exit at Fort Bragg':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 11
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Search armory':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	!KGZplace = 2
+	KGZbatl = 0
+		if KGZfortOru = 1:
+		'In Munitions nothing useful.'
+		end
+		if KGZfortOru = 0:
+		KGZfortOru = 1
+		'In Munitions you find ammunition for machine 300 pieces and 10 grenades.'
+		KGZgranade += 10
+		bullet3 += 300
+		end
+	'.'
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod16 = {
+	act 'Exit at Fort Bragg':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 11
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZgruzovik = 0:
+		act 'Climb into the truck':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		!KGZplace = 2
+		KGZbatl = 0
+			if KGZgruzBenz = 1:
+			'You sat in the cab on the driver´s seat and brought the truck.'
+				act 'Go':
+				cls
+				'Truck uterine growled jumped into the courtyard of the fort where a crowd had gathered the dead, you go to cut into the crowd and began to push the ghouls, the engine speed drops, the engine roared overwrought gliding over crushed bodies, dead hands clung to the cabin. Some ghouls hung on the cabin in the mirror was clear that the body you have climbed too dead. Gate to the fort closed and they have to knock.'
+					act 'Clear the gate':
+					cls
+					'You disperse truck hit the gate of the fort. You strongly shaken and rattled the gate collapsed. Something like a truck drove out of the courtyard of the fort on the highway clogged.'
+						act 'Drive along the highway into town':
+						cls
+						KGZgruzovik = 1
+						KGZplace = 10
+						KGZplaceA = 9
+						'Your truck surrounded by a ring of the dead tried to clear the road of traffic jams. But you get stuck. There is no choice, already dead truck stuck like flies.'
+						KGZdead = RAND(KGZday * 50, KGZday * 100)
+						act 'Srazhatsya': KGZdist = RAND(5,10)&gt 'KGZfight'
+						end
+
+						act 'Ride on the highway out of town':
+						cls
+						KGZgruzovik = 2
+						KGZplace = 10
+						KGZplaceA = 11
+						'Your truck surrounded by a ring of the dead tried to clear the road of traffic jams. But you get stuck. There is no choice, already dead truck stuck like flies.'
+						KGZdead = RAND(KGZday * 50, KGZday * 100)
+						act 'Srazhatsya': KGZdist = RAND(5,10)&gt 'KGZfight'
+						end
+
+						act 'To go along the side of the city':
+						cls
+						KGZgruzovik = 3
+						KGZplace = 10
+						KGZplaceA = 7
+						'Your truck surrounded by a ring of the dead went on slippery roadside. When the truck crushed corpses wheel very punt and you still make a mistake, the truck slid into a ditch and overturned. There is no choice, already dead truck stuck like flies.'
+						KGZdead = RAND(KGZday * 50, KGZday * 100)
+						act 'Srazhatsya': KGZdist = RAND(5,10)&gt 'KGZfight'
+						end
+
+						act 'To go along the side of the city':
+						cls
+						KGZgruzovik = 4
+						KGZplace = 10
+						KGZplaceA = 13
+						'Your truck surrounded by a ring of the dead went on slippery roadside. When the truck crushed corpses wheel very punt and you still make a mistake, the truck slid into a ditch and overturned. There is no choice, already dead truck stuck like flies.'
+						KGZdead = RAND(KGZday * 50, KGZday * 100)
+						act 'Srazhatsya': KGZdist = RAND(5,10)&gt 'KGZfight'
+						end
+
+					end
+
+				end
+			end
+			if KGZgruzBenz = 0:
+			KGZgruzBenzMark = 1
+			'Heck, empty tank truck, standing next column, you only need to fill.'
+			end
+		act 'Get out of the cab': gt $curloc
+		end
+	end
+
+	if KGZgruzBenzMark = 1:
+		act 'Exit at Fort Bragg':
+		cls
+		KGZhour += 1
+		minut += 1
+		gs 'stat'
+		KGZbatl = 0
+		KGZgruzBenz = 1
+		'You carefully tucked truck gasoline.'
+		act 'Further': gt $curloc
+		end
+	end
+
+}
+
+
+$KGZvihod100 = {
+	act 'Wander through the dead city':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 100
+	'You went cautiously, trying not to stumble on the dead.'
+	KGZlocrand = RAND(0,100)
+		if KGZlocrand >= 90 and KGZlok = 0:
+		'You have found a solid house with iron bars on the windows'
+		KGZlok = 1
+		act 'Enter the house': KGZplace = 101 & gt $curloc
+		end
+		if KGZlocrand >= 80 and KGZlok2 = 0:
+		KGZlok2 = 1
+		'You find a large supermarket where when it sold a variety of goods'
+		act 'Sign in to supermarket': KGZplace = 102 & gt $curloc
+		end
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the side of the highway':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplaceA = 19
+	KGZplace = 10
+	KGZbatl = 0
+	'You went to the highway carefully, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	if KGZlok = 1: act 'Enter the house': KGZhour += 1 & KGZplace = 101 & gt $curloc
+
+	if KGZlok2 = 1: act 'Sign in to supermarket': KGZhour += 1 & KGZplace = 102 & gt $curloc
+
+}
+$KGZvihod102 = {
+	act 'Get out of the supermarket':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 100
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Scour supermarket':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	'You gently started to fumble in search of useful, trying not to stumble on the dead.'
+	udarand = RAND(0,100)
+		if udarand >= 90:
+		tiprand = RAND(0,1)
+		if tiprand = 0: KGZsup += 1 & 'You are lucky and you find food'
+		if tiprand = 1: KGZmedkit += 1 & 'You are lucky and you find a first aid kit'
+		end
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod200 = {
+	act 'Walk through the woods to the highway':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 10
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Walk through the woods from the highway':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 201
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvihod201 = {
+	act 'Go to the forest':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 200
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+	act 'Go to the farmhouse':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZbatl = 0
+	KGZplace = 202
+	'You went cautiously, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+}
+$KGZvincent = {
+cls
+if KGZfortQW = 1: KGZfortQW = 2
+'The fort has arsenal and warehouse with food, hospital and garage with trucks. But a lot of dead, really a lot. Several soldiers tried to break but died. Some tried to use flamethrowers, but still dead burn, they manage to reach the man and the end. From the fort should leave as soon as possible.'
+
+act 'Further': gt $curloc
+}
+$KGZfizatk = {
+if KGZweapon = 0:
+KGZuspeh = RAND(0,100)
+	if KGZuspeh <= 30:
+	KGZdead -= 1
+	'You were very good ghouls fist on the head and he fell stopping moves.'
+	else
+	'Ghoul irreversible no attention to your punch.'
+	end
+end
+if KGZweapon = 1:
+KGZuspeh = RAND(0,100)
+	if KGZuspeh <= 50:
+	KGZdead -= 1
+	'You were very good ghouls club head and he fell stopping moves.'
+	else
+	'Ghoul irreversible no attention to your clubbing.'
+	end
+end
+if KGZweapon = 2:
+KGZuspeh = RAND(0,100)
+	if KGZuspeh <= 70:
+	KGZdead -= 1
+	'You were very good ghouls ax on the head and he fell stopping moves.'
+	else
+	'Ghoul irreversible no attention to your ax blow.'
+	end
+end
+if KGZdead > 0:
+'<<KGZdead>> dead clutching at you, trying to tear.'
+kgzuron = RAND(KGZdead * 2, KGZdead * 5)
+KGZHP -= kgzuron
+'<B><font color = red>you have caused damage <<kgzuron>> units.</font></B>'
+end
+}
+$KGZgunatk = {
+KGZuspeh = RAND(0,100)
+	if KGZdist <= 5:
+		if KGZuspeh <= 90:
+		KGZdead -= 1
+		'You put a bullet in his head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	elseif KGZdist <= 10:
+		if KGZuspeh <= 80:
+		KGZdead -= 1
+		'You put a bullet in his head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	else
+		if KGZuspeh <= 70:
+		KGZdead -= 1
+		'You put a bullet in his head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	end
+}
+$KGZgunatk2 = {
+KGZuspeh = RAND(0,100)
+	if KGZdist <= 5:
+		if KGZuspeh <= 100:
+		KGZdead -= 1
+		'You have thrust the charge shot in the head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	elseif KGZdist <= 10:
+		if KGZuspeh <= 70:
+		KGZdead -= 1
+		'You have thrust the charge shot in the head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	else
+		if KGZuspeh <= 50:
+		KGZdead -= 1
+		'You have thrust the charge shot in the head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	end
+}
+$KGZgunatk3 = {
+KGZuspeh = RAND(0,100)
+	if KGZdist <= 5:
+		if KGZuspeh <= 70:
+		KGZdead -= 1
+		'You put a bullet in his head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	elseif KGZdist <= 10:
+		if KGZuspeh <= 95:
+		KGZdead -= 1
+		'You put a bullet in his head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	else
+		if KGZuspeh <= 85:
+		KGZdead -= 1
+		'You put a bullet in his head and he fell ghoul stopping moves.'
+		else
+		'You hit the dead.'
+		end
+	end
+}
+$KGZgunatk4 = {
+:KGZmarkgun
+KGZbulgun -= 1
+KGZuspeh = RAND(0,100)
+	if KGZdead > 0:
+		if KGZdist <= 5:
+			if KGZuspeh <= 80:
+			KGZdead -= 1
+			'You put a bullet in his head and he fell ghoul stopping moves.'
+			else
+			'You hit the dead.'
+			end
+		elseif KGZdist <= 10:
+			if KGZuspeh <= 70:
+			KGZdead -= 1
+			'You put a bullet in his head and he fell ghoul stopping moves.'
+			else
+			'You hit the dead.'
+			end
+		else
+			if KGZuspeh <= 60:
+			KGZdead -= 1
+			'You put a bullet in his head and he fell ghoul stopping moves.'
+			else
+			'You hit the dead.'
+			end
+		end
+	end
+if KGZbulgun > 0: jump 'KGZmarkgun'
+}
+$KGZgunatk5 = {
+:KGZmarkgunb
+KGZbulgun -= 1
+KGZuspeh = RAND(0,100)
+	if KGZdead > 0:
+		if KGZdist <= 5:
+			if KGZuspeh <= 70:
+			KGZdead -= 1
+			'You put a bullet in his head and he fell ghoul stopping moves.'
+			else
+			'You hit the dead.'
+			end
+		elseif KGZdist <= 10:
+			if KGZuspeh <= 60:
+			KGZdead -= 1
+			'You put a bullet in his head and he fell ghoul stopping moves.'
+			else
+			'You hit the dead.'
+			end
+		else
+			if KGZuspeh <= 50:
+			KGZdead -= 1
+			'You put a bullet in his head and he fell ghoul stopping moves.'
+			else
+			'You hit the dead.'
+			end
+		end
+	end
+if KGZbulgun > 0: jump 'KGZmarkgunb'
+}
+$KGZdeadmanatk = {
+if KGZdist > 0: KGZdist -= 1
+if KGZdead > 0 and KGZdist <= 2:
+'<<KGZdead>> dead clutching at you, trying to tear.'
+kgzuron = RAND(KGZdead * 2, KGZdead * 5)
+KGZHP -= kgzuron
+'<B><font color = red>you have caused damage <<kgzuron>> units.</font></B>'
+elseif KGZdist > 2 and KGZdead > 0:
+'<<KGZdead>> The Dead wheezing and limping approach you.'
+end
+
+}
+
+$KGZgranatk = {
+KGZuspeh = RAND(0,100)
+KGZgranade -= 1
+'You threw a grenade into the Dead'
+	if KGZdist <= 5:
+	'Powerful explosion threw the dead in different directions'
+	KGZdist += RAND(1,5)
+	KGZdead -= RAND(5,20)
+	KGZHP -= RAND(5,20)
+	'You hurt by a grenade'
+	elseif KGZdist <= 10:
+	'Powerful explosion threw the dead in different directions'
+	KGZdist += RAND(1,3)
+	KGZdead -= RAND(3,10)
+	else
+		if KGZuspeh <= 5:
+		KGZdead -= 1
+		'You put a bullet in his head and he fell ghoul stopping moves.'
+		else
+		'You do not dokinuli grenade and it exploded harmlessly.'
+		end
+	end
+}
+--- KGZdyn ---------------------------------
+

+ 142 - 0
locations/KGZfight

@@ -0,0 +1,142 @@
+# KGZfight
+minut += 1
+gs 'stat'
+gs 'KGZdyn'
+
+if KGZHP <= 0:
+cla
+*clr
+manna -= 100
+'<center><B>GAME OVER</B></center>'
+act 'Quit Game': gt 'KGZstart'
+exit
+end
+
+if KGZdead <= 0:
+cls
+KGZbatl = 1
+manna += 100
+'All the dead were silent on the ground.'
+act 'Leave': gt 'KGZgame'
+exit
+end
+if GZdist < 0: GZdist = 0
+
+!'<a href="exec:GT ''KGZstart''">Get out of the game</a>'
+'Health <<KGZHP>>. Day <<KGZday>>, h <<KGZhour>>.'
+'Edged weapons: <<$KGZweapon>>'
+if KGZgun > 0: '<<$KGZgun>>'
+if KGZgun2 > 0: '<<$KGZgun2>>'
+if KGZgun3 > 0: '<<$KGZgun3>>'
+'To you run <<KGZdead>> dead. They are at a distance <<KGZdist>> meters.'
+
+if KGZdost = 1:
+'Vincent fires a rifle.'
+KGZdead -= 1
+'One of the dead falls with prostrelyanny head.'
+	if KGZdead <= 0: gt $curloc
+end
+
+if KGZgun > 0 and bullet > 0:
+	act 'Shoot a gun':
+	cls
+	bullet -= 1
+	dynamic $KGZgunatk
+	dynamic $KGZdeadmanatk
+	act 'Further': gt $curloc
+	end
+end
+
+if KGZgun2 > 0 and bullet2 > 0:
+	act 'Shoot a shotgun':
+	cls
+	bullet2 -= 1
+	dynamic $KGZgunatk2
+	dynamic $KGZdeadmanatk
+	act 'Further': gt $curloc
+	end
+end
+
+if KGZgun3 > 0 and bullet3 > 0:
+	act 'Shoot a machine gun (single)':
+	cls
+	bullet3 -= 1
+	dynamic $KGZgunatk3
+	dynamic $KGZdeadmanatk
+	act 'Further': gt $curloc
+	end
+
+	if bullet3 >= 3:
+		act 'Shoot a machine gun (short burst)':
+		cls
+		bullet3 -= 3
+		KGZbulgun = 3
+		dynamic $KGZgunatk4
+		dynamic $KGZdeadmanatk
+		act 'Further': gt $curloc
+		end
+	end
+
+	if bullet3 >= 10:
+		act 'Shoot a machine gun (long queue)':
+		cls
+		bullet3 -= 10
+		KGZbulgun = 10
+		dynamic $KGZgunatk5
+		dynamic $KGZdeadmanatk
+		act 'Further': gt $curloc
+		end
+	end
+end
+
+if KGZgranade > 0:
+	act 'Throw a grenade':
+	cls
+	dynamic $KGZgranatk
+	act 'Further': gt $curloc
+	end
+end
+
+if KGZdist <= 2:
+	act 'Strike <<$KGZweapona>>':
+	cls
+	dynamic $KGZfizatk
+	act 'Further': gt $curloc
+	end
+else
+	act 'Wait':
+	cls
+	KGZdist -= 1
+	gt $curloc
+	end
+
+	act 'Go to meet the dead':
+	cls
+	KGZdist -= 2
+	gt $curloc
+	end
+
+	act 'Scoot':
+	cls
+		if KGZdead >= 10:
+		KGZdist -= 5
+		'Dead too much and they surrounded you, you can not escape.'
+		act 'Fuck!': gt $curloc
+		else
+		KGZdedrandrun = RAND(0,1)
+			if KGZdedrandrun = 0:
+			KGZbatl = 1
+			'You managed to escape from the dead.'
+			act 'Leave': gt 'KGZgame'
+			end
+			if KGZdedrandrun = 1:
+			KGZdist -= 5
+			KGZdead += RAND(KGZdead, KGZdead * 5)
+			'You have stumbled upon other dead and now you have to fight with a lot of dead.'
+			act 'Fuck!': gt $curloc
+			end
+		end
+	end
+end
+--- KGZfight ---------------------------------
+

+ 635 - 0
locations/KGZgame

@@ -0,0 +1,635 @@
+# KGZgame
+minut += 1
+gs 'stat'
+gs 'KGZdyn'
+
+if KGZHP <= 0:
+cla
+*clr
+'<center><B>GAME OVER</B></center>'
+act 'Quit Game': gt 'KGZstart'
+exit
+end
+
+if KGZhour >= 6 and KGZhour <= 21:
+KGZsvet = 1
+else
+KGZsvet = 0
+end
+
+'<a href="exec:GT ''KGZstart''">Get out of the game</a>'
+'Health <<KGZHP>>. Day <<KGZday>>, h <<KGZhour>>.'
+if KGZsup <= 0: 'You have no provisions, you are starving!'
+'Edged weapons: <<$KGZweapon>>'
+if KGZgun > 0: '<<$KGZgun>>'
+if KGZgun2 > 0: '<<$KGZgun2>>'
+if KGZgun3 > 0: '<<$KGZgun3>>'
+if KGZgenerator > 0:
+if KGZbenzin = 0:$KGZbenzin = 'But the generator does not work because you do not have gasoline.'
+if KGZbenzin = 1:$KGZbenzin = 'You have filled a full tank of gasoline.'
+'Do you have a portable generator runs on gasoline. <<$KGZbenzin>>'
+end
+if KGZbolgarka > 0: 'Do you have a Bulgarian powered by electricity.'
+if KGZratia = 1: 'Do you have a radio.'
+''
+if KGZplace = 0:
+'<center><B>Apartment</B></center>'
+'Your apartment is a safe place. The apartment is stored provisions, which will be enough to <<KGZsup>> days'
+	if KGZmedkit > 0:
+	'First aid kits <<KGZmedkit>> pieces'
+		if KGZHP < 100:
+			act 'Treated':
+			cls
+			KGZhour += 1
+			KGZHP = 100
+			KGZmedkit -= 1
+			minut += 1
+			gs 'stat'
+			'You heal health through kits.'
+			act 'Further': gt $curloc
+			end
+		end
+	end
+
+	act 'Laze':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'
+	act 'Further': gt $curloc
+	end
+
+
+	act 'Leave the apartment':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 1
+	KGZbatl = 0
+	'You cautiously left the apartment trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+end
+
+if KGZplace = 1:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Street</B></center>'
+'On the street the broken machine, lie the corpses.'
+	if KGZbatl = 0:
+	'Roam the streets <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+			act 'Srazhatsya':
+				if KGZsvet = 1: KGZdist = RAND(5,30)
+				if KGZsvet = 2: KGZdist = RAND(3,10)
+			gt 'KGZfight'
+			end
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod
+	end
+
+end
+
+if KGZplace = 2:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Shop</B></center>'
+'In store stale air from spoiled food and dead.'
+	if KGZbatl = 0:
+	'Wander around the store <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+			act 'Srazhatsya':
+				if KGZsvet = 1: KGZdist = RAND(3,10)
+				if KGZsvet = 2: KGZdist = RAND(2,8)
+			gt 'KGZfight'
+			end
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod2
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod2
+	end
+
+end
+
+if KGZplace = 3:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Hospital</B></center>'
+'Hospital floor littered with papers and dead bodies of patients and physicians.'
+	if KGZbatl = 0:
+	'Wander around the hospital <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+			act 'Srazhatsya':
+				if KGZsvet = 1: KGZdist = RAND(3,10)
+				if KGZsvet = 2: KGZdist = RAND(2,8)
+			gt 'KGZfight'
+			end
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod3
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod3
+	end
+
+end
+
+if KGZplace = 4:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Boulevard</B></center>'
+'On the boulevard cluster of abandoned and wrecked cars everywhere corpses.'
+	if KGZbatl = 0:
+	'Wander along the boulevard <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+			act 'Srazhatsya':
+				if KGZsvet = 1: KGZdist = RAND(5,30)
+				if KGZsvet = 2: KGZdist = RAND(3,10)
+			gt 'KGZfight'
+			end
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod4
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod4
+	end
+
+end
+
+if KGZplace = 5:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Hunting Store</B></center>'
+'In hunting stores all counters are flipped, things scattered on the floor and something where visible decaying corpses.'
+	if KGZbatl = 0:
+	'Roam around the room <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,6)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod5
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod5
+	end
+
+end
+
+if KGZplace = 6:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Police station</B></center>'
+'At the police station the police corpses scattered on the floor, tables overturned and papers strewn all around.'
+	if KGZbatl = 0:
+	'Roam around the room <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,5)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod6
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod6
+	end
+
+end
+
+if KGZplace = 7:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Drugstore</B></center>'
+'In store everything upside down and smells mertvyachinoy.'
+	if KGZbatl = 0:
+	'Roam around the room <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,5)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod7
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod7
+	end
+
+end
+
+if KGZplace = 8:
+KGZdead = RAND(KGZday * 2, KGZday * 4)
+'<center><B>Route</B></center>'
+'On the highway, a huge traffic jam of abandoned cars, where there are some broken machines and the dead bodies.'
+	if KGZbatl = 0:
+	'Wander along the highway <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+			act 'Srazhatsya':
+				if KGZsvet = 1: KGZdist = RAND(5,30)
+				if KGZsvet = 2: KGZdist = RAND(3,10)
+			gt 'KGZfight'
+			end
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod8
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod8
+	end
+
+end
+
+if KGZplace = 9:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Threading</B></center>'
+'At the gas station is a pair of abandoned cars. No electricity and speakers only work in manual mode.'
+	if KGZbatl = 0:
+	'Roam around the room <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,5)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod9
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod9
+	end
+
+end
+
+if KGZplace = 10:
+KGZdead = RAND(KGZday * 5, KGZday * 10)
+	if KGZplaceA = 20: KGZplace = 100 & gt $curloc
+	if KGZplaceA = 10: KGZplace = 11 & gt $curloc
+	if KGZplaceA = 0: KGZplace = 8 & gt $curloc
+'<center><B>Highway in Fort Bragg</B></center>'
+'<center><B><<KGZplaceA>>th kilometer</B></center>'
+'On the highway are broken machines are corpses.'
+	if KGZbatl = 0:
+	'Wander along the highway <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+			act 'Srazhatsya':
+				if KGZsvet = 1: KGZdist = RAND(5,30)
+				if KGZsvet = 2: KGZdist = RAND(3,10)
+			gt 'KGZfight'
+			end
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod10
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod10
+	end
+
+end
+
+if KGZplace = 11:
+KGZdead = RAND(KGZday * 10, KGZday * 20)
+'<center><B>Fort Bragg</B></center>'
+'Fort Bragg is a small building surrounded by a fence.'
+	if KGZbatl = 0:
+	'Roam around the fort <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(3,10)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod11
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod11
+	end
+
+end
+
+if KGZplace = 12:
+if KGZdost = 0: KGZdost = 1
+KGZdead = RAND(KGZday * 10, KGZday * 20)
+'<center><B>Roof Fort Bragg</B></center>'
+'On the roof is full of lying motionless rotting bodies, many spent cartridges.'
+'Provisions enough for <<KGZsup>> day'
+if KGZfortQW > 0: '<a href="exec: dynamic $KGZvincent">Young tired man in the form of Ranger</a>, sits leaning on a sniper rifle.'
+	if KGZmedkit > 0:
+	'First aid kits <<KGZmedkit>> pieces'
+		if KGZHP < 100:
+			act 'Treated':
+			cls
+			KGZhour += 1
+			KGZHP = 100
+			KGZmedkit -= 1
+			minut += 1
+			gs 'stat'
+			'You heal health through kits.'
+			act 'Further': gt $curloc
+			end
+		end
+	end
+
+	act 'Rest':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	'You have settled on the convenient roof, not taking his eyes off the hatch which can climb dead.'
+	act 'Further': gt $curloc
+	end
+
+
+	act 'Exit to the fort':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 11
+	KGZbatl = 0
+	'You gently down into the hatch, trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+end
+
+if KGZplace = 13:
+KGZdead = RAND(KGZday * 10, KGZday * 20)
+'<center><B>Fort Bragg</B></center>'
+'<center><B>Food Storage</B></center>'
+'Stock dark and heard noises.'
+	if KGZbatl = 0:
+	'Wander around the warehouse <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,3)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod13
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod13
+	end
+
+end
+
+if KGZplace = 14:
+KGZdead = RAND(KGZday * 10, KGZday * 20)
+'<center><B>Fort Bragg</B></center>'
+'<center><B>Infirmary</B></center>'
+'In the hospital is dark and heard noises.'
+	if KGZbatl = 0:
+	'By Infirmary roam <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,3)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod14
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod14
+	end
+
+end
+
+if KGZplace = 15:
+KGZdead = RAND(KGZday * 10, KGZday * 20)
+'<center><B>Fort Bragg</B></center>'
+'<center><B>Arms</B></center>'
+'In the armory dark and heard noises.'
+	if KGZbatl = 0:
+	'On weapons roam <<KGZdead>>Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,3)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod15
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod15
+	end
+
+end
+
+if KGZplace = 16:
+KGZdead = RAND(KGZday * 10, KGZday * 20)
+'<center><B>Fort Bragg</B></center>'
+'<center><B>Garage</B></center>'
+'The garage is dark and heard noises.'
+	if KGZbatl = 0:
+	'Roam around the garage <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(2,3)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod16
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod16
+	end
+
+end
+
+
+if KGZplace = 100:
+KGZdead = RAND(KGZday * 20, KGZday * 30)
+'<center><B>City Koldkrik</B></center>'
+'The city was destroyed and fires could be seen.'
+	if KGZbatl = 0:
+	'Roam the streets <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(10,30)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod100
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod100
+	end
+end
+
+if KGZplace = 101:
+'<center><B>House</B></center>'
+'This home is a safe place. The house is kept provision, which will be enough to <<KGZsup>> days'
+	if KGZmedkit > 0:
+	'First aid kits <<KGZmedkit>> pieces'
+		if KGZHP < 100:
+			act 'Treated':
+			cls
+			KGZhour += 1
+			KGZHP = 100
+			KGZmedkit -= 1
+			minut += 1
+			gs 'stat'
+			'You heal health through kits.'
+			act 'Further': gt $curloc
+			end
+		end
+	end
+
+	act 'Laze':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'
+	act 'Further': gt $curloc
+	end
+
+
+	act 'Out of the house':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 100
+	KGZbatl = 0
+	'You cautiously left the apartment trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+end
+
+if KGZplace = 102:
+KGZdead = RAND(KGZday * 5, KGZday * 10)
+'<center><B>Supermarket</B></center>'
+'At the supermarket, dark and heard noises.'
+	if KGZbatl = 0:
+	'Roam the halls of the Trade <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(5,10)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod102
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod102
+	end
+end
+
+if KGZplace = 200:
+KGZdead = RAND(KGZday, KGZday * 2)
+'<center><B>Forest</B></center>'
+'In the dark forest and heard noises.'
+	if KGZbatl = 0:
+	'Wander through the woods <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(10,30)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod200
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod200
+	end
+end
+
+if KGZplace = 201:
+KGZdead = RAND(KGZday, KGZday * 3)
+'<center><B>Farm</B></center>'
+'Large fenced farm fence.'
+	if KGZbatl = 0:
+	'Wander around the neighborhood <<KGZdead>> Dead'
+	KGZagr = RAND(0,10)
+		if KGZagr <= 8:
+		'Sensing you dead immediately rush to the attack.'
+		act 'Srazhatsya': KGZdist = RAND(10,30)&gt 'KGZfight'
+		else
+		'Fortunately, you do not notice the dead.'
+		dynamic $KGZvihod201
+		end
+	else
+	'The Walking Dead is not visible.'
+	dynamic $KGZvihod201
+	end
+end
+
+if KGZplace = 202:
+'<center><B>House</B></center>'
+'This home is a safe place. The house is kept provision, which will be enough to <<KGZsup>> days'
+	if KGZmedkit > 0:
+	'First aid kits <<KGZmedkit>> pieces'
+		if KGZHP < 100:
+			act 'Treated':
+			cls
+			KGZhour += 1
+			KGZHP = 100
+			KGZmedkit -= 1
+			minut += 1
+			gs 'stat'
+			'You heal health through kits.'
+			act 'Further': gt $curloc
+			end
+		end
+	end
+
+	act 'Laze':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	'You lounged in the apartment, lounging on the couch and thinking how you vykruchivatsya of the situation.'
+	act 'Further': gt $curloc
+	end
+
+
+	act 'Out of the house':
+	cls
+	KGZhour += 1
+	minut += 1
+	gs 'stat'
+	KGZplace = 201
+	KGZbatl = 0
+	'You cautiously left the apartment trying not to stumble on the dead.'
+	act 'Further': gt $curloc
+	end
+
+end
+--- KGZgame ---------------------------------
+

+ 61 - 0
locations/KGZstart

@@ -0,0 +1,61 @@
+# KGZstart
+minut += 1
+nosave = 1
+gs 'stat'
+KGZrec = KGZday * 24 + KGZhour - 32
+if KGZrecord < KGZrec: KGZrecord = KGZrec
+'<center><B>Dead Set</B></center>'
+'<center><B>Record <<KGZrecord>> hours</B></center>'
+if KGZdost = 1: 'Achievement: Found Fort Bragg'
+'Is a survival game, the task will hold as much as possible.'
+
+
+
+if KGZHP > 0: act 'Load a saved game': gt 'KGZgame'
+
+act 'Play a new game':
+cls
+KGZHP = 100
+KGZplace = 0
+KGZday = 1
+KGZhour = 8
+KGZsup = 3
+KGZmedkit = 1
+KGZcopcar = 0
+KGZgun = 0
+bullet = 0
+KGZgun2 = 0
+bullet2 = 0
+KGZgun3 = 0
+bullet3 = 0
+KGZgenerator = 0
+KGZbolgarka = 0
+KGZcopdoor = 0
+KGZratia = 0
+KGZfortQW = 0
+KGZfortOru = 0
+KGZgranade = 0
+KGZdost = 0
+KGZgruzBenz = 0
+KGZgruzBenzMark = 0
+KGZgruzovik = 0
+KGZlok = 0
+KGZlok2 = 0
+KGZweapon = 0
+'INTRODUCTION'
+'DeGross entertainment'
+'in collaboration with'
+'PAPA_GANS inc.'
+'are'
+'Sunset dead.'
+'As harsh and merciless this world. Not that past life was better or worse. All its advantages and disadvantages. You were probably wondering, what kind of a zombie apocalypse, there are pros? I´ll tell you ... Freedom. Freedom of action and freedom of choice, everyone is free to do what really wants. For me, the beginning of the end of the world, was liberation. And even now, I realize that I was only here because of their choice, their freedom.'
+'In a past life I was an ordinary man: he went to work, met a girl, paying loans and was going to fly on vacation at some resort. On a day when everything changed, I woke up surprisingly early, the sun´s rays coming through the curtains and joyfully heralded a new day, and with it the complete collapse of the old society.'
+'My girl was not there, then I thought that she had gone to work early. How wrong I was. To my surprise, the apartment was not the light, and I put the coffee brewed in the old. Normally I do not have time to watch it, but that day I decided not to rush to work, and simply enjoy the morning. Fire a couple of balls, said that it would be necessary to go to the grocery store and absorb rather take breakfast and read long deferred detective.'
+'My peace interrupted some noise outside the front door. I heard heart-rending cries, which ended after a few seconds. Still not understanding what was happening, I grabbed the phone and quickly dialed 911. As the tube was silence, frightening and ruthless, no beeps, no sound at all, just my own echo was given in the endless corridors of radio waves.'
+act 'Play': gt 'KGZgame'
+end
+
+
+act 'Exit': nosave = 0 & gt 'Komp','start'
+--- KGZstart ---------------------------------
+

+ 138 - 0
locations/KGstart

@@ -0,0 +1,138 @@
+# KGstart
+$KGOLklassvibor = {
+cls
+'You must select a character class.'
+if KGOLrace = 1:
+'For people available classes: Warrior, Thief, Mage.'
+	act 'Warrior':$KGOLklass = 'Warrior'&KGOLklass = 1 & dynamic $KGOLklassvibor2
+	act 'Thief':$KGOLklass = 'Thief'&KGOLklass = 2 & dynamic $KGOLklassvibor2
+	act 'Magician':$KGOLklass = 'Magician'&KGOLklass = 3 & dynamic $KGOLklassvibor2
+elseif KGOLrace = 2:
+'For elves available classes Priest, Archer.'
+	act 'Priest':$KGOLklass = 'Priest'&KGOLklass = 4 & dynamic $KGOLklassvibor2
+	act 'Archer':$KGOLklass = 'Archer'&KGOLklass = 5 & dynamic $KGOLklassvibor2
+else
+'Classes available for zveroidov Barbarian.'
+	act 'Barbarian':$KGOLklass = 'Barbarian'&KGOLklass = 6 & dynamic $KGOLklassvibor2
+end
+
+}
+$KGOLklassvibor2 = {
+cls
+KGOLexp = 0
+KGOLlvl = 1
+KGOLbrona = 0
+KGOLwpower = 0
+'<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'
+if KGOLklass = 1:
+KGOLstren = 30
+KGOLspeed = 20
+KGOLvital = 30
+KGOLintel = 20
+elseif KGOLklass = 2:
+KGOLstren = 20
+KGOLspeed = 30
+KGOLvital = 20
+KGOLintel = 30
+elseif KGOLklass = 3:
+KGOLstren = 10
+KGOLspeed = 20
+KGOLvital = 20
+KGOLintel = 50
+elseif KGOLklass = 4:
+KGOLstren = 10
+KGOLspeed = 10
+KGOLvital = 10
+KGOLintel = 70
+elseif KGOLklass = 5:
+KGOLstren = 20
+KGOLspeed = 40
+KGOLvital = 10
+KGOLintel = 30
+else
+KGOLstren = 40
+KGOLspeed = 10
+KGOLvital = 40
+KGOLintel = 10
+end
+KGHP = KGOLvital * 10
+KGManna = KGOLintel * 10
+act 'Play': KGOLpers = 1 & gt 'KGOLgame'
+
+	act 'Delete a character':
+	KGOLpers = 0
+	gt $curloc
+	end
+}
+minut += 1
+gs 'stat'
+if KFOnLineReaga > 0:
+'Welcome to the game Vertep World. You can play more <<KFOnLineReaga>> days'
+'At any time you can pay with a credit card that would extend the duration of the account.'
+'30 days 1000 rubles, on your credit card <<karta>>rubles'
+	if KGOLpers > 0:
+	'You can get in the game your character, or delete it'
+	'<<$KGOLname>> <<$KGOLrace>> <<$KGOLklass>> <<KGOLlvl>> level'
+		act 'Play': gt 'KGOLgame'
+
+		act 'Delete a character':
+		KGOLpers = 0
+		gt $curloc
+		end
+
+
+	else
+	'You can create a character'
+		act 'Create a character':
+		cls
+		$KGOLname = input("Введите ваш ник")
+		if $KGOLname <= 0: msg 'Not valid nickname'&gt $curloc
+		'Your nickname <<$KGOLname>>'
+		'You must select the player race'
+		act 'Man':$KGOLrace = 'Man'&KGOLrace = 1 & dynamic $KGOLklassvibor
+		act 'Elf':$KGOLrace = 'Elf'&KGOLrace = 2 & dynamic $KGOLklassvibor
+		act 'Zveroid':$KGOLrace = 'Zveroid'&KGOLrace = 3 & dynamic $KGOLklassvibor
+		end
+	end
+
+	if karta >= 1000:
+		act 'Payment akkuaunta':
+		karta -= 1000
+		KFOnLineReaga += 30
+		gt $curloc
+		end
+
+	end
+
+	if karta > 0:
+		act 'Donat money in the game (1rub = 1moneta)':
+		cla
+		KGOLdonat = input("Сколько денег вы хотите задонатить?")
+			if KGOLdonat <= 0 or KGOLdonat < karta:
+			msg 'Not valid operation'
+			else
+			karta -= KGOLdonat
+			KGOLmoney += KGOLdonat
+			msg 'Transferred to your account <<KGOLdonat>> coins'
+			end
+		gt $curloc
+		end
+	end
+
+else
+'Welcome to the online game Vertep World'
+'To play this game you have to pay 1,000 rubles for 30 days with a credit card.'
+	if karta >= 1000:
+		act 'Payment':
+		karta -= 1000
+		KFOnLineReaga += 30
+		gt $curloc
+		end
+
+	end
+
+end
+
+act 'Exit': gt 'Komp','start'
+--- KGstart ---------------------------------
+

+ 239 - 0
locations/Kafe2

@@ -0,0 +1,239 @@
+# Kafe2
+if $ARGS[0] = 'start':
+cla
+*clr
+'<<$boybody>> <<$boybod>> <<$boyface>>, introduced as <<$boy>>.'
+Set deyst = RAND(1,100)
+	if deyst <= 25:
+	'<<$boy>> has invited you to dance.'
+	act 'Dance': gt 'Kafe2','dance'
+	act 'Otshit': gt 'street'
+	end
+	if deyst > 25 and deyst <= 50:
+	'<<$boy>> sat down at your table and ordered a drink and a snack.'
+	act 'Drink': gt 'Kafe2','booze'
+	act 'Otshit': gt 'street'
+	end
+	if deyst > 50 and deyst <= 75:
+	'<<$boy>> has invited you to join the party on which he walks.'
+	act 'Agree': gt 'Kafe2','kampashka'
+		if horny < 75:
+		act 'Otshit': gt 'street'
+		end
+	end
+	if deyst > 75:
+	'<<$boy>> began to stick to you and try to take pictures. <<$boy>> offered to go with him to the toilet.'
+	act 'Agree': gt 'Kafe3','WC'
+		if horny < 75:
+		act 'Otshit': gt 'street'
+		end
+	end
+end
+
+if $ARGS[0] = 'dance':
+cla
+dance += 1
+minut += 3
+gs 'stat'
+Set deyst = RAND(1,100)
+'<center><img src="images\etogame\dance.jpg"></center>'
+''
+	if deyst <= 25:
+	'During the dance <<$boy>> you confidently and correctly conducted and not molested. His strong hands held tightly your waist. Finally the song ended.'
+	act 'Finish the dance': gt 'Kafe2','tanets2'
+	end
+
+	if deyst > 25 and deyst <= 80:
+	Set horny += 5
+	clr
+	gs 'stat'
+	if dick > 15 and dick < 18:
+	$didanc = 'During the dance, you feel like something hard between his legs pressed against your stomach.'
+	elseif dick >= 18:
+	$didanc = 'During the dance, you feel his cock pushing against your stomach hardens and grows, you feel that he´s a big, vskidku about <<dick>> centimeters.'
+	elseif dick <= 15:
+	$didanc = ''
+	end
+	'During the dance <<$boy>> gently hugged you and stroking your back down to the hips. His strong hands pressed against your fragile body to him, pressing your soft breasts <<tits>> the size of his body. <<$didanc>> Finally, the song ends.'
+	act 'Finish the dance': gt 'Kafe2','tanets2'
+	end
+
+	if deyst > 80:
+	Set horny += 8
+	clr
+	gs 'stat'
+	'During the dance <<$boy>> paw is the ass, you clung to his vzhimaya your tender flesh in his and wants to kiss you.'
+		act 'Kiss':
+		cla
+		if lip = 0: set $lipdance = 'thin lips'
+		if lip = 1: set $lipdance = 'lips'
+		if lip = 2: set $lipdance = 'plump lips'
+		if lip = 3: set $lipdance = 'plump lips'
+		if lip = 4: set $lipdance = 'thick lips'
+		'<<$boy>> your kisses <<$lipdance>> pushing them and poking his wet tongue in your mouth.'
+			act 'Chew language':
+			cla
+			Set horny += 8
+			if lip = 0: set $lipdance = 'thin lips'
+			if lip = 1: set $lipdance = 'lips'
+			if lip = 2: set $lipdance = 'plump lips'
+			if lip = 3: set $lipdance = 'plump lips'
+			if lip = 4: set $lipdance = 'thick lips'
+				if dick > 15 and dick < 18:
+				$didanc = 'pants it becomes firm and <<$boy>> is pressed to your stomach its embarked member.'
+				elseif dick >= 18:
+				$didanc = 'his cock pushing against your stomach hardens and grows, it´s big, vskidku about <<dick>> centimeters.'
+				elseif dick <= 15:
+				$didanc = 'in his pants that is uvilichivaetsya'
+				end
+			'You started passionately suck tongue kissing a guy and his own <<$lipdance>>. You feel like <<$didanc>>'
+			'Finally the song ends and you break the kiss.'
+			Set deyst = RAND(1,100)
+				if deyst <= 75:
+				'Keeping your waist and hold <<$boy>> offers to go to his home.'
+				act 'Agree': gt 'Kafe3','house'
+					if horny < 75:
+					act 'Otshit': gt 'street'
+					end
+
+				end
+				if deyst > 75:
+				'Keeping your waist and hold <<$boy>> offers to go to the toilet and continue.'
+				act 'Agree': gt 'Kafe3','WC'
+					if horny < 75:
+					act 'Otshit': gt 'street'
+					end
+
+				end
+
+			end
+
+			act 'Avoid kissing':
+			cla
+			Set horny += 8
+			if lip = 0: set $lipdance = 'thin lips'
+			if lip = 1: set $lipdance = 'lips'
+			if lip = 2: set $lipdance = 'plump lips'
+			if lip = 3: set $lipdance = 'plump lips'
+			if lip = 4: set $lipdance = 'thick lips'
+				if dick > 15 and dick < 18:
+				$didanc = 'pants it becomes firm and <<$boy>> is pressed to your stomach its embarked member.'
+				elseif dick >= 18:
+				$didanc = 'his cock pushing against your stomach hardens and grows, it´s big, vskidku about <<dick>> centimeters.'
+				elseif dick <= 15:
+				$didanc = 'in his pants that is uvilichivaetsya'
+				end
+			'You behave passively and try to clean your mouth away from the annoying guy first, but it takes him a little and you feel his hands firmly squeeze your ass, then his hands raised above and it takes you to his chest. You feel like <<$didanc>>'
+			'Finally the song ends and you break his arms.'
+			Set deyst = RAND(1,100)
+				if deyst <= 75:
+				'Keeping your waist and hold <<$boy>> offers to go to his home.'
+				act 'Agree': gt 'Kafe3','house'
+					if horny < 75:
+					act 'Otshit': gt 'street'
+					end
+
+				end
+				if deyst > 75:
+				'Keeping your waist and hold <<$boy>> offers to go to the toilet and continue.'
+				act 'Agree': gt 'Kafe3','WC'
+					if horny < 75:
+					act 'Otshit': gt 'street'
+					end
+
+				end
+
+			end
+		end
+
+
+		if horny < 75:
+		act 'Stop dancing and leave': gt 'street'
+		end
+	end
+
+end
+
+if $ARGS[0] = 'tanets2':
+cla
+Set deyst = RAND(1,70)
+	if deyst >= vnesh:
+	'The dance ended, and <<$boy>> kiss you goodbye'
+	act 'Say goodbye':
+	gt 'kafe','start'
+	end
+	end
+	if deyst < vnesh:
+	'The dance ended, and <<$boy>> suggested to go to him'
+	act 'Agree': gt 'Kafe3','house'
+		if horny < 75:
+		act 'Otshit': gt 'street'
+		end
+	end
+end
+
+if $ARGS[0] = 'booze':
+cla
+minut += 30
+gs 'stat'
+Set deyst = RAND(1,100)
+'You drink with a guy, and <<$boy>> tells a lot of interesting and interested in you.'
+	if deyst < 75:
+	'It seems you´ve had enough and should go home. <<$boy>> kiss you goodbye'
+		act 'Say goodbye':
+		gt 'kafe','start'
+		end
+	end
+
+	if deyst >= 75 and deyst < 95:
+	'It seems you´ve had enough and should go home. <<$boy>> suggested to go to him'
+	act 'Agree': gt 'Kafe3','house'
+		if horny < 75:
+		act 'Otshit': gt 'street'
+		end
+	end
+
+	if deyst >= 95:
+	'You drank to pig squeal and <<$boy>> began to stick to you. He kissed you and caressed, and then offered to go with him to the toilet.'
+	act 'Agree': gt 'Kafe3','WC'
+		if horny < 75:
+		act 'Otshit': gt 'street'
+		end
+	end
+end
+
+if $ARGS[0] = 'kampashka':
+cla
+minut += 30
+gs 'stat'
+Set deyst = RAND(1,100)
+'You drink in society guys and girls. <<$boy>> obschaetsya and flirts with you.'
+	if deyst < 60:
+	'Think you´ve had enough and should go home. <<$boy>> kiss you goodbye'
+	act 'Say goodbye':
+	gt 'kafe','start'
+	end
+	end
+	if deyst >= 60 and deyst < 90:
+	'Think you´ve had enough and should go home. <<$boy>> suggested to go to him'
+	act 'Agree': gt 'Kafe3','house'
+		if horny < 75:
+		act 'Otshit': gt 'street'
+		end
+	end
+	if deyst >= 90:
+	'You drank to pig squeal and <<$boy>> began to stick to you. He kissed you and caressed, and then offered to go to rest with the company.'
+	act 'Agree': gt 'Kafe3','kampashka'
+		if horny < 75:
+		act 'Otshit': gt 'street'
+		end
+	end
+end
+
+
+
+
+
+
+--- Kafe2 ---------------------------------
+

+ 393 - 0
locations/Kafe3

@@ -0,0 +1,393 @@
+# Kafe3
+if $ARGS[0] = 'house':
+cla
+*clr
+money += 100
+minut += 15
+gs 'stat'
+'<<$boy>> pay your bill and hailed a taxi.'
+'You sat down with him in the backseat of the car. <<$boy>> put his hand on your knee and began stroking it getting higher to your pussy.'
+
+	act 'Enjoy caresses':
+	cla
+	minut += 15
+	horny += 15
+	gs 'stat'
+	dynamic $venerasiak
+	'<<$boy>> made it to your pussy and started to caress her fingers.'
+
+		act 'Try to remove his hands':
+		cla
+		minut += 15
+		horny += 10
+		gs 'stat'
+		'You tried to remove his hands from the crotch guy, but <<$boy>> turning to you began to fondle your breasts with his hands through the clothes.'
+		act 'Come': gt 'BDsex','start'
+		end
+
+		act 'Hands caress his cock':
+		cla
+		minut += 15
+		horny += 10
+		gs 'stat'
+		'You got into the pants to the guy and got him <<dick>> centimeter members began to caress his hands.'
+		derand = RAND(0,100)
+			if derand >= 95:
+			'<<$boy>> groaned and took you by the neck began to move your face to its members.'
+				act 'Take by mouth':
+				cla
+				*clr
+				minut += 15
+				horny += 10
+				guy += 1
+				bj += 1
+				gs 'stat'
+				'<center><img src="images\studia\car.gif"></center>'
+				'You bent bringing her face to the groin guy and his lips wrapped around his cock started sucking him.'
+				gs 'oral','0'
+				'Finally the guy filled your mouth with his hot sperm that you had nowhere to go and you swallow it. The taxi stopped. And <<$boy>> you put it out on the street.'
+				swallow += 1
+				cumlip += 1
+				act 'Leave': gt 'street'
+				end
+
+				act 'Try to remove his hands':
+				cla
+				minut += 15
+				horny += 10
+				gs 'stat'
+				'You tried to remove his hands from his head guy, but <<$boy>> turning to you began to fondle your breasts with his hands through the clothes.'
+				act 'Come': gt 'BDsex','start'
+				end
+			else
+			act 'Come': gt 'BDsex','start'
+			end
+		end
+	end
+
+	act 'Try to remove his hands':
+	cla
+	minut += 15
+	horny += 10
+	gs 'stat'
+	'You tried to remove his hands from the crotch guy, but <<$boy>> turning to you began to fondle your breasts with his hands through the clothes.'
+	act 'Come': gt 'BDsex','start'
+	end
+
+end
+
+if $ARGS[0] = '0':
+cla
+*clr
+$nameV = $boy
+
+
+
+minut += 15
+gs 'stat'
+Set deyst = RAND(1,100)
+	if deyst < 70:
+	:vag
+	'<<$boy>> puts you on the bed and undressed.'
+	Set deysts = RAND(1,3)
+		if deysts = 1:
+		Set guy += 1
+		Set sex += 1
+		vagina += 1
+		'<<$boy>> pushes your legs and enters you.'
+		set picrand = RAND(1,5)
+		'<center><img src="images\pics\vagmis<<picrand>>.jpg"></center>'
+		pose = 0
+		gs 'orgasm','start'
+		!'Dick like a hammer hammer inside you, you are very nice and you are ready to finish.'
+		act 'Leave': gt 'street'
+		end
+		if deysts = 2:
+		'<<$boy>> cancer puts you and enters you'
+		Set guy += 1
+		Set sex += 1
+		vagina += 1
+
+		Set cumass += 1
+		!'<<$boy>> pushes your legs and enters you.'
+
+		set picrand = RAND(1,5)
+		'<center><img src="images\pics\vagdog<<picrand>>.jpg"></center>'
+
+		pose = 1
+		gs 'orgasm','start'
+		act 'Leave': gt 'street'
+		end
+
+		if deysts = 3:
+		'<<$boy>> lays down on the bed and puts you over the top, you feel his penis enters you'
+		Set guy += 1
+		Set sex += 1
+
+		Set cumass += 1
+		'His cock went in you and you started to jump on his elde.'
+
+		set picrand = RAND(1,6)
+		'<center><img src="images\pics\vagcow<<picrand>>.jpg"></center>'
+
+		pose = 0
+		gs 'orgasm','start'
+		act 'Leave': gt 'street'
+		end
+	end
+	if deyst >= 70 and deyst < 85:
+	'<<$boy>> tells you that he wants you to suck it'
+		act 'Refuse': gt 'Kafe3','0'
+
+		act 'Take by mouth':
+		'<<$boy>> pulls his dick'
+		Set guy += 1
+		Set bj += 1
+
+		Set throat += 1
+		Set vaf += 1
+		'You took his penis in her mouth and began to suck.'
+		set picrand = RAND(1,10)
+			if picrand = 1: '<center><img src="images\pics\bj.jpg"></center>'
+			if picrand = 2: '<center><img src="images\pics\bj2.jpg"></center>'
+			if picrand = 3: '<center><img src="images\pics\bj3.jpg"></center>'
+			if picrand = 4: '<center><img src="images\pics\bj4.jpg"></center>'
+			if picrand = 5: '<center><img src="images\pics\bj5.jpg"></center>'
+			if picrand = 6: '<center><img src="images\pics\bj6.jpg"></center>'
+			if picrand = 7: '<center><img src="images\pics\bj7.jpg"></center>'
+			if picrand = 8: '<center><img src="images\pics\bj8.jpg"></center>'
+			if picrand = 9: '<center><img src="images\pics\bj9.jpg"></center>'
+			if picrand = 10: '<center><img src="images\pics\bj10.jpg"></center>'
+		'<<$boy>> moans and that´s to finish.'
+		*clr
+			act 'Remove the member of his mouth':
+			cla
+			Set bjrand = RAND(1,100)
+			if bjrand < 50 and vaf > 100: 'You have time to take out of his mouth and a member <<$boy>> commits past you.'
+			if bjrand >= 50 or vaf <= 100: Set cumface += 1 & '<<$boy>> ends up on your face.'
+			set picrand = RAND(1,5)
+				if picrand = 1 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial.jpg"></center>'
+				if picrand = 2 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial2.jpg"></center>'
+				if picrand = 3 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial3.jpg"></center>'
+				if picrand = 4 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial4.jpg"></center>'
+				if picrand = 5 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial5.jpg"></center>'
+			'You try to wipe off the face of the sperm, but the sperm erased bad.'
+			act 'Leave': gt 'street'
+			end
+
+			act 'Suck on':
+			cla
+			Set vaf += 1
+			'You feel like a hot jet of sperm hits you in the throat. You have a mouth full of sperm.'
+			set picrand = RAND(1,10)
+			if picrand = 1: '<center><img src="images\pics\cum.jpg"></center>'
+			if picrand = 2: '<center><img src="images\pics\cum2.jpg"></center>'
+			if picrand = 3: '<center><img src="images\pics\cum3.jpg"></center>'
+			if picrand = 4: '<center><img src="images\pics\cum4.jpg"></center>'
+			if picrand = 5: '<center><img src="images\pics\cum5.jpg"></center>'
+			if picrand = 6: '<center><img src="images\pics\cum6.jpg"></center>'
+			if picrand = 7: '<center><img src="images\pics\cum7.jpg"></center>'
+			if picrand = 8: '<center><img src="images\pics\cum8.jpg"></center>'
+			if picrand = 9: '<center><img src="images\pics\cum9.jpg"></center>'
+			if picrand = 10: '<center><img src="images\pics\cum10.jpg"></center>'
+				act 'swallow':
+				cla
+				Set vaf += 2
+				Set cumlip += 1
+				'<<$boy>> looks like you swallow sperm.'
+				act 'Leave': gt 'street'
+				end
+
+				act 'spit out':
+				cla
+				'You go into the bathroom and there spits cum'
+				act 'Leave': gt 'street'
+				end
+			end
+
+
+		!act 'Leave': gt 'street'
+		end
+	end
+	if deyst >= 85:
+	'<<$boy>> tells you that he wants you in the ass otimet'
+		act 'Refuse': gt 'Kafe3','0'
+
+		act 'Agree':
+		cla
+		'<<$boy>> puts you cancer and lubricates your ass somehow cream. You feel like that it boils down to you in tight anus.'
+		'Sharp pain in the anus smenyaetsya easy to treat. <<$boy>> you fucked in the ass smoothly, that would not break anything.'
+		Set guy += 1
+		Set anal += 1
+		anus += 1
+		if lubri > 0: Set lubri  = lubri  - 1
+		Set cumass += 1
+		set picrand = RAND(1,10)
+			if picrand = 1: '<center><img src="images\pics\anal.jpg"></center>'
+			if picrand = 2: '<center><img src="images\pics\anal2.jpg"></center>'
+			if picrand = 3: '<center><img src="images\pics\anal3.jpg"></center>'
+			if picrand = 4: '<center><img src="images\pics\anal4.jpg"></center>'
+			if picrand = 5: '<center><img src="images\pics\anal5.jpg"></center>'
+			if picrand = 6: '<center><img src="images\pics\anal6.jpg"></center>'
+			if picrand = 7: '<center><img src="images\pics\anal7.jpg"></center>'
+			if picrand = 8: '<center><img src="images\pics\anal8.jpg"></center>'
+			if picrand = 9: '<center><img src="images\pics\anal9.jpg"></center>'
+			if picrand = 10: '<center><img src="images\pics\anal10.jpg"></center>'
+			'You feel like your anus is filled with what that warm liquid. You bring yourself up in the bathroom and get dressed.'
+			act 'Leave': gt 'street'
+		end
+	end
+end
+
+if $ARGS[0] = 'WC':
+cla
+$nameV = $boy
+dynamic $venerasiak
+'You went to the toilet with a guy. <<$boy>> you began to kiss and caress. Then he offered you suck at it.'
+	act 'Refuse':
+	cla
+	'You abandoned your hot lover but is not confused, he turned you back to him and bent.'
+	'You feel that <<$boy>> bared your ass and something solid upiraetsya your vagina'
+	Set guy += 1
+	Set sex += 1
+	Set cumass += 1
+	vagina += 1
+	'You fuck cancer in the outhouse.'
+	'<center><img src="images\pics\vagtualet.jpg"></center>'
+	pose = 1
+	gs 'orgazm','start'
+	act 'Leave': gt 'street'
+	end
+
+	act 'Take by mouth':
+	cla
+	Set vaf += 1
+	'<<$boy>> pulls his dick'
+	Set guy += 1
+	Set bj+= 1
+
+	Set throat += 1
+	'You took his penis in her mouth and began to suck.'
+	set picrand = RAND(1,10)
+		if picrand = 1: '<center><img src="images\pics\bj.jpg"></center>'
+		if picrand = 2: '<center><img src="images\pics\bj2.jpg"></center>'
+		if picrand = 3: '<center><img src="images\pics\bj3.jpg"></center>'
+		if picrand = 4: '<center><img src="images\pics\bj4.jpg"></center>'
+		if picrand = 5: '<center><img src="images\pics\bj5.jpg"></center>'
+		if picrand = 6: '<center><img src="images\pics\bj6.jpg"></center>'
+		if picrand = 7: '<center><img src="images\pics\bj7.jpg"></center>'
+		if picrand = 8: '<center><img src="images\pics\bj8.jpg"></center>'
+		if picrand = 9: '<center><img src="images\pics\bj9.jpg"></center>'
+		if picrand = 10: '<center><img src="images\pics\bj10.jpg"></center>'
+	'<<$boy>> moans and that´s to finish.'
+
+		act 'Remove the member of his mouth':
+		cla
+		*clr
+		Set bjrand = RAND(1,100)
+			if bjrand < 50 and vaf < 100: 'You have time to take out of his mouth and a member <<$boy>> commits past you.'
+			if bjrand >= 50 or vaf >= 100: Set cumface += 1 & '<<$boy>> ends up on your face.'
+			set picrand = RAND(1,5)
+				if picrand = 1 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial.jpg"></center>'
+				if picrand = 2 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial2.jpg"></center>'
+				if picrand = 3 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial3.jpg"></center>'
+				if picrand = 4 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial4.jpg"></center>'
+				if picrand = 5 and bjrand >= 50 or repa = 6: '<center><img src="images\pics\facial5.jpg"></center>'
+			act 'Leave': gt 'street'
+
+		end
+
+		act 'Suck on':
+		cla
+		*clr
+		Set vaf += 2
+		'You feel like a hot jet of sperm hits you in the throat. You have a mouth full of sperm.'
+		set picrand = RAND(1,10)
+		if picrand = 1: '<center><img src="images\pics\cum.jpg"></center>'
+		if picrand = 2: '<center><img src="images\pics\cum2.jpg"></center>'
+		if picrand = 3: '<center><img src="images\pics\cum3.jpg"></center>'
+		if picrand = 4: '<center><img src="images\pics\cum4.jpg"></center>'
+		if picrand = 5: '<center><img src="images\pics\cum5.jpg"></center>'
+		if picrand = 6: '<center><img src="images\pics\cum6.jpg"></center>'
+		if picrand = 7: '<center><img src="images\pics\cum7.jpg"></center>'
+		if picrand = 8: '<center><img src="images\pics\cum8.jpg"></center>'
+		if picrand = 9: '<center><img src="images\pics\cum9.jpg"></center>'
+		if picrand = 10: '<center><img src="images\pics\cum10.jpg"></center>'
+			act 'swallow':
+			cla
+			Set vaf += 1
+			Set cumlip += 1
+			swallow += 1
+			'<<$boy>> looks like you swallow sperm.'
+			act 'Leave': gt 'street'
+			end
+
+			act 'spit out':
+			cla
+			'You go into the bathroom and there spits cum'
+			act 'Leave': gt 'street'
+			end
+		end
+
+
+	end
+end
+
+if $ARGS[0] = 'kampashka':
+cla
+dynamic $venerasiak
+'You edete somewhere with the guys on the car. You´re drunk and you pat on the back seat just two guys. Finally, the machine stops and you take out of the car.'
+'Undress you, and you feel like you are part of a member, you are trying to say something, at this point you inserted with cock in her mouth.'
+set picrand = RAND(1,15)
+if picrand = 1: '<center><img src="images\pics\gang.jpg"></center>'
+if picrand = 2: '<center><img src="images\pics\gang2.jpg"></center>'
+if picrand = 3: '<center><img src="images\pics\gang3.jpg"></center>'
+if picrand = 4: '<center><img src="images\pics\gang4.jpg"></center>'
+if picrand = 5: '<center><img src="images\pics\gang5.jpg"></center>'
+if picrand = 6: '<center><img src="images\pics\gang6.jpg"></center>'
+if picrand = 7: '<center><img src="images\pics\gang7.jpg"></center>'
+if picrand = 8: '<center><img src="images\pics\gang8.jpg"></center>'
+if picrand = 9: '<center><img src="images\pics\gang9.jpg"></center>'
+if picrand = 10: '<center><img src="images\pics\gang10.jpg"></center>'
+if picrand = 11: '<center><img src="images\pics\gang11.jpg"></center>'
+if picrand = 12: '<center><img src="images\pics\gang12.jpg"></center>'
+if picrand = 13: '<center><img src="images\pics\gang13.jpg"></center>'
+if picrand = 14: '<center><img src="images\pics\gang14.jpg"></center>'
+if picrand = 15: '<center><img src="images\pics\gang15.jpg"></center>'
+'You ripped into all the cracks, and even more than once. Heavily drunk and you can not concentrate and remember details. What that vague feeling throughout the body, hands, members. Then you dovezli and thrown at the entrance.'
+Set guy += 3
+Set sex += 1
+Set bj+= 1
+Set anal += 1
+Set throat += 1
+Set cumlip += 1
+Set cumface += 1
+Set cumbutt += 1
+Set cumass += 1
+set cumpussy += 1
+set rape += 1
+set gang += 1
+vagina += 1
+anus += 1
+act 'Leave': gt 'street'
+end
+
+if $ARGS[0] = 'coffee':
+cla
+dynamic $venerasiak
+$nameV = $boy
+minut += 30
+gs 'stat'
+'<<$boy>> agree to your proposal. You brought him home, there´s a long embraced and continued to snuggle on the bed. <<$boy>> you entered with full force.'
+set picrand = RAND(1,5)
+'<center><img src="images\pics\vagmis<<picrand>>.jpg"></center>'
+pose = 0
+gs 'orgasm','start'
+Set guy += 1
+Set sex += 1
+vagina += 1
+act 'Wash': gt 'Vanr'
+end
+
+--- Kafe3 ---------------------------------
+

+ 116 - 0
locations/Katlake

@@ -0,0 +1,116 @@
+# Katlake
+!if $ARGS[0] = 'start':
+!gs 'stat'
+cla
+gs 'stat'
+'<center><img src="images\img\Lake\kat.jpg"></center>'
+'You get bored and you start to examine other vacationers far from you is beautiful girl.'
+act 'Do not approach': gt 'Nudelake'
+	act 'Step up':
+	cla
+	'You walk up to a girl and trying to have a conversation.'
+	act '"Hi."': gt 'Katlake','znakomstvo'
+end
+
+if $ARGS[0] = 'znakomstvo':
+gs 'stat'
+cla
+	if vnesh < 14:
+		set katday = day
+		'"Hello" is a bit shy you say.'
+		'The girl looked around you scornful look and said nothing'
+		'"Talk will not work" flashed in your head'
+		act 'Leave.': gt 'Nudelake'
+		end
+	if vnesh >= 14:
+		set katday = day
+		set telkat += 1
+		set kat = 1
+		cla
+		clr
+		set minut += 30
+		'"Hello" is a bit shy you say.'
+		'Girl looks you up and down, smiles and says, "Hi."'
+		'She looks at you with a slight smile and waits. You frantically trying to think of what to say, blushing trying to squeeze out a word.'
+		'Girl notices your flour and decides to take matters into their own hands, "I Katia, for friends Kate and what´s your name?"'
+		'"<<$name>>" you exhale with relief. Continue the conversation went much better and you chatted for another half hour.'
+		act 'Leave.': gt 'Nudelake'
+		end
+end
+
+if $ARGS[0] = 'kat':
+cla
+clr
+*clr
+gs 'stat'
+set minut += 30
+'<center><img src="images\img\Lake\kat.jpg"></center>'
+'See you smiling Kate "Svetsik Hi how´s it going."'
+act 'Leave': gt 'Nudelake'
+act 'Offer to play volleyball': gt 'Katlake','voleybol'
+act 'Suggest a walk': gt 'Katlake','walk'
+act 'Chat':
+	cla
+	clr
+	set katday = day
+	set kat += 1
+	set minut += 30
+	'You talked for half an hour.'
+	act 'Leave': gt 'Nudelake'
+end
+end
+
+if $ARGS[0] = 'voleybol':
+gs 'stat'
+cla
+*clr
+clr
+set katday = day
+set kat += 3
+set minut += 30
+set agil += 1
+set react += 1
+set speed += 1
+'<center><img src="images\img\Lake\voleybol.jpg"></center>'
+'You can go to Kate volleyball court and Join of playing. When something goes wrong Kate encourages you clapping a hand over your bare ass, with her hand on his buttocks slightly delayed slightly squeezing it.'
+act 'Finish': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'walk':
+cla
+gs 'stat'
+set katday = day
+set kat += 2
+set minut += 30
+'You Kat walk along the beach, chatting merrily.'
+set kwalrand = RAND(0,100)
+	if kwalrand >= 80 and kwalrand < 90 and kat > 20: gt 'Kwlake1'
+	if kwalrand >= 90 and kat > 20: gt 'Kwlake2'
+
+act 'Finish': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'key':
+cla
+*clr
+clr
+gs 'stat'
+set katkey = 1
+set kat += 10
+set minut += 60
+'<center><img src="images\img\Lake\sun.jpg"></center>'
+'You sunbathe, you suddenly become ill, dizzy, nauseated you. You tried to get up and lost consciousness.'
+'"Now, now, wait a little." where you hear that voice from the darkness Katie.'
+'You feel the cool darkness slowly razveevaetsya and you open your eyes. Before you face the Cat.'
+'"Well, finally, awake." says Kate. You look around, you have a wet towel on your head, and you yourself are lying in the shade under a tree.'
+'"What happened to me," you ask.'
+'"What, what, sunstroke, that´s what." meets Katya.'
+'"And now comes to life and went to me, today I´ll stay," she continued.'
+'"I feel better, I am going home," you tried to argue.'
+'"No, well, you better it a look, I´m with her noshus like a chicken with egg, three times ran a towel drenched, dragged by his shadow, and she still vykobenivaetsya. All I said to me it means to me, I still nurse and I know better "'
+'After this tirade mind you do not become'
+act 'Go with Kate.': gt 'kathouse0'
+end
+
+--- Katlake ---------------------------------
+

+ 86 - 0
locations/Kikatak

@@ -0,0 +1,86 @@
+# Kikatak
+if $ARGS[0] = 'player':
+set defsumV = agilV + reaktV + KikDefV
+set defkofV = defsumV * 20/100
+set defV = RAND(defsumV - defkofV, defsumV + defkofV)
+	if popad >= defV * 2:
+	'<B><font color = green>CRETE</font></B>'
+	set damageKrit = damage * 20/100
+	set damage += damageKrit
+	set healthV -= damage
+	set pointKik += 1
+	'<font color = green>You applied <<damage>> points of damage</font>'
+		if damage >= healthV * 20/100:
+		set pointKik += 1
+		'<font color = green><<$nameV>> fell to the ring</font>'
+			if healthV < (vitalV*10 + strenV*5)/4:
+			'<font color = green><<$nameV>> in a knockout. This is a victory!</font>'
+			xgt 'enderKik','winKO'
+			exit
+			end
+		end
+	end
+	if popad < defV*2 and popad >= defV:
+	'<font color = green>Contact</font>'
+	set healthV -= damage
+	set pointKik += 1
+	'<font color = green>You applied <<damage>> points of damage</font>'
+		if damage >= healthV * 20/100:
+		set pointKik += 1
+		'<font color = green><<$nameV>> fell to the ring</font>'
+			if healthV < (vitalV*10 + strenV*5)/4:
+			'<font color = green><<$nameV>> in a knockout. This is a victory!</font>'
+			xgt 'enderKik','winKO'
+			exit
+			end
+		end
+	end
+	if popad < defV:
+	'<font color = red>Slip</font>'
+	end
+
+end
+
+if $ARGS[0] = 'enemy':
+set defsum = agil + reakt + KikDef
+set defkof = defsum * 20/100
+set def = RAND(defsum - defkof, defsum + defkof)
+	if popad >= def * 2:
+	'<B><font color = red>CRETE</font></B>'
+	set damageKrit = damage * 20/100
+	set damage += damageKrit
+	set health -= damage
+	set pointKikV += 1
+	'<font color = red>You have caused <<damage>> points of damage</font>'
+		if damage >= health * 20/100:
+		set pointKikV += 1
+		'<font color = red>You have fallen into the ring</font>'
+			if health < (vital*10 + stren*5)/4:
+			'<font color = red>You are in a knockout. This defeat</font>'
+			xgt 'enderKik','loss'
+			exit
+			end
+		end
+	end
+	if popad < def*2 and popad >= def:
+	'<font color = red>Contact</font>'
+	set health -= damage
+	set pointKikV += 1
+	'<font color = red>You have caused <<damage>> points of damage</font>'
+		if damage >= health * 20/100:
+		set pointKikV += 1
+		'<font color = red>You have fallen into the ring</font>'
+			if health < (vital*10 + stren*5)/4:
+			'<font color = red>You are in a knockout. This defeat</font>'
+			xgt 'enderKik','loss'
+			exit
+			end
+		end
+	end
+	if popad < def:
+	'<font color = green>Slip</font>'
+	end
+
+end
+--- Kikatak ---------------------------------
+

+ 127 - 0
locations/Klub2

@@ -0,0 +1,127 @@
+# Klub2
+if $ARGS[0] = 'tualet1':
+cla
+*clr
+gs 'stat'
+'<center><img src="images\pics\glory.jpg"></center>'
+'You went into the booth and closed the door. The walls are covered with obscene graffiti in the walls and booths carved strange round holes. Sitting on the toilet you hear what that noise in the next stall. Through the hole in the wall you looked someone´s eyes.'
+'In a hole in the wall squeezed fat cock. Lustful voice said, "here´s a yum yum, baby."'
+'This is so not surprisingly, that you do not believe in the reality of what is happening to touch the finger member. It is hard and hot.'
+act 'Leave': gt 'club','inside'
+	act 'Take a closer look':
+	cla
+	*clr
+	Set vaf += 1
+	if TQuest = 1: Set TQuest = 2
+	Set guy += 1
+	Set bj+= 1
+	Set horny += 5
+
+	Set throat += 1
+	'You lean against a member, it´s so big, warm and solid, you licked it, then again and again.'
+	'<center><img src="images\pics\glory1.jpg"></center>'
+		act 'Cover lips':
+		cla
+		*clr
+		'You bows member lips and start sucking it, trying to take it as deep as possible.'
+		'<center><img src="images\pics\glory2.jpg"></center>'
+		'Suddenly, in your mouth and poured hot tart liquid.'
+			act 'Swallow':
+			cla
+			*clr
+			Set vaf += 2
+			set swallow += 1
+			Set cumlip += 1
+			'You dial a mouthful of sperm, and then swallow it, sperm is not tasty, sticky and sharp taste.'
+			'<center><img src="images\pics\glory3.jpg"></center>'
+			'A male voice telling you - excellent crumb, the money you deserve, a member of the hole and the hole disappears pushes two thousandths bills.'
+			Set money += 2000
+			act 'Leave': gt 'club','inside'
+			end
+			act 'Spit out':
+			cla
+			Set cumface += 1
+			'You dial a mouthful of sperm, the sperm is not tasty, sticky and sharp, you spit it on the floor.'
+			'<center><img src="images\pics\glory3.jpg"></center>'
+			'A male voice telling you - excellent crumb, the money you deserve, a member of the hole and the hole disappears pokes thousandth bill.'
+			Set money += 1000
+			act 'Leave': gt 'club','inside'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'WC':
+cla
+*clr
+Set horny += 20
+clr
+gs 'stat'
+'You pee sitting on the toilet and began to wipe the vagina toilet paper. Apparently you pressed too hard because you embraced the thrill of touching between the legs.'
+act 'Leave': gt 'street'
+	act 'Caress herself':
+	cla
+	Set TQuest = 1
+	Set horny = 0
+	set mastr += 1
+	orgasm += 1
+	'You caress his fingers swollen pussy until you orgasm does not cover.'
+	'<center><img src="images\pics\tomas.jpg"></center>'
+	'After orgasm, you take it easy, but hear from the next stall pant, look at the wall you see that someone is peeking through the hole located in the wall.'
+	'The man behind the wall and realized that found giggled, great show. Eye of the holes in the wall and disappeared into it squeezed thousandth bill.'
+	Set money += 1000
+	gs 'stat'
+	act 'Leave': gt 'club','inside'
+	end
+end
+
+if $ARGS[0] = 'tualet2':
+cla
+*clr
+'You sit in a booth and hear how you behind the toilet comes someone to slam the door adjacent booths. Before you came that the two of them.'
+'Voice from the next stall told you - do not be afraid baby, we will not hurt you, on the contrary, we will give you a couple of delicious candy with cream filling.'
+act 'Leave': gt  'club','inside'
+	act 'Wait':
+	cla
+	Set slutiness += 10
+	'On both sides of your booth through holes in the walls climbed members. Voice on the wall said, come on, baby, come on, we´re fed.'
+	'You took both members of the hands and began to caress them, then bent over to one of the members and took it into his mouth.'
+	'<center><img src="images\pics\glory4.jpg"></center>'
+	wait 3000
+	cla
+	*clr
+	'You enthusiastically fucked by both members in turn.'
+	'<center><img src="images\pics\glory5.jpg"></center>'
+	wait 3000
+	cla
+	*clr
+	'Finally one of the men ends up in your mouth.'
+	'<center><img src="images\pics\glory6.jpg"></center>'
+	'You licks and start to finish processing the second term.'
+	wait 3000
+	cla
+	*clr
+	'The second man also lowers your mouth.'
+	'<center><img src="images\pics\glory7.jpg"></center>'
+	'You nakonchal mouthful hand you wipe the face, but in semen smeared all your face.'
+	Set horand = RAND(1,100)
+	if horand > horny: Set horny += 10 & 'You were not satisfied'
+	if horand <= horny: Set horny = 0 & 'You covered orgasm'
+	wait 3000
+	'Glad voice said from behind the wall - you´re a great pacifier, I think you´ve earned a reward.'
+	Set money += 3000
+	'Three thousand ruble banknote pokes through the hole in the wall.'
+	wait 1000
+	'A male voice said - it works for you. Take another card, if you want to come to have fun and make money.'
+	Set TQuest = 3
+	if pornstudio = 0: pornstudio = 2
+	Set guy += 2
+	Set bj+= 2
+	set swallow += 2
+	Set cumlip += 2
+	Set deep += 2
+	act 'Leave': gt 'club','inside'
+	end
+end
+--- Klub2 ---------------------------------
+

+ 461 - 0
locations/Komp

@@ -0,0 +1,461 @@
+# Komp
+if $ARGS[0] = 'start':
+cla
+clr
+gs 'stat'
+set elektro += 5
+'<center><img src="images\pics\komp.jpg"></center>'
+'With the computer happily welcomes you start window.'
+	act '15 minutes play patience': gt 'Komp','pasians'
+
+	if GameCD > 0: act 'Play Disopl': gt 'KGDstart'
+
+	if GameCD2 > 0: act 'Play Sunset Dead': gt 'KGZstart'
+
+	if GameCD3 > 0: act 'Play Albido': gt 'FSstart'
+	!act 'Sunset Review of the Dead': gt 'KGZstart'
+	if internet > 0:
+	set internet = internetM/60
+	'You´ve got <<internet>> hours of Internet'
+		act 'Browser': gt 'Komp','brows'
+	end
+	if webCam > 0 and webcamday ! day: act 'Make self porno': gt 'selfPorno','start'
+	if karta >= 10:
+	'You can pay online through your bank account. 1:00 Internet costs 10 rubles. On account of <<karta>>rubles.'
+
+		act 'Pay online bank account':
+			cla
+			intinp = input ("How much money to put on the internet? (h = 10 rubles).")
+			if intinp <= 0 or intinp * 10 > karta:
+				'Invalid amount.'
+			end
+			if intinp*10 <= karta:
+				set inttime = intinp * 10
+				set karta -= inttime
+
+				set internetM += intinp * 60
+				set internet = internetM/60
+				'You paid <<inttime>> hours of Internet, you now have <<internet>> hours of the Internet. Your account was removed <<intinp>> rubles.'
+			end
+			act 'Get out of the payment system': gt 'Komp','start'
+		end
+
+	end
+
+	act 'Shut down the computer':
+	cla
+	gt 'Komp','fin'
+	end
+end
+
+if $ARGS[0] = 'brows':
+cla
+*clr
+clr
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You entered into a search engine.'
+act 'Apartment repair site (0:15)': gt 'Komp','remont'
+if housr = 1 and husband = 0: act 'Rent your apartment': gt 'Komp','sale'
+act 'Porno (0:15)': gt 'Komp','porno'
+act 'Singles (0:15)': gt 'Komp','znak'
+if hour < 20 and hour > 7: act 'Jobs.su': gt 'Komp','rabota'
+act 'Cable TV services (0:15)': gt 'Komp','kabtv'
+act 'Online game': gt 'KGstart'
+if shantfoto > 0: act 'Search photos heroine in "In the ass."': gt 'Komp','foto'
+if gor_dorm = 7: act 'Letter from Evgenia': gt 'etoexhib','pos91'
+act 'Exit the browser': gt 'Komp','start'
+end
+
+if $ARGS[0] = 'sale':
+cla
+*clr
+set minut += 2
+clr
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You are logged in to the site for free ads.'
+if obkvsdam = 0 and housrA = 1:
+	act 'Rent out Residental apartment': set obkvsdam['Street'] = 1 & CompCheckedResponses = 1 & gt 'Komp','sale'
+	act 'Rent out Downtown apartment': set obkvsdam['Down'] = 1 & CompCheckedResponses = 1 & gt 'Komp','sale'
+	act 'Rent out Northern apartment': set obkvsdam['Nord'] = 1 & CompCheckedResponses = 1 & gt 'Komp','sale'
+	end
+if obkvsdam['Street']>0 or obkvsdam['Down']>0 or obkvsdam['Nord']>0:
+	act 'Check responses to your ad':
+		cla
+		CompCheckedResponses = 1
+		if obkvsdam['Street'] = 1: 'No one has responded to your residental apartment ad'
+		if obkvsdam['Down'] = 1: 'No one has responded to your downtown apartment ad'
+		if obkvsdam['Nord'] = 1: 'No one has responded to your northern apartment ad'
+		if obkvsdam['Street']>1 or obkvsdam['Down']>1 or obkvsdam['Nord']>1:
+			if obkvsdam['Street']>1:
+				set predsumm= (obkvsdam['Street'] * 1000) + 5000
+				'Want to stay in your residental apartment for a month (<<predsumm>> rub).'
+				act 'Rent (Residental)':
+					set sdaday['Street'] = day
+					set sdamonth['Street'] = month + 1
+					set houserent['Street'] = 1
+					set money += predsumm
+					gt 'Komp','sale'
+				end
+			end
+			if obkvsdam['Down']>1:
+				set predsumm= (obkvsdam['Down'] * 1000) + 5000
+				'Want to stay in your downtown apartment for a month (<<predsumm>> rub).'
+				act 'Rent (Downtown)':
+					set sdaday['Down'] = day
+					set sdamonth['Down'] = month + 1
+					set houserent['Down'] = 1
+					set money += predsumm
+					gt 'Komp','sale'
+				end
+			end
+			if obkvsdam['Nord']>1:
+				set predsumm= (obkvsdam['Nord'] * 1000) + 5000
+				'Want to stay in your northern apartment for a month (<<predsumm>> rub).'
+				act 'Rent (Northern)':
+					set sdaday['Nord'] = day
+					set sdamonth['Nord'] = month + 1
+					set houserent['Nord'] = 1
+					set money += predsumm
+					gt 'Komp','sale'
+				end
+			end
+		end
+		act 'Exit': gt 'Komp','start'
+	end
+end
+act 'Exit': gt 'Komp','start'
+end
+
+if $ARGS[0] = 'remont':
+cla
+*clr
+set minut += 15
+set internetM -= 60
+set elektro += 3
+clr
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You are logged in apartment repairs.'
+	if housr = 1:
+		if rembedr = 0:
+			act '50 refurbished bedrooms sput':
+			if money >= 50000:
+				cla
+				set rembedr = 1
+				set money -= 50000
+				'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
+			else
+				cla
+				'Unfortunately, you will not have enough money.'
+			end
+			act 'Exit': gt 'Komp','remont'
+			end
+		end
+
+		if remsitr = 0:
+			act 'Renovate hall 50,000 rubles':
+			if money >= 50000:
+				cla
+				set remsitr = 1
+				set money -= 50000
+				'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
+			else
+				cla
+				'Unfortunately, you will not have enough money.'
+			end
+			act 'Exit': gt 'Komp','remont'
+			end
+		end
+
+		if remkorr = 0:
+			act 'Repair corridor 50,000 rubles':
+			if money >= 50000:
+				cla
+				set remkorr = 1
+				set money -= 50000
+				'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
+			else
+				cla
+				'Unfortunately, you will not have enough money.'
+			end
+			act 'Exit': gt 'Komp','remont'
+			end
+		end
+
+		if remvanr = 0:
+			act 'Renovate the bathroom 50,000 rubles':
+			if money >= 50000:
+				cla
+				set remvanr = 1
+				set money -= 50000
+				'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
+			else
+				cla
+				'Unfortunately, you will not have enough money.'
+			end
+			act 'Exit': gt 'Komp','remont'
+			end
+		end
+
+		if remkuhr = 0:
+			act 'Renovate a kitchen 50,000 rubles':
+			if money >= 50000:
+				cla
+				set remkuhr = 1
+				set money -= 50000
+				'You pay for repairs and you did it the same, just Dzhumshut Ravshan and wizards.'
+			else
+				cla
+				'Unfortunately, you will not have enough money.'
+			end
+			act 'Exit': gt 'Komp','remont'
+			end
+		end
+	end
+
+act 'Exit': gt 'Komp','start'
+end
+
+if $ARGS[0] = 'porno':
+cla
+*clr
+set minut += 15
+set internetM -= 60
+set manna += 5
+set elektro += 3
+set willpower += RAND(5,10)
+set manna += RAND(10,50)
+set horny += 5
+clr
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You went to a porn site.'
+$pornomastr = {
+cls
+'<center><img src="images\pics\kompmas.jpg"></center>'
+set minut += 15
+sweat += 1
+set horny += RAND(10,25)
+if divanmastr = 0: divanmastr = 1 & set mastr += 1
+gs 'stat'
+'You get comfortable in front of the computer with one hand and began to fondle her breasts, a finger of the other hand you started rubbing and stroking a small bump between his legs that responded to the touch of pleasant languor covering your entire body.'
+if horny >= 100: orgasm += 1 & horny = 0 & 'Suddenly a nice cramp brought your body and you covered powerful orgasm from which you groan.'
+act 'Finish': divanmastr = 0 & gt 'Komp','porno'
+if horny >= 50: act 'Proceed': dynamic $pornomastr
+}
+
+	act 'Watch porn on':
+	cla
+	'<center><img src="images\etogame\porno.jpg"></center>'
+	gt 'Komp','porno'
+	end
+
+	if horny >= 50: act 'Masturbate (0:15)': dynamic $pornomastr
+
+act 'Exit': gt 'Komp','start'
+end
+
+if $ARGS[0] = 'pasians':
+cla
+*clr
+set minut += 15
+set manna += 5
+set elektro += 3
+set willpower += RAND(5,10)
+set manna += RAND(10,50)
+clr
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You entertained for an hour unfolding of solitaire on the computer.'
+act 'Lay another 15 minutes': gt 'Komp','pasians'
+act 'Close Solitaire': gt 'Komp','start'
+end
+
+if $ARGS[0] = 'znak':
+cla
+*clr
+set minut += 15
+set internetM -= 60
+set manna += 5
+set elektro += 3
+clr
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You are logged on to a dating site.'
+'Selection of boys is only possible if there is no boyfriend.'
+
+	if bfA <= 0:
+		act 'To pick up a guy with a gentle disposition':
+		cla
+		gs 'boy'
+		gs 'boyfrend','start'
+		set stopboy = 0
+		set harakBoyA = 0
+		'You wrote a guy named <<$boyA>>and talked with him and left him telefonchik hoping that he will call you.'
+		act 'Exit': gt 'Komp','start'
+		end
+
+		act 'To pick up a guy with a common character':
+		cla
+		gs 'boy'
+		gs 'boyfrend','start'
+		set stopboy = 0
+		set harakBoyA = 1
+		'You wrote a guy named <<$boyA>>and talked with him and left him telefonchik hoping that he will call you.'
+		act 'Exit': gt 'Komp','start'
+		end
+
+		act 'To pick up a guy with a strong character':
+		cla
+		gs 'boy'
+		gs 'boyfrend','start'
+		set stopboy = 0
+		set harakBoyA = 2
+		'You wrote a guy named <<$boyA>>and talked with him and left him telefonchik hoping that he will call you.'
+		act 'Exit': gt 'Komp','start'
+		end
+	end
+	if gor_dorm = 8:
+		act 'Pick suitors for Eugene':
+			cla
+			gor_dorm = 9
+			'You shoveled tens of questionnaires before selecting suitable candidates in all respects and sent letters inviting them to meet.'
+			'Now we have to wait her turn, something with them or not.'
+			act 'Leave': gt 'Komp','start'
+		end
+	end
+
+
+act 'Exit': gt 'Komp','start'
+end
+
+if $ARGS[0] = 'kabtv':
+cla
+*clr
+set minut += 15
+set internetM -= 60
+set elektro += 3
+clr
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You are logged in to the website provider of cable TV.'
+	if kabel = 1:
+		'Do you have a cable TV (subscription fee of 300 rubles per month lifted the 25th day of)'
+		act 'Abandon cable TV':
+		cla
+		'You have disconnected cable channels, paying the current month'
+		kabel = 1
+		money = money - 300
+		gt 'Komp','kabtv'
+		end
+	end
+	if kabel = 0 and TV = 1:
+		'You do not have a cable TV'
+		act 'Connect cable TV':
+		cla
+		'Unfortunately for viewing cable television requires a more modern TV'
+		gt 'Komp','kabtv'
+		end
+	end
+	if kabel = 0 and TV >= 2:
+		'You do not have a cable TV'
+		act 'Connect Cable TV (300 rubles per month)':
+		cla
+		'You hooked up cable TV services'
+		kabel = 1
+		gt 'Komp','kabtv'
+		end
+	end
+act 'Exit': gt 'Komp','start'
+end
+
+if $ARGS[0] = 'foto':
+cla
+*clr
+set internetM -= 60
+set elektro += 3
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+'You are logged in to the social network "in the ass."'
+	if shantfoto > 0:
+		act 'Search':
+		cla
+		set minut += 60
+		set fotsearchrand = rand(0,10)
+			if fotsearchrand <= 7:
+			'You did not find anyone, maybe better luck later.'
+			act 'Finish': gt 'Komp','foto'
+			end
+			if fotsearchrand > 7:
+			set shantfoto -= 1
+			set gerofotorand = rand(0,100)
+			'You found the heroine a photo shoot'
+				if gerofotorand > 30:
+				'Judging by the photos on her page this poor girl and take her with nothing.'
+				act 'Finish': gt 'Komp','foto'
+				end
+				if gerofotorand >= 5 and gerofotorand <= 30:
+				set shantsr += 1
+				'Judging by the photos on her page is non-existent girl from the middle classes. You send her photo and asked to be transferred to your account 5000.'
+				act 'Finish': gt 'Komp','foto'
+				end
+				if gerofotorand < 5:
+				set shantbog += 1
+				'Judging by the photos on her page is very secured lady. You send her photo and asked to be transferred to your account 30000.'
+				act 'Finish': gt 'Komp','foto'
+				end
+			end
+		end
+	end
+act 'Browser': gt 'Komp','brows'
+end
+
+if $ARGS[0] = 'rabota':
+cla
+*clr
+set minut += 60
+set internetM -= 60
+set komprabota = RAND(0,10)
+gs 'stat'
+'<center><img src="images\pics\komp.jpg"></center>'
+if komprabota = 0:
+	'You found an ad: "Wanted girl model looks for advertising underwear, cash on filming zavershinii 2000 rubles."'
+	if vnesh < 30: 'But you are under this description does not fit'
+	if vnesh >= 30:
+		act 'Go at': gt 'qjob','var1'
+		end
+	if hour < 20 and hour > 7: act 'Search more': gt 'Komp','rabota'
+	act 'Finish': gt 'Komp','brows'
+	end
+if komprabota = 1:
+	'You found an ad: "Wanted girl model looks for advertising underwear, cash on filming zavershinii 2000 rubles."'
+	if vnesh < 30: 'But you are under this description does not fit'
+	if vnesh >= 30:
+		act 'Go at': gt 'qjob','var2'
+		end
+	if hour < 20 and hour > 7: act 'Search more': gt 'Komp','rabota'
+	act 'Finish': gt 'Komp','brows'
+	end
+if komprabota > 1 and komprabota < 5:
+	'You found an ad: "The artist is required naturschitsa, simpotichnoy appearance, cash 1,000 rubles."'
+	if vnesh < 15: 'But you are under this description does not fit'
+	if vnesh >= 15:
+		act 'Go at': gt 'qjob','var3'
+		end
+	if hour < 20 and hour > 7: act 'Search more': gt 'Komp','rabota'
+	act 'Finish': gt 'Komp','brows'
+	end
+if komprabota > 4:
+	'You did not find anything suitable.'
+	if hour < 20 and hour > 7: act 'Search more': gt 'Komp','rabota'
+	act 'Finish': gt 'Komp','brows'
+	end
+end
+
+if $ARGS[0] = 'fin':
+gt $locM, $metkaM
+end
+--- Komp ---------------------------------
+

+ 62 - 0
locations/Kwlake1

@@ -0,0 +1,62 @@
+# Kwlake1
+clr
+gs 'stat'
+'<center><img src="images\img\Lake\kwlake1\kwlake1.jpg"></center>'
+'Walking along the beach you notice unusual stone shapes resembling dildo.'
+'"Look how cool" interrupting you Kat story about some guy pointing at the stone.'
+'Kate raises stone, inspects and laughing puts it in his mouth blow job portraying'
+act 'Laugh.': gt 'Kwlake1','end'
+act 'Fondle her.':
+	cla
+	*clr
+	set kat += 5
+	set lesbian += 1
+	'<center><img src="images\img\Lake\kwlake1\kwlake2.jpg"></center>'
+	'You Spit pubis Katie, and descends below his hand running his fingers over her pussy. Kat little straddle, you go down on your knees and kiss her crotch, slowly moving to her pussy and starting to caress her tongue.'
+	act 'Lie down':
+		cla
+		*clr
+		set kuni += 1
+		'<center><img src="images\img\Lake\kwlake1\kwlake3.jpg"></center>'
+		'You lie on the sand, Kate gives you the stone, and she spends the language of your razgorechenomu body from neck to crotch and begins to caress your tongue. You are so excited that without noticing take a stone in his mouth and start to suck it. Kat you are so enthusiastic about each other that nazametili approached the guy, he has meanwhile play their yaldu a few minutes you will notice it.'
+		act 'Leave': gt 'Nudelake'
+		act 'Man beckon':
+			cla
+			*clr
+			set kat += 5
+			set mastr += 1
+			set orgasm += 1
+			'<center><img src="images\img\Lake\kwlake1\kwlake4.jpg"></center>'
+			'You beckon Man, he comes and stops in indecision, not knowing who to approach you or Kate. But Kate did not give him a long time to arrive in thought, turning to him Kate grabbed his dick lips, leaving your expiring pussy alone, but you are not taken aback by inserting a stone at her, began to masturbate until you have brought yourself to orgasm.'
+			act 'Approach the Cat':
+				cla
+				*clr
+				'<center><img src="images\img\Lake\kwlake1\kwlake5.jpg"></center>'
+				'While you have already masturbated Kate straddled Man, you come to it apply the stone to his pubis, Kate with a smile enough Kamet lips licking your juices from it.'
+				act '...':
+					cla
+					*clr
+					set anal += 1
+					'<center><img src="images\img\Lake\kwlake1\kwlake6.jpg"></center>'
+					'Katya guy posing on all fours and enters her ass, you also get up on all fours ass turning to Kate and give her the stone. Kat is not thinking long stone inserts in your anus.'
+					act '...':
+						cla
+						*clr
+						'<center><img src="images\img\Lake\kwlake1\kwlake7.jpg"></center>'
+						'Sated Katina ass guy puts her on her knees and cums in her mouth'
+						act 'Leave': gt 'Nudelake'
+						end
+					end
+				end
+			end
+		end
+	end
+
+if $ARGS[0] = 'end':
+cla
+'"Pervert" laughing at you'
+'"What an easy blowjob stone god can make my guy eternal risers." Kate laughs and throws a rock and returns to its Raskaz.'
+act 'Finish': gt 'Nudelake'
+end
+--- Kwlake1 ---------------------------------
+

+ 42 - 0
locations/Kwlake2

@@ -0,0 +1,42 @@
+# Kwlake2
+clr
+gs 'stat'
+'<center><img src="images\img\Lake\kwlake2\kwlake1.jpg"></center>'
+'Walking along the beach you notice a man sitting alone.'
+'"Let´s sit here not much" Katia offers.'
+act '"No, let´s go."': gt 'Nudelake'
+act '"Come on."':
+	cla
+	*clr
+	set kat += 5
+	'<center><img src="images\img\Lake\kwlake2\kwlake2.jpg"></center>'
+	'You sodites nedoleko of men, Kate starts stroking your pussy and kissing his chest, you watch the corner of my eye a man, seeing this view he perked up, rolled over and slid under her arm.'
+	act '"Kat. Enough, went away"': gt 'Nudelake'
+	act 'Call a man':
+		cla
+		*clr
+		set kat += 5
+		set kuni += 1
+		set bj += 1
+		'<center><img src="images\img\Lake\kwlake2\kwlake3.jpg"></center>'
+		'When Kate starts to lick your pussy, you beckon a man, he quickly jumps up and runs over to you, taking on the go pants. Man ran up opuskaetsyaryadom with you on your knees, poking his cock in your face. Once you had preotkryt mouth as he once put it in his penis and not waiting when you start to suck, fuck your mouth started.'
+		act '...':
+			cla
+			*clr
+			set sex += 1
+			'<center><img src="images\img\Lake\kwlake2\kwlake4.jpg"></center>'
+			'When he was tired of your mouth, he lay on his back, and you put on yourself, back to him. Kate stood over you substituting her pussy to your mouth. While the man handles your vagina, you licked Kat and it soon bore fruit. Kate hugged you tightly clenched to her pussy and you felt like she shuddered and her juices flowed into your mouth.'
+			act '...':
+				cla
+				*clr
+				set cumlip += 1
+				set orgasm += 1
+				'<center><img src="images\img\Lake\kwlake2\kwlake5.jpg"></center>'
+				'Soon the man removed you from yourself and putting on his knees again put his dildo into your mouth. Kate also settled down under you, caressing your tongue clitoris. You feel like your bosom pleasant warmth spreads, you clung more to Kat literally pushing her head in the sand. Dick in your mouth and you, too, trembled finished almost simultaneously, a man poured your mouth with his sperm, and your juices flowed in her mouth Katie.'
+				act 'Leave': gt 'Nudelake'
+				end
+			end
+		end
+	end
+--- Kwlake2 ---------------------------------
+

+ 135 - 0
locations/LCporn

@@ -0,0 +1,135 @@
+# LCporn
+if $ARGS[0] = 'firsttime':
+cla
+*clr
+set JenyaLCfirst = 1
+gs 'stat'
+'You walk into the kitchen, then fold into the pantry. Eugene looks at you look awkward and says:'
+'-This may scare you a bit, but you had to someday find out ...'
+'She priopuskaet skirt and you see ... dick! Eugene begins to caress his fingers, looking at you. She touches your chest.'
+'<center><img src="images\LakeCafe\LakeFirstTime.jpg"></center>'
+	act 'Proceed':
+	cla
+	*clr
+	set randlcpic = RAND(1,7)
+	!set sex += 1
+	set sexfuta += 1
+	!set cumass += 1
+	!set cumpussy += 1
+	set JenyaLC += 5
+	set minut += 40
+	set $nameV = 'Zhenya'
+	$boy = 'Zhenya'
+	set dick = 17
+	set silavag = 1
+	pose = 1
+	gs 'stat'
+	if randlcpic = 1: '<center><img src="images\LakeCafe\RandSex1\1.jpg"></center>'
+	if randlcpic = 2: '<center><img src="images\LakeCafe\RandSex1\2.jpg"></center>'
+	if randlcpic = 3: '<center><img src="images\LakeCafe\RandSex1\3.jpg"></center>'
+	if randlcpic = 4: '<center><img src="images\LakeCafe\RandSex1\4.jpg"></center>'
+	if randlcpic = 5: '<center><img src="images\LakeCafe\RandSex1\5.jpg"></center>'
+	if randlcpic = 6: '<center><img src="images\LakeCafe\RandSex1\6.jpg"></center>'
+	if randlcpic = 7: '<center><img src="images\LakeCafe\RandSex1\7.jpg"></center>'
+	*nl
+	*nl
+	'You allow it to continue. She takes off your clothes and you lie on the mattress together.'
+	dynamic $sexudo
+	dynamic $sexcum
+		act 'Exit': gt 'Lakecafe','main'
+	end
+
+	act 'Leave':
+	cla
+	*clr
+	'Frightened, you get away from the barbecue.'
+	set JenyaLC -= 10
+	set minut += 7
+	gs 'stat'
+		act '...': gt 'nord'
+	end
+end
+
+if $ARGS[0] = 'sex':
+cla
+*clr
+'<center><img src="images\LakeCafe\LakeFirstTime.jpg"></center>'
+'Eugene leads you to the closet and looks at you expectantly.'
+set randlcpic = RAND(1,7)
+	act 'Vaginal':
+	cla
+	*clr
+	set sexfuta += 1
+	set JenyaLC += 5
+	set minut += 40
+	Set horand = RAND(1,100)
+	set $nameV = 'Zhenya'
+	$boy = 'Zhenya'
+	set dick = 17
+	set silavag = 1
+	pose = 1
+	if randlcpic = 1: '<center><img src="images\LakeCafe\RandSex1\1.jpg"></center>'
+	if randlcpic = 2: '<center><img src="images\LakeCafe\RandSex1\2.jpg"></center>'
+	if randlcpic = 3: '<center><img src="images\LakeCafe\RandSex1\3.jpg"></center>'
+	if randlcpic = 4: '<center><img src="images\LakeCafe\RandSex1\4.jpg"></center>'
+	if randlcpic = 5: '<center><img src="images\LakeCafe\RandSex1\5.jpg"></center>'
+	if randlcpic = 6: '<center><img src="images\LakeCafe\RandSex1\6.jpg"></center>'
+	if randlcpic = 7: '<center><img src="images\LakeCafe\RandSex1\7.jpg"></center>'
+	*nl
+	*nl
+	'Zhenya you undress, and then lie down on the mattress.'
+	dynamic $sexudo
+	dynamic $sexcum
+	gs 'stat'
+		act 'Exit': gt 'Lakecafe','main'
+	end
+
+	act 'Oral':
+	cla
+	*clr
+	set bj += 1
+	set sexfuta += 1
+	set JenyaLC += 5
+	set minut += 20
+	set cumface += 1
+	set facial += 1
+	set minut += 40
+	set $nameV = 'Zhenya'
+	$boy = 'Zhenya'
+	Set horand = RAND(1,100)
+
+	if randlcpic = 1: '<center><img src="images\LakeCafe\RandSex2\1.jpg"></center>'
+	if randlcpic = 2: '<center><img src="images\LakeCafe\RandSex2\2.jpg"></center>'
+	if randlcpic = 3: '<center><img src="images\LakeCafe\RandSex2\3.jpg"></center>'
+	if randlcpic = 4: '<center><img src="images\LakeCafe\RandSex2\4.jpg"></center>'
+	if randlcpic = 5: '<center><img src="images\LakeCafe\RandSex2\5.jpg"></center>'
+	if randlcpic = 6: '<center><img src="images\LakeCafe\RandSex2\6.jpg"></center>'
+	if randlcpic = 7: '<center><img src="images\LakeCafe\RandSex2\7.jpg"></center>'
+	*nl
+	*nl
+	'Zhenya undress you, then you are clasped her jaw member. Eugene takes vases by the hair and fucks you in the mouth. Groaning, Jack pulled out his cock and cum on you face, then dressed and came out of the closet.'
+	gs 'oral','0'
+	gs 'stat'
+		act 'Exit': gt 'Lakecafe','main'
+	end
+end
+
+
+if $ARGS[0] = 'toiletsex':
+cla
+*clr
+set dick = 14
+set hj += 1
+$nameV = 'Muzhik'
+set $boy = 'Muzhik'
+'<center><img src="images\LakeCafe\ToiletSexEnd.jpg"></center>'
+'You came from behind and hugged the man. Going down to his cock, you started nadrachivat it. Man stopped you took my hand and led through the back door into the street. Relegating you for dustbins, he bent and began to fuck you.'
+dynamic $sexudo
+dynamic $sexcum
+act 'Leave':
+gt 'laketoilet','main'
+end
+
+end
+--- LCporn ---------------------------------
+

+ 222 - 0
locations/LCwork

@@ -0,0 +1,222 @@
+# LCwork
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! LC WORK 1: start
+if $ARGS[0] = 'start1':
+set horand = RAND(1,100)+ 40
+set facial += 1
+set gang += 1
+set slutty += 1
+set anal += 1
+set bj += 1
+dynamic $venerasiak
+set randLCpay = RAND(500,2000)
+set minut += 140
+guy += randguycafe
+if vagina < 20: vagina += randguycafe
+cla
+*clr
+'<center><img src="images\LakeCafe\LakeWork\1a.jpg"></center>'
+'You walk up to a group of men and say that today you serve them. They get up and lead you to the car. During the trip they were stroking your boobs and legs, put their hands in her panties and fingers in his mouth. When you came, they stripped and put you in position. You guys ripped into all the cracks, and then obkonchali your entire body.'
+if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+if horand > horny: Set horny += 10 & 'You were not satisfied'
+	act '...':
+	cls
+	'<center><img src="images\LakeCafe\LakeWork\1b.jpg"></center>'
+	'They gave you wash and able to take to the house. You got for it <<randLCpay>> rubleyyu'
+	gs 'stat'
+	act '...': set money += randLCpay & gt 'street'
+	end
+end
+
+
+!LC WORK 1: end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! LC WORK 2: start
+if $ARGS[0] = 'start2':
+cla
+*clr
+set horand = RAND(1,100)
+set sex += 1
+set slutty += 1
+set facial += 1
+set cumface += 1
+set randLCpay = RAND(500,2000)
+set minut += 140
+if vagina < 18: vagina += 1
+dynamic $venerasiak
+guy += 1
+'<center><img src="images\LakeCafe\LakeWork\2a.jpg"></center>'
+'You walk up to the old man and say that you have come to serve him. He gets up priobnimaet you and you go with him to his car. He takes you into the woods, where you stop and undresses. He spread your legs and fuck you in the pussy, then finished on your face.'
+if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+if horand > horny: Set horny += 10 & 'You were not satisfied'
+
+	act '...':
+	cls
+	'<center><img src="images\LakeCafe\LakeWork\2b.jpg"></center>'
+	'He got into his car and drove you home. For this you got <<randLCpay>> rubles.'
+	gs 'stat'
+	act '...': set money += randLCpay & gt 'street'
+	end
+end
+
+!LC WORK 2: end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! LC WORK 3: start
+if $ARGS[0] = 'start3':
+cla
+*clr
+set horand = RAND(1,100) + 20
+set sex += 1
+set anal += 1
+set bj += 1
+set slutty += 1
+set facial += 1
+set cumface += 1
+set cumlip += 1
+set randLCpay = RAND(500,2000)
+set minut += 140
+dynamic $venerasiak
+guy += 2
+if vagina < 18: vagina += 2
+'<center><img src="images\LakeCafe\LakeWork\3a.jpg"></center>'
+'You walk up to the two guys and say you go with them today. They lead you into the car and taken to the apartment, where you fuck in all the cracks. Groaning, they got their huytsy and finished on your face.'
+if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+if horand > horny: Set horny += 10 & 'You were not satisfied'
+
+	act '...':
+	cls
+	'<center><img src="images\LakeCafe\LakeWork\3b.jpg"></center>'
+	'Without giving you a wash, they kicked you out of the house. For this you got <<randLCpay>> rubles.'
+	gs 'stat'
+	act '...': set money += randLCpay & gt 'Nord'
+	end
+end
+!LC WORK 3: end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! LC WORK 4: start
+if $ARGS[0] = 'start4':
+cla
+*clr
+set horand = RAND(1,100) + 20
+set sex += 1
+set kuni += 1
+set gang += 1
+set lesbian += 1
+set anal += 1
+set bj += 1
+set slutty += 1
+set cumbelly += 1
+set randLCpay = RAND(500,2000)
+set minut += 140
+dynamic $venerasiak
+girl += 1
+guy += 1
+if vagina < 18: vagina += 1
+'<center><img src="images\LakeCafe\LakeWork\4a.jpg"></center>'
+'You go up to the couple and say that today serve them. They lead you to his apartment. You start with a girl every way to please the guy. After a while the man could not resist and you finished on the tummy. His girlfriend licked a little seed from your belly.'
+if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+if horand > horny: Set horny += 10 & 'You were not satisfied'
+	act '...':
+	cls
+	'<center><img src="images\LakeCafe\LakeWork\4b.jpg"></center>'
+	'You went out of their apartment and came to the house. For this you got <<randLCpay>> rubles.'
+	act '...': set money += randLCpay & gt 'street'
+	end
+end
+
+!LC WORK 4: end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! LC WORK 5: start
+if $ARGS[0] = 'start5':
+set horand = RAND(1,100)
+set lesbian += 1
+set kuni += 1
+set slutty += 1
+set randLCpay = RAND(500,2000)
+girl += 1
+dynamic $venerasiak
+cla
+*clr
+'<center><img src="images\LakeCafe\LakeWork\5.jpg"></center>'
+'You walk up to a girl and say that you are with her today. It leads you to his apartment. Girl you start to fondle each other, Suva fingers and all objects in their holes. After playing, she lets you.'
+if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+if horand > horny: Set horny += 10 & 'You were not satisfied'
+'You came out of her apartment and came to the house. For this you got <<randLCpay>> rubles.'
+gs 'stat'
+	act '...': set money += randLCpay & gt 'street'
+end
+
+
+!LC WORK 5: end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! LC WORK 6: start
+if $ARGS[0] = 'start6':
+cla
+*clr
+set horand = RAND(1,100)
+set sex += 1
+set hj += 1
+set facial += 1
+set slutty += 1
+set randLCpay = RAND(500,2000)
+guy += 1
+dynamic $venerasiak
+if vagina < 18: vagina += 1
+'<center><img src="images\LakeCafe\LakeWork\6a.jpg"></center>'
+'You go up to the fat man, and say that today serve it. He leads you to the car and drives to his house, where you fucking vagina. Groaning, he pulled out his dick and you masturbate member took semen on your face.'
+if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+if horand > horny: Set horny += 10 & 'You were not satisfied'
+	act '...':
+	cls
+	'<center><img src="images\LakeCafe\LakeWork\6b.jpg"></center>'
+	'You went out of their apartment and came to the house. For this you got <<randLCpay>> rubles.'
+	gs 'stat'
+	act '...': set money += randLCpay & gt 'street'
+	end
+end
+!LC WORK 6: end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! LC WORK KITCHEN: start
+if $ARGS[0] = 'Kitchen':
+cla
+*clr
+set minut += 90
+set LCwork2 += 1
+set money += 175
+set LCwork2day = day
+'<center><img src="images\LakeCafe\KitchenWorkCafe.jpg"></center>'
+*nl
+'You wash the dishes, floors, chop vegetables, cook food for half an hour, for what you give your deserved 175 rubles.'
+	act '...':
+	gt 'lakecafe','main'
+	end
+end
+! LC WORK KITCHEN: end
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+--- LCwork ---------------------------------
+

+ 21 - 0
locations/LOCA

@@ -0,0 +1,21 @@
+# LOCA
+if $MAINTXT = '':
+	'<center><B><font color = red>Error</font></B></center>'
+
+	*nl
+	*nl
+
+	'<center>Please report this error this error informing the line below.</center>'
+	'<center>Area:<<$loc>> Location:<<$curloc>> Sub:<<$args[0]>></center>'
+
+	!gs 'dexcheats'
+
+	dynamic $dex_debug_loc
+	dynamic $dex_cheat_character_stats
+
+	act 'ESCAPE TO STREET': gt 'street'
+	act 'GO TO START': gt $CurLoc,'start'
+end
+
+--- LOCA ---------------------------------
+

+ 92 - 0
locations/Mariya1

@@ -0,0 +1,92 @@
+# Mariya1
+	'- How can I help you?'
+act 'Move away': gt 'rack'
+if nom_1 = 0:
+	act 'Ask about plans for the evening':
+	cla
+		'- What are you doing tonight?'
+		'- Meeting with her husband. Anything else?'
+	act 'Move away': gt 'rack'
+	end
+
+	if tobiQW = 2000:
+		act 'Why in the hotel so crowded?':
+		cla
+		tobiQW = 2001
+			'- Why so crowded in the hotel?'
+			'- Then stop members of Congress rare languages, as they call themselves quack.'
+		act 'Move away': gt 'rack'
+		end
+	end
+end
+if nomer = 0:
+	*clear
+	act 'Stay':
+		'- I would like to stay'
+		'- Well, what would you like?'
+		cla
+		act 'Cheap room':
+			'- Cheap room'
+			nomer = 1
+			nom_1 = 1
+			gt 'mariya1'
+		end
+		act 'Standard Room':
+			'- Standard Room'
+			nomer = 2
+			nom_1 = 1
+			gt 'mariya1'
+		end
+		act 'Suite':
+			'- Suite'
+			nomer = 3
+			nom_1 = 1
+			gt 'mariya1'
+		end
+		act 'Presidential Suite':
+			'- Presidential Suite'
+			nomer = 4
+			nom_1 = 1
+			gt 'mariya1'
+		end
+	end
+end
+if nom_1 = 1 and flag = 0:
+	*clear
+	cla
+	'- You shoot a room for one night.'
+	sto_nom = nom_o[nomer]
+	'- It will cost <<sto_nom>>'
+	cla
+	act 'Pay':
+		if sto_nom > money:
+			msg 'Not enough money'
+			srokarend = 0
+			nomer = 0
+			nom_1 = 0
+			gt 'mariya1'
+		end
+		money = money - sto_nom
+		flag = 1
+		nom_1 = 0
+		nom_nom = rand(1,1000)
+		'Thank you for using our services'
+		'Your room <<nom_nom>>'
+		cla
+		act 'Goodbye':
+			gt 'rack'
+		end
+	end
+	act 'Change Your Mind':
+		nomer = 0
+		nom_1 = 0
+		gt 'mariya1'
+	end
+end
+if nom_1 = 0:
+	act 'Move away':
+		gt 'rack'
+	end
+end
+--- Mariya1 ---------------------------------
+

+ 178 - 0
locations/Market

@@ -0,0 +1,178 @@
+# Market
+'<center><B>Market</B></center>'
+'<center><img src="images\etogame\rinok2.jpg"></center>'
+Set час += 1
+Set horny += 1
+if car = 0: Set money -= 20 & 'You get on the shuttle bus and pay the fare of 20 rubles.'
+if car > 0 and benzin > 0: Set benzin -= 1 & 'You reached into your <<$marka>>.'
+if car > 0 and benzin <= 0: Set money -= 20 & 'You ran out of gas and you had to go on the bus, paying the fare of 20 rubles.'
+'Bustling market, you can buy in the market place to buy clothes or for 30,000 rubles and receive income from the outlet, but for the purchase and delivery of course need to have a car. You can trade yourself or hire a saleswoman.'
+clr
+gs 'stat'
+act 'Buy': gt 'RynokP','choice'
+act 'Go home': gt 'street'
+if rinwork > 0 and час < 9:
+	act 'Salesmen':
+	cla
+	*clr
+	Set час = 17
+	Set fat += 5
+	Set monrand = RAND(500,2000)
+	Set money += monrand
+	clr
+	gs 'stat'
+
+	'You all day selling things in the market and earned <<monrand>> rubles'
+	Set rinrand = RAND(1,100)
+		if rinrand < 70 and palevorin = 0 and rinhoz = 0:
+		act 'Go home': gt 'street'
+		end
+
+		if rinrand >= 70 and palevorin = 0 and rinhoz = 0:
+		'To you approached the owner of the tent and began to pester you, promising to write premium'
+			act 'Refuse':
+			cla
+			Set money -= 2000
+			'The owner imposes on you a fine of 2,000 rubles'
+			act 'Go home': gt 'street'
+			end
+		act 'Ogle': gt 'RynokHoz','start'
+		end
+
+		if rinrand < 60 and palevorin = 0 and rinhoz = 1:
+		act 'Go home': gt 'street'
+		end
+		if rinrand >= 60 and palevorin = 0 and rinhoz = 1:
+		'To you approached the owner of the tent and began to pester you, promising to write premium'
+			act 'Refuse':
+			cla
+			Set money -= 2000
+			'The owner imposes on you a fine of 2,000 rubles'
+			act 'Go home': gt 'street'
+			end
+		act 'Ogle': gt 'RynokHoz','start'
+		end
+
+		if rinrand < 60 and palevorin = 1:
+		'On the market there is a rumor among the sellers that you fucks boss tray'
+		act 'Go home': gt 'street'
+		end
+
+		if rinrand >= 60 and palevorin = 1:
+		'To you approached the owner of the tent and began to pester you, promising to write premium'
+			act 'Refuse':
+			cla
+			Set money -= 2000
+			'The owner imposes on you a fine of 2,000 rubles'
+			act 'Go home': gt 'street'
+			end
+		act 'Ogle': gt 'RynokHoz','start'
+		end
+
+		if rinrand < 40 and palevorin = 2:
+		'On the market there is a rumor among the sellers that you fucks boss tray with buddies'
+		Set slutrand = RAND(1,100)
+			if slutrand >= 70:
+			'After work, you came to the Armenian and tried to persuade you a blowjob.'
+			act 'Agree': gt 'RynokHoz','opusteha2'
+			end
+		act 'Go home': gt 'street'
+		end
+
+		if rinrand >= 40 and rinrand < 70 and palevorin = 2:
+		'To you approached the owner of the tent and began to pester you, promising to write premium'
+			act 'Refuse':
+			cla
+			Set money -= 2000
+			'The owner imposes on you a fine of 2,000 rubles'
+			act 'Go home': gt 'street'
+			end
+		act 'Ogle': gt 'RynokHoz','start'
+		end
+
+		if rinrand >= 70 and palevorin = 2:
+		'To you approached the owner of the tent c already familiar to you guys and they began to entice you to perform oral sex, promising to write premium'
+			act 'Refuse':
+			cla
+			Set money -= 2000
+			'The owner imposes on you a fine of 2,000 rubles'
+			act 'Go home': gt 'street'
+			end
+		act 'Ogle': gt 'RynokHoz','opusteha'
+		end
+	end
+
+	act 'Resign':
+	cla
+	Set work = 0
+	Set rinwork = 0
+	'You are fired.'
+	act 'Go home': gt 'street'
+	end
+
+end
+
+if busRinok = 0 and money >= 30000 and car > 0:
+	act 'Buy a place in the market for a month 30000 rub':
+	cla
+	Set busRinok = 30
+	Set money -= 30000
+	'You bought a place in the market for 30,000 rubles. You need the goods'
+	act 'Go home': gt 'street'
+	end
+end
+!с 7 до 16, 9 часов
+if busRinok > 0 and tovarR > 0 and rinhour ! число:
+	act 'Trade independently':
+	cla
+	Set fat -= 2
+	Set rinhour = число
+	Set torghour = 16 - rinhour
+	Set torgrand = RAND(1,50)
+	if tovarR >= torgrand: Set tovarR -= torgrand
+	if tovarR < torgrand: Set torgrand = tovarR & Set tovarR = 0
+	Set torgmoney = torgrand * 200
+	Set money += torgmoney
+	'You´ve earned a day <<torgmoney>> rubles, sold out <<torgrand>> pieces of the item, you have <<tovarR>> units of goods.'
+	Set час = 17
+	Set torgmoney = 0
+	clr
+	gs 'stat'
+	act 'Go home': gt 'street'
+	end
+
+	if rinokTorg = 0 and rinhour ! число:
+		act 'Hire a saleswoman':
+		cla
+
+		Set rinokTorg = 1
+		'You hired saleswoman 1000 rubles per day'
+		act 'Go home': gt 'street'
+		end
+	end
+	if rinokTorg = 1 and rinhour ! число and tovarR > 0:
+		act 'Release the goods saleswoman.':
+		cla
+		Set rinokTorgW = 1
+		Set rinhour = число
+		Set torghour = 16 - rinhour
+		Set torgrand = RAND(1,50)
+		if tovarR >= torgrand: Set tovarR -= torgrand
+		if tovarR < torgrand: Set torgrand = tovarR & Set tovarR = 0
+		Set torgmoney = torgrand * 200
+		'You have given goods saleswoman, she can trade on their own.'
+		act 'Go home': gt 'street'
+		end
+	end
+end
+
+if rinokTorg = 1 and rinhour ! число:
+	act 'Dismiss saleswoman':
+	cla
+	Set rinokTorg = 0
+	'You hired fired saleswoman'
+	act 'Go home': gt 'street'
+	end
+end
+--- Market ---------------------------------
+

+ 103 - 0
locations/MenuLoc

@@ -0,0 +1,103 @@
+# MenuLoc
+if $ARGS[0] = 'zapis':
+$zapis+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis2':
+$zapis2+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis3':
+$zapis3+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis4':
+$zapis4+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis5':
+$zapis5+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis6':
+$zapis6+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis7':
+$zapis7+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis8':
+$zapis8+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis9':
+$zapis9+= input ("What do you want to record?")
+gs 'stat'
+end
+
+if $ARGS[0] = 'zapis10':
+$zapis10+= input ("What do you want to record?")
+gs 'stat'
+end
+
+
+if $ARGS[0] = 'diszapis':
+$zapis = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis2':
+$zapis2 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis3':
+$zapis3 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis4':
+$zapis4 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis5':
+$zapis5 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis6':
+$zapis6 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis7':
+$zapis7 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis8':
+$zapis8 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis9':
+$zapis9 = ''
+gs 'stat'
+end
+
+if $ARGS[0] = 'diszapis10':
+$zapis10 = ''
+gs 'stat'
+end
+--- MenuLoc ---------------------------------
+

+ 11 - 0
locations/MenuMainLoc

@@ -0,0 +1,11 @@
+# MenuMainLoc
+if $ARGS[0] = '0':
+ETOmenu = 0
+gs 'stat'
+end
+if $ARGS[0] = '1':
+ETOmenu = 1
+gs 'stat'
+end
+--- MenuMainLoc ---------------------------------
+

+ 162 - 0
locations/Military

@@ -0,0 +1,162 @@
+# Military
+if $ARGS[0] = 'start':
+$sexloc = $CURLOC
+gs 'stat'
+'<center><B><font color = maroon>polygon</font></B></center>'
+'<center><img src="images\img\military\military.jpg"></center>'
+'Full of people around, near the tent city, and many guys are running around with guns.'
+
+act 'Work in the infirmary':
+cla
+set minut += 60
+set sanrand = rand(0,10)
+if sanrand = 0: gt 'Military','san0'
+if sanrand = 1: gt 'Military','san1'
+'You worked in the infirmary.'
+act 'Exit': gt 'Military','start'
+end
+
+act 'Go to his tent': gt 'Palatka','start'
+
+act 'Walking in the woods':
+cla
+set minut += 60
+set milprorand = rand(0,10)
+if milprorand = 0: gt 'Military','pro0'
+if milprorand = 1: gt 'Military','pro1'
+'You walk.'
+act 'Finish': gt 'Military','start'
+end
+
+act 'There is a field kitchen':
+	set minut += 30
+	set health += 10
+	set manna += 20
+	set energy += 20
+	set water += 20
+	gs 'stat'
+	end
+
+if week < 6 or week = 7 and hour >= 18:
+cla
+set minut += 60
+set money += 5000
+act 'Go to town': gt 'street'
+end
+end
+
+if $ARGS[0] = 'san0':
+cla
+*clr
+'<center><img src="images\img\military\san0.jpg"></center>'
+'During the examination, the patient shows you your erection and looks at you in anticipation of responses.'
+act 'Drive away': gt 'Military','start'
+act 'Post':
+	set guy += 1
+	set picrand = 41
+	gt 'sex','minet'
+	end
+end
+
+if $ARGS[0] = 'san1':
+cla
+*clr
+'<center><img src="images\img\military\san1.jpg"></center>'
+'While in the infirmary is unoccupied, the doctor begins to pester you.'
+act 'Send': gt 'Military','start'
+act 'Post':
+	set guy += 1
+	set picrand = 42
+	gt 'sex','minet'
+	end
+end
+
+if $ARGS[0] = 'pro0':
+cla
+'To suit you two guys and offer to help them in one game, play the role of a captive spy.'
+act 'Refuse': gt 'Military','start'
+act 'Agree':
+	cla
+	*clr
+	'<center><img src="images\img\military\pro0.jpg"></center>'
+	'You tie the hands and lead to the headquarters, where they represent a long interrogation, and then with the words "We will torture you" get members. That´s what you thought before allowing two burly men you associate.'
+	act 'Submit':
+		set guy += 2
+		set SUB += 1
+		set picrand = 21
+		xgt 'sexdvoe','var'
+		end
+	end
+end
+
+if $ARGS[0] = 'pro1':
+cla
+'For you several minutes is what that guy'
+act 'Disregard': gt 'military','rape'
+act 'Run':
+	if beg < 10: set peshimraperand = rand(0,11)
+	if beg >= 10 and beg < 20: set peshimraperand = rand(0,20)
+	if beg >= 20 and beg < 30: set peshimraperand = rand(0,30)
+	if beg >= 30 and beg < 40: set peshimraperand = rand(0,40)
+	if beg >= 40 and beg < 50: set peshimraperand = rand(0,50)
+	if beg >= 50 and beg < 60: set peshimraperand = rand(0,60)
+	if beg >= 60 and beg < 70: set peshimraperand = rand(0,70)
+	if beg >= 70 and beg < 80: set peshimraperand = rand(0,80)
+	if beg >= 80 and beg < 90: set peshimraperand = rand(0,90)
+	if beg >= 90: set peshimraperand = rand(11,100)
+	if peshimraperand < 11:
+		cla
+		'You tried to run away but the guy you caught'
+		act 'Further': gt 'military','rape'
+		end
+	if peshimraperand > 10:
+		'You are rushing headlong, crashing through the bushes. Finally, you ran to the polygon'
+		act 'Further': gt 'military','start'
+		end
+	end
+end
+
+if $ARGS[0] = 'rape':
+cla
+*clr
+set rape += 1
+set bj += 1
+set sex += 1
+set guy += 1
+set anal += 1
+'<center><img src="images\img\military\rape1.jpg"></center>'
+'You woke up in a certain barn with a bag on his head, his head ached badly from the impact.'
+act 'Shout':
+	cla
+	*clr
+	'<center><img src="images\img\military\rape2.jpg"></center>'
+	'You began to cry, when you stuck in his mouth member.'
+	'"Here´s the nipple to not scream" came the voice of a rapist.'
+	'You tried to spit out a member, but this was worse, he thrust it down your throat, and began to fuck your mouth.'
+	act 'Further':
+		cla
+		*clr
+		'<center><img src="images\img\military\rape3.jpg"></center>'
+		'When you have already started to lose consciousness, choking his cock in her throat, he took it out and threw you on what that box with the power you entered into the vagina, his cock pecked nischadno you, and you had to look at the leash him through tears.'
+		act 'Further':
+			cla
+			*clr
+			'<center><img src="images\img\military\rape4.jpg"></center>'
+			'When your pussy bored him, and he turned you apart buttocks drove a screw you in the ass, you cried out in pain, but he did not care and he continued to fuck your ass as I could, you cried and begged him to even be lubricated, but in response heard only pleased sniff, Mom told you learn to run that would not hurt Ass.'
+			act 'Further':
+				cla
+				*clr
+				'<center><img src="images\img\military\rape5.jpg"></center>'
+				'You do not remember how much time passed that you fainted then again came to himself, but in the end he pulled you from the box and you´re exhausted knelt down, he again stuck you dick in your mouth, with the words "Suck", you dutifully started dildo suck it, he has just brutally raped your anus, head wondered bite him, but knocked it a second thought, and suddenly not be able to do it then with my ass, finally he came in your mouth. And once you have lowered his head again as got hit on the head.'
+				set cumlip += 1
+				set mop = 0
+				set minut += 240
+				set SUB += 5
+				act 'Further': gt 'military','start'
+				end
+			end
+		end
+	end
+end
+--- Military ---------------------------------
+

File diff suppressed because it is too large
+ 60 - 0
locations/NewCloShop


+ 102 - 0
locations/Nord

@@ -0,0 +1,102 @@
+# Nord
+$metka = $ARGS[0]
+$loc = $CURLOC
+gs 'dinam'
+'<center><B>Northern region</B></center>'
+'<center><img src="images\etogame\nord.jpg"></center>'
+clr
+gs 'stat'
+gs 'time'
+
+!act 'Exit to the northern highway': minut += 15 & nroad = 0 & gt 'road'
+if BuyHous['Nord'] >= 1 and houserent['Nord'] ! 1:
+	act '<b>GO HOME</b>':
+		$HouseLocation = 'Nord'
+		gorand = RAND(0,100)
+		if loh > 0 and gopdolg > 0 and hour >= 20 and gorand >= 80:
+		gt 'gopnew','start'
+		exit
+		end
+		if opusk > 0 and hour >= 20 and gorand >= 80 and gopopusday ! day:
+		gt 'gopnew','start'
+		exit
+		end
+	gt 'korr'
+	end
+end
+	act 'Wait':
+	cla
+	waiting = input ("How long would you like to wait? (Not more than 120 minutes)")
+		if waiting <= 0 or waiting > 120:
+		set minut += 15
+		end
+		if waiting > 0 and waiting <= 120:
+		set minut += waiting
+		end
+	act 'Take a look at the clock': gt curloc
+	end
+	
+act 'Take a cab':
+	cla
+	*clr
+	'<center><img src="images\etogame\taxi1.jpg"></center>'
+	'You caught a passing taxi.'
+	'"The drive will cost you <b>250 rubles</b>", the driver says.'
+	set minut += 5
+	if $loc!'street':
+		act 'Go to the Residential Area':
+			set $loc = 'street'
+			dynamic $taxi
+			end
+		end
+	if $loc!'down':
+		act 'Go to the City Center':
+			set $loc = 'down'
+			dynamic $taxi
+			end
+		end
+	if $loc!'Nord':
+		act 'Go to the Northern Area':
+			set $loc = 'Nord'
+			dynamic $taxi
+			end
+		end
+	act 'Turn him down and leave': gt '<<$loc>>'
+	end
+
+if car > 0:
+	if cardrive = 3 or cardrive >= 6 and cardrive <= 9: 'In the parking stands your <a href="exec: GS ''carF'',''start''"><<$car>></a>.'
+end
+
+dynamic $vladimir_driver
+
+litltown = 0
+if hour >= 8 and hour <= 22: 'A kiosk is selling <a href="exec: dynamic $kiosksig">cigarettes</a>.'
+'<a href="exec:minut += 15 & GT ''vokzal''">Train Station</a> to get to the small Town.'
+if slavaQW >= 1: '<a href="exec: GT ''qwBarPolet''">Bar "Flight"</a>.'
+'There is a <a href="exec:GT ''zaprF'',''start''">Gas</a> Station near the street'
+if hour >= 5 and hour <= 23: 'The <a href="exec: GT ''metro'',''start''">Metro</a> Station is within a 5 minute walk from here.'
+if hour >= 9 and hour <= 17 and week > 1: '<a href="exec: GT ''autosalonF'',''start''">Car Dealership</a>'
+if hour >= 9 and hour <= 20 and week < 7: '<a href="exec: GT ''autoservisF'',''start''">Repair Shop</a>'
+if hour >= 9 and hour <= 17 and week > 1: 'Used <a href="exec: GT ''autotraidF'',''start''">Car Dealership</a>'
+if hour >= 9 and hour <= 17 and week < 6: '<a href="exec: GT ''dk'',''start''">The House of Culture named after Lenin</a>'
+if bumtolik > 3 and hour >= 9 and hour <= 17 and week < 6: '<a href="exec: GT ''buklinik'',''start''">Mercy clinic</a>'
+if hour >= 8 and hour <= 20: 'The parking lot, which is engulfed in bright lights, belongs to a <a href="exec: GT ''shop'',''start''">Supermarket</a>'
+if hour >= 12 and hour < 20: 'Above the door to a basement room is a bright neon sign for a <a href="exec: GT ''pirsingsalon''">piercing parlor</a>'
+'The <a href="exec: set minut += 59 & GT ''park'',''start''">central park</a> is quite far from here, but it''s not out of walking range. You can reach all the districts of the town while walking through it. Walking there should take you about less than an hour.'
+if tobiQW >= 1: 'The old mansion, home to <a href="exec: GT ''kakuzu'',''start''">Kakuzu</a>'
+'There is a huge building, with bright lights, which houses a <a href="exec:GT ''casino''">Casino</a> and a hotel.'
+if hour >= 14 or hour < 4: 'Located far away from the buildings <a href="exec: GT ''lakecafe'',''main''">barbecue</a>.'
+if jouryResult = 10: 'In one of the building you can find <a href="exec: GT ''youry''">Georges</a> flat'
+if IvanKvartira > 0: 'In one of these building is  <a href="exec: GT ''ivanRoom''">Manager Ivans</a> apartment'
+'A long and high fence, which is build around the <a href="exec:GT ''Terminal''">storage terminal</a>'
+if hour = meethour and $meetloc = $CURLOC:
+	if svidanieA = 1: '<B><a href="exec: GT ''meet'',''start''"><<$boyA>></a> waits next to the entrance to the house your apartment is in.</B>'
+	if svidanieB = 1: '<B><a href="exec: GT ''meet'',''start''"><<$boyA>></a> waits next to the entrance to the house your apartment is in.</B>'
+	if svidanieC = 1: '<B><a href="exec: GT ''meet'',''start''"><<$boyA>></a> waits next to the entrance to the house your apartment is in.</B>'
+end
+
+dynamic $din_street_cum
+dynamic $meet_boyfriend
+--- Nord ---------------------------------
+

+ 81 - 0
locations/NormPR

@@ -0,0 +1,81 @@
+# NormPR
+if $ARGS[0] = '1':
+$metka = $ARGS[0]
+$loc = $CURLOC
+*clr
+cla
+set prosti = 0
+set minut += 15
+set sex += 1
+set protect = 1
+clr
+gs 'stat'
+set sexprostRand = RAND(0,1)
+	if sexprostRand = 0:
+	'<center><img src="images\img\prost\sexcar.jpg"></center>'
+	'You obediently lay naked in the back seat until your dick hole logged.'
+	gs 'orgazm','start'
+	end
+
+	if sexprostRand = 1:
+	'<center><img src="images\img\img\prost\sexcar2.jpg"></center>'
+	'Standing on all fours, you felt like you were planting confident movement on the penis.'
+	gs 'orgazm','start'
+	end
+
+act 'Leave.': GOTO $locSex, $metkaSex
+end
+
+if $ARGS[0] = '2':
+$metka = $ARGS[0]
+$loc = $CURLOC
+*clr
+cla
+set prosti = 0
+set minut += 15
+set sex += 1
+clr
+gs 'stat'
+set prostRand = RAND(0,100)
+
+if prostRand > 0 and prostRand <= 50:
+set picpRand = RAND(1,7)
+set pose = 1
+'Becoming cancer, you feel hot prick seeking to get into the vagina.'
+gs 'orgazm','start'
+end
+
+if prostRand > 50 and prostRand <= 75:
+set picpRand = RAND(8,10)
+set pose = 1
+'Standing on all fours, you felt like a hole braced member.'
+gs 'orgazm','start'
+end
+
+if prostRand > 75 and prostRand <= 100:
+set pose = 0
+set picpRand = RAND(11,17)
+'You were ordered to undress and lie down on the hood of the car.'
+gs 'orgazm','start'
+end
+if picpRand = 1: '<center><img src="images\img\prost\sexcar3.jpg"></center>'
+if picpRand = 2: '<center><img src="images\img\prost\sexcar4.jpg"></center>'
+if picpRand = 3: '<center><img src="images\img\prost\sexcar5.jpg"></center>'
+if picpRand = 4: '<center><img src="images\img\prost\sexcar6.jpg"></center>'
+if picpRand = 5: '<center><img src="images\img\prost\sexcar7.jpg"></center>'
+if picpRand = 6: '<center><img src="images\img\prost\sexcar8.jpg"></center>'
+if picpRand = 7: '<center><img src="images\img\prost\sexcar9.jpg"></center>'
+if picpRand = 8: '<center><img src="images\img\prost\sexcar10.jpg"></center>'
+if picpRand = 9: '<center><img src="images\img\prost\sexcar11.jpg"></center>'
+if picpRand = 10: '<center><img src="images\img\prost\sexcar12.jpg"></center>'
+if picpRand = 11: '<center><img src="images\img\prost\sexcar13.jpg"></center>'
+if picpRand = 12: '<center><img src="images\img\prost\sexcar14.jpg"></center>'
+if picpRand = 13: '<center><img src="images\img\prost\sexcar15.jpg"></center>'
+if picpRand = 14: '<center><img src="images\img\prost\sexcar16.jpg"></center>'
+if picpRand = 15: '<center><img src="images\img\prost\sexcar17.jpg"></center>'
+if picpRand = 16: '<center><img src="images\img\prost\sexcar18.jpg"></center>'
+if picpRand = 17: '<center><img src="images\img\prost\sexcar19.jpg"></center>'
+act 'Leave.': GOTO $locSex, $metkaSex
+end
+--- NormPR ---------------------------------
+

+ 92 - 0
locations/Nudelake

@@ -0,0 +1,92 @@
+# Nudelake
+gs 'stat'
+'<center><B>nudist beach</B></center>'
+'<center><img src="images\img\Lake\Nudelake.jpg"></center>'
+'Here you can walk naked and no one will blame you.'
+if hour >= 6 and hour <= 20:
+'Here you can <a href="exec:gt ''Nudelake'',''zagarat''">tanning</a> and <a href="exec:gt ''Nudelake'',''swim''">swim</a>'
+'And, you can play <a href="exec:gt ''Nudelake'',''voleybol''">beach volleyball</a>'
+end
+
+act 'Go to the main beach': gt 'lake','start'
+if katday ! day and kat >= 1:
+	'You see at the beach Cat.'
+	act 'Approach the Cat':
+		gt 'Katlake','kat'
+		end
+	end
+
+if $ARGS[0] = 'voleybol':
+cls
+set minut += 1
+'<center><img src="images\img\Lake\voleybol.jpg"></center>'
+'You came to the volleyball court.'
+act 'Watch': gt 'Nudelake','smotr'
+act 'Leave': gt 'Nudelake'
+act 'Play':
+	cla
+	*clr
+	set agil += 1
+	set react += 1
+	set speed += 1
+	set minut += 30
+	'<center><img src="images\img\Lake\voleybol.jpg"></center>'
+	'You go up to the players and ask whether it is possible to join, you will be happy to take the team.'
+	act 'Finish': gt 'Nudelake'
+end
+end
+
+
+if $ARGS[0] = 'zagarat':
+set minut += 30
+cls
+gs 'stat'
+'<center><img src="images\img\Lake\nudezagarat.jpg"></center>'
+set sweat += 1
+set manna += 5
+if krem = 0:
+	set tan += 1
+	'You went to the beach to sunbathe.'
+	end
+if krem > 0:
+	set krem -= 1
+	set tan += 3
+	'You smeared body sunblock and went to sunbathe.'
+	end
+set nzagrand = RAND(0,100)
+if kat > 30 and katkey = 0 and nzagrand >= 60 and nzagrand < 70: gt 'Katlake','key'
+if nzagrand >= 80 and nzagrand < 90: gt 'Vnlake1'
+if nzagrand >= 90: gt 'Vnlake2'
+if katday ! day and kat = 0 and nzagrand >= 70 and nzagrand < 80: gt 'Katlake'
+act 'Finish': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'swim':
+cla
+*clr
+set cumpussy = 0
+set cumbelly = 0
+set cumass = 0
+set cumlip = 0
+set cumface = 0
+set cumfrot = 0
+set minut += 60
+if sweat > -3: set sweat = -3
+set manna += 5
+set willpower += 5
+if stren < 30: set stren += 1
+'<center><img src="images\img\Lake\nudeswim.jpg"></center>'
+'You went for a swim.'
+act 'Finish': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'smotr':
+set minut += 30
+cls
+gs 'stat'
+'<center><img src="images\img\Lake\voleybol.jpg"></center>'
+'You see how others play.'
+act 'Leave': gt 'Nudelake'
+end
+--- Nudelake ---------------------------------
+

+ 49 - 0
locations/Palatka

@@ -0,0 +1,49 @@
+# Palatka
+if $ARGS[0] = 'start':
+$sexloc = $CURLOC
+$metkaM = $ARGS[0]
+$locM = $CURLOC
+gs 'stat'
+set palMir = 1
+'<center><B><font color = maroon>tent</font></B></center>'
+'<center><img src="images\img\military\palatka.jpg"></center>'
+set palrand = rand(0,10)
+if palrand = 0: gt 'Palatka','pal0'
+if palrand = 1: gt 'Palatka','pal1'
+'To your surprise quite spacious tent has a bed here, <a href="exec: gt ''mirror'',''start''">mirror</a>, and even made improvizorovany <a href="exec: gt ''vann'',''start''">shower</a>.'
+
+act 'Exit': gt 'Military','start'
+act 'Sleep':
+	set hour += 8
+	set son = 24
+	gt 'palatka','start'
+	end
+end
+
+if $ARGS[0] = 'pal0':
+cla
+*clr
+'<center><img src="images\img\military\pal0.jpg"></center>'
+'Once you begin to change as the tent includes two soldiers and see you half-naked, running up to you with the members on the edge, you hvaete for their members, but what to do to squeeze harder and get them out of the tent or relax after a hard day.'
+act 'Send': gt 'palatka','start'
+act 'Post':
+	set guy += 2
+	set picrand = 22
+	xgt 'sexdvoe','var'
+	end
+end
+
+if $ARGS[0] = 'pal1':
+cla
+*clr
+'<center><img src="images\img\military\pal1.jpg"></center>'
+'By accessing the tent you stumble and already flying nose to the ground, but suddenly you pick up strong hands, opening her eyes you see a hefty black.'
+act 'Say thank you': gt 'palatka','start'
+act 'Repay in full':
+	set guy += 1
+	set picrand = 43
+	gt 'sex','minet'
+	end
+end
+--- Palatka ---------------------------------
+

+ 295 - 0
locations/ParkKafe

@@ -0,0 +1,295 @@
+# ParkKafe
+
+if $args[0] = 'food':
+	if money < 100:
+	'You do not have enough money for the cafe.'
+	act 'Leave': gt 'park','start'
+	exit
+	end
+set health += 10
+set money -= 100
+set manna += 5
+set willpower += 5
+
+	if energy >= 30:
+	set fat += 5
+	'You can no longer have.'
+	end
+
+	if energy >= 20 and energy < 30:
+	set fat += 3
+	set energy += 10
+	'You pushed through the power of a meal.'
+	end
+
+	if energy < 20:
+	set energy += 20
+	set fat += 1
+	'You gladly ate the food.'
+	end
+
+	if water >= 20:
+	'Tea in you no longer climbs.'
+	end
+
+	if water < 20:
+	'You gladly drank a mug of tea.'
+	set water += 20
+	end
+
+
+'You sat at the table in summer cafe. Soon you brought your order.'
+cla
+Set arand = RAND(1,7)
+if arand = 1: 'You look around and notice the cafe visitors strolling company <a href="exec: GT ''ParkKafe'',''youth''">Youth</a>'
+if arand = 2: 'You look around and notice the cafe visitors sitting alone young <a href="exec: GT ''ParkKafe'',''guy''">Man</a>'
+if arand = 3: 'You are viewing a cafe visitors and students notice campaign <a href="exec: GT ''ParkKafe'',''negros''">Africans</a>'
+if arand = 4: 'You look around and notice the cafe visitors <a href="exec: GT ''ParkKafe'',''woman''">woman</a> imperious form'
+if arand = 5: 'You look around and notice the cafe visitors solid <a href="exec: GT ''ParkKafe'',''man''">man</a> aged'
+if arand = 6: 'You are viewing a cafe visitors and notice two <a href="exec: GT ''ParkKafe'',''Armenians''">Genocide</a> sitting at the table'
+if arand = 7: 'You are viewing a cafe visitors and notice two <a href="exec: GT ''ParkKafe'',''boys''">sporty guys</a> sitting at the table and beer pschih'
+
+act 'Leave': gt 'park','start'
+end
+
+if $ARGS[0] = 'boys':
+cla
+Set rrand = RAND(1,2)
+	if rrand = 1:
+	'You´re looking at them intently, but they think you do not notice.'
+	act 'Go home': gt 'park','start'
+	end
+	if rrand = 2:
+		if parkara > 0:
+		'Jora Senya notice you, but continued to drink beer with friends.'
+		act 'Leave': gt 'park','start'
+		end
+		if parkara = 0:
+		'Your views were seen guys and one of them rolled up to you and asked to join them.'
+		act 'Leave': gt 'park','start'
+			act 'Drink beer with the guys':
+			cla
+			'You guys drank a glass of beer for guys ordered another. One of the guys that you quietly slipped it into the glass. You get drunk and you guys took in the nearest woods.'
+			Set deyrand = RAND(1,2)
+				if deyrand = 1:
+				if parkara = 0: Set guy += 2 & Set parkara = 1
+				Set sex += 1
+				Set bj += 2
+				Set cumlip += 2
+				'Guys put you on your knees and take out their members. you do not understand what is going on at once both start sucking cock.'
+				'<center><img src="images\klof\022.jpg"></center>'
+				Set horand = RAND(1,100)
+				if horand <= bj: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+				if horand > bj: Set horny += 10 & 'You were not satisfied'
+				'They end up in your mouth, you swallow sperm greed'
+				act 'Become acquainted': gt 'parkkafe','klof 1'
+				end
+
+				if deyrand = 2:
+				if parkara = 0: Set guy += 2 & Set parkara = 1
+				Set sex += 1
+				set cumpussy += 1
+				set vagina += 1
+				set gang += 1
+				Set cumass += 1
+				anus += 1
+				anal += 1
+				'Guy fucks you in the pussy. Another time, too, does not lose his penis and shoves you in the ass.'
+				'<center><img src="images\klof\004.jpg"></center>'
+				Set horand = RAND(1,100)
+				if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+				if horand > horny: Set horny += 10 & 'You were not satisfied'
+				'One of them ends up in you, and the other is discharged you on your ass.'
+				act 'Become acquainted': gt 'parkkafe','klof 1'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'klof 1':
+cla
+*clr
+set minut += 5
+set klofQW = 1
+clr
+gs 'stat'
+'<center><img src="images\klof\11 1.jpg"></center>'
+'In rose from the grass in front of the guys legs and hands were shaking from sex between her legs itched all. "Did you like it baby?" asked one of the guys.'
+act 'Yes': gt 'event','klof 2'
+act 'Leave': gt 'park','start'
+end
+
+
+
+
+if $ARGS[0] = 'Armenians':
+cla
+Set rrand = RAND(1,2)
+	if rrand = 1:
+	'You´re looking at them intently, but they think you do not notice.'
+	act 'Go home': gt 'park','start'
+	end
+
+	if rrand = 2:
+	'Your views were seen by Armenians and one of them rolled to your table with a bottle of champagne.'
+	act 'Leave': gt 'park','start'
+		act 'Drink together':
+		cla
+		*clr
+		'You drank champagne with Armenian. His friend moved smoothly for your table. You drank and made merry. You get drunk and Armenians took you into the back room cafe.'
+		Set deyrand = RAND(1,2)
+			if deyrand = 1:
+			if parkarman = 0: Set guy += 2 & Set parkarman = 1
+			Set bj+= 2
+			Set cumlip += 2
+			'Armenians put you on your knees and take out their mighty members. They dvoem poke them in your face, you start to suck at once both members.'
+			'<center><img src="images\pics2\ara.jpg"></center>'
+			Set horand = RAND(1,100)
+			if horand <= bj: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+			if horand > bj: Set horny += 10 & 'You were not satisfied'
+			'They end up in your mouth with laughter and go'
+			act 'Leave': gt 'park','start'
+			end
+
+			if deyrand = 2:
+			if parkarman = 0: Set guy += 2 & Set parkarman = 1
+			Set sex += 1
+			Set bj+= 1
+			set gang += 1
+			Set cumlip += 1
+			Set cumass += 1
+			vagina += 1
+			'Armenians bend over you and puts you one cock in her mouth. Another time, too, does not lose his penis and shoves you into the vagina.'
+			'<center><img src="images\pics2\ara2.jpg"></center>'
+			Set horand = RAND(1,100)
+			if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+			if horand > horny: Set horny += 10 & 'You were not satisfied'
+			'One of them ends up in your mouth and swallow all causes, and the other is discharged you on your ass.'
+			act 'Leave': gt 'park','start'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'man':
+cla
+set mrand = RAND(1,2)
+if mrand = 1: 'You glanced surreptitiously at respectable man, but it seems you did not notice.'
+act 'Leave': gt 'park','start'
+	if mrand = 2:
+	cla
+	'A man walks up to you and invites you to dance.'
+		act 'Dance':
+		cla
+		'He dances well and confidently leads you during the dance. After the dance, you sit down at a table with a man, he orders an expensive wine and various snacks, you relax with gallant compliments showered on you.'
+		'Cavalier offers to go to the sauna.'
+			act 'In the sauna':
+			cla
+			if saunasex = 0: Set saunasex = 1 & Set guy += 1
+			Set sex += 1
+			!Set oral += 1
+			Set cumlip += 1
+			Set cumass += 1
+			set horny = 0
+			vagina += 1
+			'<center><img src="images\pics2\sauna.jpg"></center>'
+			'In the sauna you two completely naked, have fun and enjoying yourself, gradually turns into a very passionate sex'
+			if horny > 75: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+			if horny <= 75: Set horny += 10 & 'You were not satisfied'
+			act 'Leave': gt 'street'
+			end
+		end
+	act 'Leave': gt 'park','start'
+	end
+
+end
+
+if $ARGS[0] = 'woman':
+cla
+'You glanced surreptitiously at the imperious woman, but it seems you did not notice.'
+act 'Leave': gt 'park','start'
+end
+
+if $ARGS[0] = 'youth':
+cla
+Set rrand = RAND(1,2)
+if rrand = 1:
+'You looked at the campaign secretly laughing youth, but they seem to have overlooked.'
+act 'Leave': gt 'park','start'
+end
+	if rrand = 2:
+	'To you tipsy man approached and invited you to the company.'
+	act 'Leave': gt 'park','start'
+		act 'Company':
+		cla
+		'You sat at the table where walking cheerful and noisy group of young people, it was very fun and late night parties kompashka went to continue the fun at the apartment'
+		act 'Leave': gt 'park','start'
+			act 'To go along with all':
+			cla
+			*clr
+			'<center><img src="images\pics2\Student.jpg"></center>'
+			'You continued to splash out on the flat. Most went home, but the girl was left alone, and six guys. Guys started to kiss a girl and she sat on his knees in front of them boys got members, girl stroking their hands, and guys masturbate members on the girl´s face'
+			act 'Leave': gt 'park','start'
+				act 'Kneel down next to the girl in the lap of the guys':
+				cla
+				*clr
+				set hour += 6
+				if hour >= 22: Set hour = 22 & Set minut = 0
+				set son -= 10
+				if son < 02: Set son = 2
+
+				if studentsex = 0: Set studentsex = 1 & Set guy += 6
+				Set bj += 6
+				Set cumlip += 6
+				set swallow += 6
+				'<center><img src="images\pics2\Student2.jpg"></center>'
+				'Boys jerking off on your face, and you Girl caressed and kissed members finally the boys began to lower you in their mouths. Your co-worker also nakonchal mouthful, she turns to you with a mouth full of sperm and wants to kiss you.'
+					act 'Kissing Girl':
+					cla
+					*clr
+					'<center><img src="images\pics2\Student3.jpg"></center>'
+					'You kiss a girl, you both mouthfuls of sperm and you are sharing it with a kiss, you finally get tired and you both swallow cum in your mouths.'
+					act 'Leave': gt 'street'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'negros':
+cla
+Set rrand = RAND(1,2)
+	if rrand = 1 or afra >= 1:
+	'You glanced surreptitiously at the Africans, but they seem to have overlooked.'
+	act 'Leave': gt 'park','start'
+	end
+	if rrand = 2 and afra = 0:
+	Set afra = 1
+	Set obs = 1
+	'To fit your table a few Africans, they behave not quite restrained, talk a lot in English, grabs you by the back and chest. One of the Africans who introduced DeMarcus tells you that they are students from Africa and live in the dorm, so he tells you how to get to the hostel and find them.'
+	act 'Leave': gt 'park','start'
+	end
+end
+
+if $ARGS[0] = 'guy':
+cla
+Set rrand = RAND(1,2)
+	if rrand = 1 or gosh = 1:
+	'You secretly looked at the young boy, but it seems you did not notice.'
+	act 'Leave': gt 'park','start'
+	end
+	if rrand =2 or gosh = 1:
+	'You secretly looked at the young boy. Gosh it, but it seems you did not notice.'
+	act 'Leave': gt 'park','start'
+	end
+	if rrand = 2 and gosh = 0:
+	Set gosh = 1
+	Set obs = 1
+	'For your table fit young man and introduces himself as Gosha, you become acquainted with him, he is a student and lives in obschege. Ghosh tells you how to get to the hostel and how to find it.'
+	act 'Leave': gt 'park','start'
+	end
+end
+--- ParkKafe ---------------------------------
+

+ 255 - 0
locations/Peterroom

@@ -0,0 +1,255 @@
+# Peterroom
+if $ARGS[0] = 'start_door':
+cla
+*clr
+
+set minut += 5
+'<center><B><font color = maroon>Apartment Peter</font></B></center>'
+'<center><img src="images\peter\peterdoor.jpg"></center>'
+clr
+gs 'stat'
+fcolor = rgb(0,0,0)
+bcolor = rgb(255,255,255)
+LCOLOR = rgb(106,90,205)
+
+	act 'QUIT':
+	cla
+	set minut += 5
+	gt 'down'
+	end
+
+	act 'Ring the doorbell':
+	cla
+		if petersexday < 1:
+		'You called, Peter opened the door.'
+		'- Come on, get changed. I am now.'
+		set petersexday += 1
+			act 'Take the apartment': gt 'peterroom','start'
+		else
+		'You rang the doorbell but no one answers.'
+			act 'QUIT':
+			cla
+			set minut += 5
+			gt 'down'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'start':
+cla
+*clr
+
+	if peter > 0 :
+	set peterrand = RAND(1,2)
+	'<center><img src="images\peter\9.jpg"></center>'
+	'You get undressed, pinned collar and prepared. From the next room came the voice of Peter Vlasnyi: - Who is my whore?'
+		act 'I, my lord ...':
+		petersex = petersex + 1
+		if analplugin = 1 : gt 'peterroom','klap'
+		if peterrand < 2 : gt 'peterroom','d1'
+		if peterrand > 1 : gt 'peterroom','d2'
+		end
+	end
+	if peter < 1 :
+	set petersexday += 1
+	set minut += 10
+	'<center><img src="images\peter\1.jpg"></center>'
+	'<center>undressing and dressing it. He put a collar in front of you you picked up this narrow strip of skin with rivets and thinking.</center>'
+		act 'Wear' :
+		*clr
+		cla
+		'<center><img src="images\peter\2.jpg"></center>'
+		'<center>You put the collar. Peter stroked whip you on the cheek:'
+		'- Lustful girl! Stand up, turn around, hands behind your back!'
+		'You execute the command and hands snap handcuffs.</center>'
+			if analplugin = 1 :
+			'And what have we here? Peter pulled the tip of the tube sticking out of the ass, and pulled her'
+			set analplugin = 0
+			end
+			act 'smile':
+			gs 'stat'
+			cla
+			*clr
+			'<center><img src="images\peter\3.jpg"></center>'
+			'Peter pulled you by the collar, put on his knees in front of him and ordered: - Come on bitch, now open your mouth raunchy.'
+
+			act 'submit':
+			cla
+			*clr
+			'<center><img src="images\peter\4.jpg"></center>'
+			'Peter unbuttoned his pants and pulled out his dick 25santimetrovy. He grabbed you by the hair and put in your mouth the head of his penis. You obediently around her lips sucking and caressing his tongue, feeling as it increases and strains in your mouth.'
+				act 'continue Composition' :
+					cla
+					*clr
+					'<center><img src="images\peter\5.jpg"></center>'
+					'And then Peter bent and you rudely and impatiently thrust member in your pussy and started to fuck like a blow-up doll. A few minutes later, he stopped and pulled his cock pushed you to the floor and ordered:'
+					'- Crawl me, bitch!'
+						act 'creep' : gt 'peterroom','klap'
+
+				end
+
+		end
+
+		act 'does not comply' :
+			*clr
+			cla
+			'<center><img src="images\peter\4_1.jpg"></center>'
+			'-Have to punish - Peter with these words you crossed over the table and put you in the anus plug. - Pop up earlier than end flogging, will receive the same amount: - Peter became the side of you, spread the whip and started whipping. counting aloud strikes interspersed with your shouts and sobs ...'
+			'- ... Ask me to fuck you, nine docile litter?'
+			act 'Yes! I´ll be your whore!' : gt 'peterroom','klap'
+		end
+
+
+	end
+
+end
+	act 'Leave':
+	gt 'down'
+	end
+end
+end
+if $ARGS[0] = 'klap':
+cla
+*clr
+set horny += 10
+gs 'stat'
+'<center><img src="images\peter\6.jpg"></center>'
+'Peter on a leash led you into the bedroom. Knocked on the huge bed and tied his hands and feet.'
+'Then deftly put into your mouth gag: - ball on the strap and fastened it at the back.'
+'- I love the light, as you moan, but when you´re talking about, you start talking nonsense. So it is better groan, honey ...'
+	act 'moo':
+	cla
+	*clr
+	'<center><img src="images\peter\7.jpg"></center>'
+	'. Peter bore down on you from above. - Check how much you sweet ass? - Said Peter'
+	if analplugin = 1 :
+	', Pulled a butt plug'
+	set analplugin = 0
+	end
+	'and put his huge erection to your anus entered it in half. You gasped in pain, and mooing in gag. - And I see you can not wait to get his ass completely - Peter saw your reaction and began to fuck your ass with every stroke penetrating deeper and deeper until his penis did not completely sink into you, and the balls hard slap on the buttocks. He fucks you so intense that you feel like my knees start to shake, and out of pussy and your juices flowing priests.'
+		act 'moo' :
+		cla
+		*clr
+		'<center><img src="images\peter\8.jpg"></center>'
+		'He continues to stick you faster, then slows the rhythm, makes several deep movements and finishes filling your insides hot stream of sperm ....'
+		set horny += SUB - DOM + (anus-25)*3
+		set anal += 1
+		if 25 > anus: set anus += 1
+		if horny >= 100:
+			horny  = 1
+			set orgasm += 1
+			set analorgasm += 1
+			'in the ass was hot and orgasm you covered from head.'
+		end
+		'Ass to squelch freed from his penis. Peter sat on the bed, breathing heavily, and you remained lying bound, feeling of ass fucked slowly follows sperm.'
+		act 'relax' : gt 'peterroom','end'
+		end
+	end
+
+end
+
+if $ARGS[0] = 'end':
+cla
+*clr
+set SUB += 1
+set minut += 30
+gs 'stat'
+'<center><img src="images\peter\vanroom.jpg"></center>'
+'- You were great - said Peter and smacking you on the cheek, picked up and carried you to the bathroom where you showered together.'
+	act 'Get out' :
+	cla
+	*clr
+	set peter += 1
+	'<center><img src="images\peter\mash.jpg"></center>'
+	'You walked down the yard, and stopped the car, Peter. He kissed you on the lips and said:'
+	'- <<$name>>, you really brighten up my lonely and gray existence. Your appearance is as the light in the dark, or a breath of fresh air ... I hope to see you again. But now I´m sorry things. You a lift?'
+	set minut += 20
+	act 'In the center' : gt 'down'
+	act 'The house' : gt 'street'
+
+	end
+
+end
+
+if $ARGS[0] = 'd1':
+set horny += SUB - DOM + (anus-25)*3
+set anal += 1
+if 25 > anus: set anus += 1
+	cla
+	*clr
+	'<center><img src="images\peter\d1-1.jpg"></center>'
+	'Peter connects your hands behind your back. His hands take you by the hips and lifted your ass, placing you cancer. You dutifully lean and Peter catches the rope to the hook.'
+	act 'sucking her fingers':
+		cla
+		*clr
+		'<center><img src="images\peter\d1-2.jpg"></center>'
+		'Peter pushes your hands halves drives his cock in the ass. You gasped in pain, and mooing in gag. - And I see you can not wait to get his ass completely - Peter saw your reaction and began to fuck your ass with every stroke penetrating deeper and deeper until his penis did not completely sink into you, and the balls hard slap on the buttocks.'
+		act 'moan':
+			cla
+			*clr
+			'<center><img src="images\peter\d1-3.jpg"></center>'
+			'He fucks you so intense that you feel like my knees start to shake, and the legs from the pussy juices flow down your.'
+			act 'moan':
+				cla
+				*clr
+				'<center><img src="images\peter\d1-4.jpg"></center>'
+				'He continues to stick you faster'
+				if horny >= 100:
+				set orgasm += 1
+				set analorgasm += 1
+
+				'You are very excited that grew in the ass sweet languor, and then suddenly become a hot orgasm and covered you with his head. Simultaneously with you ends Peter pounding dick deeper and filling your insides hot stream of sperm ....'
+				end
+
+				if horny < 100 :
+				' and then slows the rhythm, makes several deep movements and finishes filling your insides hot stream of sperm ....'
+				end
+				'Ass to squelch freed from his penis. Peter sat on the bed, breathing heavily, and you remained kneeling with protruding upward booty fucked from which the legs dripping sperm.'
+
+
+				act 'further' : gt 'peterroom','end'
+			end
+		end
+	end
+
+end
+
+if $ARGS[0] = 'd2':
+	set horny += SUB + VAF - DOM + (throat -25)*3
+	cla
+	*clr
+	'<center><img src="images\peter\d2-1.jpg"></center>'
+	'Peter put you on your knees, then lifted your head and holding her hands to force your mouth planted its piston. His head slipped down his throat, but he did not rest on this, continuing to press. And its 25 centimeter count began to enter into you further.'
+	act 'suck':
+		cla
+		*clr
+		'<center><img src="images\peter\d2-2.jpg"></center>'
+		'- Cosi better whore! Inch by inch, pushing relentlessly pounding him deeper and deeper. After another push me you felt that your lips into something rested. And in a moment you realize that it is all inside.'
+		act 'moan':
+			cla
+			*clr
+			'<center><img src="images\peter\d2-3.jpg"></center>'
+			'Tears streamed from his eyes, and Peter began slowly began to move. He took his hands away from your head, and now you hands grabbed his buttocks and continued to sit down on his spear. You trembling, you are lost in sensation between the legs fire raged in the chest ached pleasantly shamelessness and sense of awareness of their depravity.'
+			act 'moo':
+			cla
+			*clr
+			'<center><img src="images\peter\d2-4.jpg"></center>'
+			'Peter began to finish and stopped drove a member as far as possible, you feel like you are somewhere deep pours his sperm., And on his balls your saliva flowing ...'
+			set SUB += 1
+			set bj += 1
+			if horny >= 100:
+			'Suddenly you start you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned and shuddered with orgasm, but Peter gripped you do not allow members to slip out of his mouth ...'
+			set VAF += 1
+			set willpower += 15
+			set lipkoef += 1
+			set orgasm += 1
+			end
+			act 'swallow' : gt 'peterroom','end'
+			end
+		end
+	end
+
+end
+--- Peterroom ---------------------------------
+

+ 452 - 0
locations/Prostitute

@@ -0,0 +1,452 @@
+# Prostitute
+if $ARGS[0] = 'start':
+$metka = $ARGS[0]
+$loc = $CURLOC
+$metkaSex = $ARGS[0]
+$locSex = $CURLOC
+cla
+*clr
+set minut += 5
+'<center><B><font color = maroon>Hooker</font></B></center>'
+'<center><img src="images\etogame\park2.jpg"></center>'
+clr
+gs 'stat'
+gs 'time'
+if hour >= 16 and hour <= 23:
+	if whoreQW = 2:
+		'Prostitutes look at you with curiosity.'
+		end
+	if whoreQW = 1:
+		'Prostitutes look at you with interest.'
+		act 'Talk':
+			cla
+			set 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'
+			end
+		end
+	if whoreQW = 0:
+		'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'
+			!Статы
+			set strenV = 20
+			set speedV = 30
+			set agilV = 30
+			set reactV = 30
+			set vitalV = 50
+			set intelV = 10
+			set willV = 10
+			!Навыки
+			set magikV = 10
+			set boxingV = 10
+			set shootV = 10
+			!Параметры
+			set healthV = vitalV * 10 + strenV * 5
+			set mannaV = intelV * 10 + magikV * 10
+			set willpowerV = willV * 10
+			set BonusAtakV = 0
+			set BonusDefV = 0
+			!программа действий
+			set program = 0
+			set prostitutFight = 1
+			if spellavtoklon = 1: set klon = 3
+			if spellbefshild = 1: set defence = 500
+			gt 'fight','start'
+			end
+		act 'And how to become one of your own?':
+			cla
+			'And how to become one of your own? You asked. Brazen prostitute grinned spat. To do this, you have to pay Stella.'
+			act 'Move away': gt 'prostitute','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.'
+				act 'Move away': gt 'prostitute','start'
+				end
+			end
+		end
+	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)
+			if prosrand < 20:
+				'No you are not interested.'
+				act 'Leave': gt 'prostitute','start'
+				end
+			if prosrand >= 20:
+				'To you a car drove up.'
+				set 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."'
+					if money >= 1000:
+						act 'Giving money':
+							cla
+							set 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'
+							end
+						end
+					if money < 1000:
+						act 'I have not earned much':
+							cla
+							money = 0
+							'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)
+								gt 'blowPR','start'
+								end
+							end
+						end
+					act 'Fuck you!':
+						cla
+						set minut += 15
+						set $nameV = 'Bandit'
+						!Статы
+						set strenV = 200
+						set speedV = 30
+						set agilV = 20
+						set reactV = 20
+						set vitalV = 150
+						set intelV = 10
+						set willV = 10
+						!Навыки
+						set magikV = 10
+						set boxingV = 10
+						set shootV = 10
+						!Параметры
+						set healthV = vitalV * 10 + strenV * 5
+						set mannaV = intelV * 10 + magikV * 10
+						set willpowerV = willV * 10
+						set BonusAtakV = 0
+						set BonusDefV = 0
+						!программа действий
+						set program = 0
+						set prostitutFight = 2
+						if spellavtoklon = 1: set klon = 3
+						if spellbefshild = 1: set defence = 500
+						gt 'fight','start'
+						end
+					end
+				if proseventrand > 5 and proseventrand <= 50:
+				klient_needs = 0
+				prosti = 0
+				KlientMON = RAND(1,10)
+					'The client wants to blow and asks how much it will cost.'
+				end
+				if proseventrand > 50 and proseventrand <= 75:
+				klient_needs = 1
+				prosti = 0
+				KlientMON = RAND(3,25)
+					'Client wants sex and asks how much it will cost.'
+				end
+				if proseventrand > 75 and proseventrand <= 95:
+				klient_needs = 2
+				prosti = 0
+				KlientMON = RAND(5,40)
+					'Client wants anal and asks how much it will cost.'
+				end
+				if proseventrand > 5 and proseventrand <= 95:
+				klienVNPR = RAND(0,30)
+
+				act 'Leave': gt 'prostitute','start'
+					if ProsMoney > 0:
+						act '<<ProsMoney * 100>> rubles':
+						cls
+						dynamic $universalklient
+						end
+					end
+
+					act 'Assign a price':
+					cls
+					gs 'stat'
+					ProsMoney = input("Enter a number below, which will multiplied by 100")
+						if ProsMoney < 1:
+						'The client looked at you in amazement and muttered "what that fucker." Then started the car and drove away.'
+						act 'Leave': gt 'prostitute','start'
+						else
+						dynamic $universalklient
+						end
+					end
+
+
+				end
+				if proseventrand > 95:
+					'To you approached a prostitute. "I hear you, slut, if you do not want problems, you have to pay Stella. Pyatihatnik Come here and get out on work."'
+					if money >= 500:
+						act 'Giving money':
+							cla
+							set money -= 500
+							'You gave the money to the prostitute, she turned and walked away.'
+							act 'Move away': gt 'prostitute','start'
+							end
+						end
+					if money < 500:
+						act 'I have not earned much':
+							cla
+							set 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'
+							end
+						end
+					act 'Fuck you!':
+						cla
+						set minut += 15
+						set $nameV = 'Prostitute'
+						!Статы
+						set strenV = 50
+						set speedV = 50
+						set agilV = 40
+						set reactV = 30
+						set vitalV = 60
+						set intelV = 10
+						set willV = 10
+						!Навыки
+						set magikV = 10
+						set boxingV = 10
+						set shootV = 10
+						!Параметры
+						set healthV = vitalV * 10 + strenV * 5
+						set mannaV = intelV * 10 + magikV * 10
+						set willpowerV = willV * 10
+						set BonusAtakV = 0
+						set BonusDefV = 0
+						!программа действий
+						set program = 0
+						set prostitutFight = 3
+						if spellavtoklon = 1: set klon = 3
+						if spellbefshild = 1: set defence = 500
+						gt 'fight','start'
+						end
+					end
+				end
+			end
+		end
+	end
+act 'Leave':
+	cla
+	set minut += 5
+	set prosta = 0
+	gt 'park','start'
+	end
+end
+--- Prostitute ---------------------------------
+
+# Menu.Info
+*NL 'Module to work with the menu'
+*NL 'Version: 1.0'
+*NL 'Author: Olegus t.Gl. (C) 2011'
+*NL 'Website: http://olegus.ifiction.ru'
+*NL 'e-mail: olegus.tgl @ gmail.com'
+*NL 'icq: 145540276'
+*NL 'Forum topic: http://forum.ifiction.ru/viewtopic.php?id = 1527'
+--- Menu.Info ---------------------------------
+
+# Menu.Create
+if $ARGS[0] = '': EXIT
+!----------
+$ARGS[0] = 'otg_Menyu_'+$ARGS[0]
+!----------
+killvar '<<$ARGS[0]>>'
+killvar '<<$ARGS[0]>>_Parametry'
+killvar '<<$ARGS[0]>>_Vybrali'
+killvar '<<$ARGS[0]>>_VybrannyyPunkt'
+killvar '<<$ARGS[0]>>_Vremya'
+killvar '<<$ARGS[0]>>_ModuliSobyty'
+
+--- Menu.Create ---------------------------------
+
+# Menu.Add
+if $ARGS[0] = '' or $ARGS[1] = '': EXIT
+!----------
+if $ARGS[1] = '---' or lcase($ARGS[1])='separator':
+	dynamic "$otg_Меню_<<$ARGS[0]>>[] = '-: -'"
+	EXIT
+end
+!----------
+ARGS[10] = arrsize('ARGS')
+if ARGS[10]<3: $ARGS[2] = ''
+if ARGS[10]<4: $ARGS[3] = ''
+!----------
+$ARGS[0] = 'otg_Menyu_<<$ARGS[0]>>'
+$ARGS[1] = replace($ARGS[1],'''','''''')
+if $ARGS[2]<>'': $ARGS[2] = ':'+replace($ARGS[2],'''','''''')
+if $ARGS[3]<>'': $ARGS[3] = replace($ARGS[3],'''','''''')
+!----------
+dynamic "
+	$<<$ARGS[0]>>[] = '<<$ARGS[1]>>Menu.{Processing}<<$ARGS[2]>>'
+	$<<$ARGS[0]>>_Параметры[str(arrsize('<<$ARGS[0]>>'))+'_Z'] = '<<$ARGS[1]>>'
+	$<<$ARGS[0]>>_Параметры[str(arrsize('<<$ARGS[0]>>'))+'_F'] = '<<$ARGS[3]>>'
+"
+!----------
+$ARGS[3] = ''
+if ARGS[10]>4:
+	ARGS[11] = 4
+	:otg_menyu_metka_1
+	if ARGS[11]<ARGS[10]:
+		if $ARGS[ARGS[11]]<>'':
+			$ARGS[3] += ''''+replace($ARGS[ARGS[11]],'''','''''')+''''
+		else
+			if ARGS[ARGS[11]]<>0:
+				$ARGS[3] += ','+str(ARGS[ARGS[11]])
+			else
+				$ARGS[3] += ''' '''
+			end
+		end
+		ARGS[11] += 1
+		jump 'otg_menyu_metka_1'
+	end
+end
+!----------
+dynamic "
+$<<$ARGS[0]>>_Параметры[str(arrsize('<<$ARGS[0]>>'))+'_P'] = '<<replace($ARGS[3],'''','''''')>>'
+"
+--- Menu.Add ---------------------------------
+
+# Menu.AddCondition
+if $ARGS[0] = '' or $ARGS[1] = '': EXIT
+!----------
+ARGS[10] = dyneval("Result = arrsize('otg_Menyu_<<$ARGS[0]>>')")
+if dyneval("$Result = $otg_Меню_<<$ARGS[0]>>[<<ARGS[10]>>-1]")='-: -': EXIT
+!----------
+dynamic "
+	$otg_Меню_<<$ARGS[0]>>_Параметры['<<ARGS[10]>>y'] = '<<replace($ARGS[1],'''','''''')>>'
+"
+
+--- Menu.AddCondition ---------------------------------
+
+# Menu.AddModule
+if $ARGS[0] = '' or $ARGS[1] = '': EXIT
+!----------
+ARGS[10] = dyneval("Result = arrsize('otg_Menyu_<<$ARGS[0]>>')")
+if dyneval("$Result = $otg_Меню_<<$ARGS[0]>>[<<ARGS[10]>>-1]")='-: -': EXIT
+!----------
+dynamic "
+	$otg_Меню_<<$ARGS[0]>>_Параметры['<<ARGS[10]>>_M'] = '<<replace($ARGS[1],'''','''''')>>'
+"
+--- Menu.AddModule ---------------------------------
+
+# Menu.AddEvent
+if $ARGS[0] = '' or $ARGS[1] = '': EXIT
+!----------
+$ARGS[1] = lcase(trim($ARGS[1]))
+!----------
+if $ARGS[1] = 'when you select':
+	dynamic "$otg_Меню_<<$ARGS[0]>>_МодулиСобытий['<<$ARGS[1]>>'] = '<<replace($ARGS[2],'''','''''')>>'"
+elseif $ARGS[1] = 'selecting processing after':
+	dynamic "$otg_Меню_<<$ARGS[0]>>_МодулиСобытий['<<$ARGS[1]>>'] = '<<replace($ARGS[2],'''','''''')>>'"
+elseif $ARGS[1] = 'failure of the choice':
+	dynamic "$otg_Меню_<<$ARGS[0]>>_МодулиСобытий['<<$ARGS[1]>>'] = '<<replace($ARGS[2],'''','''''')>>'"
+end
+--- Menu.AddEvent ---------------------------------
+
+# Menu.Call
+if $ARGS[0] = '': EXIT
+!----------
+ARGS[10] = arrsize('otg_Menyu_<<$ARGS[0]>>')
+if ARGS[10] = 0: EXIT
+!----------
+$otg_Menu_Current = 'otg_Menyu_<<$ARGS[0]>>'
+killvar 'otg_Menyu_Vyzyvaemoe'
+killvar 'otg_Menu_Compliance'
+!----------
+ARGS[11] = 0
+:otg_menyu_metka_2
+if ARGS[11]<ARGS[10]:
+	dynamic "
+		$ARGS[0] = $<<$otg_Menu_Current>>_Параметры['<<ARGS[11]+1>>y']
+		if $ARGS[0] = '':
+			$otg_Меню_Вызываемое[] = $<<$otg_Menu_Current>>[<<ARGS[11]>>]
+			otg_Menu_Compliance[]=<<ARGS[11]+1>>
+		else
+			if dyneval($ARGS[0])<>0:
+				$otg_Меню_Вызываемое[] = $<<$otg_Menu_Current>>[<<ARGS[11]>>]
+				otg_Menu_Compliance[]=<<ARGS[11]+1>>
+			end
+		end
+	"
+	ARGS[11] += 1
+	!----------
+	jump 'otg_menyu_metka_2'
+end
+!----------
+otg_Menu_Time = 0
+dynamic "
+	<<$otg_Menu_Current>>_Выбрали = 0
+	<<$otg_Menu_Current>>_ВыбранныйПункт = 0
+	<<$otg_Menu_Current>>_Время = MSECSCOUNT
+"
+!----------
+menu 'otg_Menyu_Vyzyvaemoe'
+!----------
+dynamic "
+	if <<$otg_Menu_Current>>_Выбрали = 0:
+		<<$otg_Menu_Current>>_Время = MSECSCOUNT-<<$otg_Menu_Current>>_Время
+		$ARGS[0] = $<<$otg_Menu_Current>>_МодулиСобытий['failure of the choice']
+		if $ARGS[0]<>'': dynamic $ARGS[0]
+	else
+		$ARGS[0] = $<<$otg_Menu_Current>>_МодулиСобытий['selecting processing after']
+		if $ARGS[0]<>'': dynamic $ARGS[0],$<<$otg_Menu_Current>>_Параметры[str(<<$otg_Menu_Current>>_ВыбранныйПункт)+'_Z']"+dyneval("$Result = $<<$otg_Menu_Current>>_Параметры[str(<<$otg_Menu_Current>>_ВыбранныйПункт)+'_P']")+"
+	end
+"
+!----------
+killvar 'otg_Menyu_Tekuschee'
+killvar 'otg_Menyu_Vyzyvaemoe'
+killvar 'otg_Menu_Compliance'
+!----------
+Result = dyneval("Result = otg_Меню_<<$ARGS[0]>>_Выбрали")
+--- Menu.Call ---------------------------------
+
+# Menu.Chosen
+if $ARGS[0] = '': EXIT
+Result = dyneval("Result = otg_Меню_<<$ARGS[0]>>_Выбрали")
+--- Menu.Chosen ---------------------------------
+
+# Menu.Time
+if $ARGS[0] = '':
+	Result = otg_Menu_Time
+else
+	Result = dyneval("Result = otg_Меню_<<$ARGS[0]>>_Время")
+end
+--- Menu.Time ---------------------------------
+
+# Menu.Destroy
+if $ARGS[0] = '': EXIT
+GS 'Menu.Create',$ARGS[0]
+--- Menu.Destroy ---------------------------------
+
+# Menu.{Processing}
+ARGS[0] = otg_Menu_Compliance[ARGS[0]-1]
+!----------
+if ARGS[0] = 0: EXIT
+!----------
+$ARGS[0] = dyneval("$Result = $<<$otg_Menu_Current>>_Параметры['<<ARGS[0]>>_F']")
+$ARGS[1] = dyneval("$Result = $<<$otg_Menu_Current>>_Параметры['<<ARGS[0]>>_M']")
+!----------
+dynamic "
+	if $ARGS[1]<>'' or ($ARGS[0]<>'' and LOC $ARGS[0]):
+		<<$otg_Menu_Current>>_Время = MSECSCOUNT-<<$otg_Menu_Current>>_Время
+		otg_Menu_Time=<<$otg_Menu_Current>>_Время
+		<<$otg_Menu_Current>>_Выбрали = -1
+		<<$otg_Menu_Current>>_ВыбранныйПункт=<<ARGS[0]>>
+		!----------
+		$ARGS[3] = $<<$otg_Menu_Current>>_МодулиСобытий['when you select']
+		if $ARGS[3]<>'': dynamic $ARGS[3],$<<$otg_Menu_Current>>_Параметры['<<ARGS[0]>>_Z']"+dyneval("$Result = $<<$otg_Menu_Current>>_Параметры['<<ARGS[0]>>_P']")+"
+		!----------
+		if $ARGS[1]<>'':
+			dynamic $ARGS[1]"+dyneval("$Result = $<<$otg_Menu_Current>>_Параметры['<<ARGS[0]>>_P']")+"
+		else
+			GS $ARGS[0]"+dyneval("$Result = $<<$otg_Menu_Current>>_Параметры['<<ARGS[0]>>_P']")+"
+		end
+	else
+		MSG 'Location ''<<$ARGS[0]>>'' not found!'
+	end
+",$ARGS[0],$ARGS[1]
+
+--- Menu.{Processing} ---------------------------------
+

+ 37 - 0
locations/QwestDisdock

@@ -0,0 +1,37 @@
+# QwestDisdock
+!в локацию stat на любое место
+if qwestonce = 0:
+set qwestonce = 1
+!ADDQST 'qwest\qwest.qsp'
+end
+
+!ссылка на переход
+!расположена в локации park  массив luna
+if vladimirQW = 0 and hour >= 9 and hour <= 20 and week > 5: '<a href="exec: GT ''qwloc''">Near the fence strong man stands and looks at you</a>.'
+
+!в локацию korr
+if vladimirday ! day and vladimirQW = 20 and hour = 16: '<a href="exec: GT ''qwloc2''">The phone rings</a>.'
+
+!в локацию telefon массив start
+if vladimirday ! day and vladimirQW = 20 and hour = 16: gt 'qwloc2'
+
+!в локацию restoran массив start
+
+if vladimirday = day and vladimirQW = 21 and hour = 20: gt 'qwmeet'
+
+!в локацию korr
+if vladimirday ! day and vladimirQW = 25 and hour = 16 and week = 6: '<a href="exec: GT ''qwloc3''">The phone rings</a>.'
+
+!в локацию telefon массив start
+if vladimirday ! day and vladimirQW = 25 and hour = 16 and week = 6: gt 'qwloc3'
+
+!street
+if vladimirday = day and vladimirQW = 30 and hour >= 16 and week = 6: '<a href="exec: GT ''qwmeet2''">Before your porch worth audit and near stolidly worth waiting for you driver Glory</a>.'
+
+!down
+if izoldaWQ >= 1: '<a href="exec: GT ''qwIzoldaApp''">Flat Isolde</a>.'
+
+!nord
+if slavaQW >= 1: '<a href="exec: GT ''qwBarPolet''">Bar "Flight"</a>.'
+--- QwestDisdock ---------------------------------
+

+ 222 - 0
locations/RESULTS

@@ -0,0 +1,222 @@
+# RESULTS
+*P '<right><img src="images\casino\resul.jpg"></right>'
+clr
+gs 'stat'
+set minut += 5
+
+x_rul = 100
+x_rul = rand(0,36)
+if x_rul = 0:
+	$color = ' '
+else
+	if x_rul = 1 or x_rul = 3 or x_rul = 5 or x_rul = 7 or x_rul = 9 or x_rul = 12 or x_rul = 14 or x_rul = 16 or x_rul = 18 or x_rul = 19 or x_rul = 21 or x_rul = 23 or x_rul = 25 or x_rul = 27 or x_rul = 30 or x_rul = 32 or x_rul = 34 or x_rul = 36:
+		$color = 'red'
+	else
+		$color = 'black'
+	end
+end
+' '
+'The ball stopped at <<x_rul>> <<$color>>'
+if кч ! 0:
+	if кч = 1:
+		'1'
+		if x_rul = 1 or x_rul = 3 or x_rul = 5 or x_rul = 7 or x_rul = 9 or x_rul = 12 or x_rul = 14 or x_rul = 16 or x_rul = 18 or x_rul = 19 or x_rul = 21 or x_rul = 23 or x_rul = 25 or x_rul = 27 or x_rul = 30 or x_rul = 32 or x_rul = 34 or x_rul = 36:
+			act 'You have won <<2*st_1>>':
+				set money += 2 * st_1
+				gt 'amrul'
+			end
+		else
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+	if кч = 2:
+		if x_rul = 2 or x_rul = 4 or x_rul = 6 or x_rul = 8 or x_rul = 10 or x_rul = 11 or x_rul = 13 or x_rul = 15 or x_rul = 17 or x_rul = 20 or x_rul = 22 or x_rul = 24 or x_rul = 26 or x_rul = 28 or x_rul = 29 or x_rul = 31 or x_rul = 33 or x_rul = 35:
+			cla
+			act 'You have won <<2*st_1>>':
+				set money += 2 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+end
+if чнч ! 0:
+	if чнч = 1:
+		чнч = 0
+		if x_rul mod 2 = 0:
+			cla
+			act 'You have won <<2*st_1>>':
+				set money += 2 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+	if чнч = 2:
+		чнч = 0
+		if x_rul mod 2 = 1:
+			cla
+			act 'You have won <<2*st_1>>':
+				set money += 2 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+end
+if мб ! 0:
+	if мб = 1:
+		мб = 0
+		if x_rul > 0 and x_rul < 19:
+			cla
+			act 'You have won <<2*st_1>>':
+				set money += 2 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+	if мб = 2:
+		мб = 0
+		if x_rul > 18 and x_rul < 37:
+			cla
+			act 'You have won <<2*st_1>>':
+				set money += 2 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+end
+if дю ! 0:
+	if дю = 1:
+		дю = 0
+		if x_rul > 0 and x_rul < 13:
+			cla
+			act 'You have won <<3*st_1>>':
+				set money += 3 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+	if дю = 2:
+		дю = 0
+		if x_rul > 12 and x_rul < 25:
+			cla
+			act 'You have won <<3*st_1>>':
+				set money += 3 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+	if дю = 3:
+		дю = 0
+		if x_rul > 24 and x_rul < 37:
+			cla
+			act 'You have won <<3*st_1>>':
+				set money += 3 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+end
+if ряд ! 0:
+	if ряд = 1:
+		ряд = 0
+		if x_rul = 1 or x_rul = 4 or x_rul = 7 or x_rul = 10 or x_rul = 13 or x_rul = 16 or x_rul = 19 or x_rul = 22 or x_rul = 25 or x_rul = 28 or x_rul = 31 or x_rul = 34:
+			cla
+			act 'You have won <<3*st_1>>':
+				set money += 3 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+	if ряд = 2:
+		ряд = 0
+		if x_rul = 2 or x_rul = 3 or x_rul = 8 or x_rul = 11 or x_rul = 14 or x_rul = 17 or x_rul = 20 or x_rul = 23 or x_rul = 26 or x_rul = 29 or x_rul = 32 or x_rul = 35:
+			cla
+			act 'You have won <<3*st_1>>':
+				set money += 3 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+	if ряд = 3:
+		ряд = 0
+		if x_rul = 3 or x_rul = 4 or x_rul = 9 or x_rul = 12 or x_rul = 15 or x_rul = 18 or x_rul = 21 or x_rul = 24 or x_rul = 27 or x_rul = 30 or x_rul = 33 or x_rul = 36:
+			cla
+			act 'You have won <<3*st_1>>':
+				set money += 3 * st_1
+				gt 'amrul'
+			end
+		else
+			cla
+			act 'You lost':
+				gt 'amrul'
+			end
+		end
+	end
+end
+if чи ! 100:
+	if чи = x_rul:
+		cla
+		act 'You have won <<37*st_1>>':
+			set money += 37 * st_1
+			gt 'amrul'
+		end
+	else
+		cla
+		act 'You lost':
+			gt 'amrul'
+		end
+	end
+end
+--- RESULTS ---------------------------------
+

+ 219 - 0
locations/RimmaSexQW

@@ -0,0 +1,219 @@
+# RimmaSexQW
+cls
+minut += 15
+rimmaday = day
+gs 'stat'
+'You came to Rimma that you smiled affably. And she said, I´ll end up, can go to you?'
+
+act 'Sorry, but I have things': gt 'butik','start'
+
+if money >= 250:
+	act 'Rimma go to your home':
+	cls
+	minut += 30
+	money -= 250
+	gs 'stat'
+	'Rima went to work and you caught a taxi. Machine quickly dovezla you home and you went to the apartment with Rima.'
+		act 'Sex': dynamic $rimmasexdi
+	end
+end
+
+$rimmasexdi = {
+cls
+minut += 30
+lesbian += 1
+RimmaSex += 1
+if RimmaSex > 21: RimmaSex = 21 & RimmaEndEvent = 1 & RimmaRandEvent = RAND(2,21)
+orgasm = orgasm + 1
+horny = 0
+gs 'stat'
+if RimmaSex = 23:
+'<center><img src="images\zoo\rimma14.jpg"></center>'
+'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	gs 'stat'
+	'<center><img src="images\zoo\rimma23.jpg"></center>'
+	''
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 22:
+'<center><img src="images\zoo\rimmaBJ.jpg"></center>'
+'Rima pulled the strap of her purse and necklace with a chain leash employee. You put a collar and chain handed Rimma already wore a strap. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	gs 'stat'
+	'<center><img src="images\zoo\rimma22.jpg"></center>'
+	''
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 21 or RimmaEndEvent = 1 and RimmaRandEvent = 21:
+'<center><img src="images\zoo\rimma21.jpg"></center>'
+'Rimma ordered you to squat and got over you. Your face was between her legs, suddenly hit you in the face of urine flow. Rimma without warning and sank just peed on you. You shock sat motionless until the jet of warm urine running down your face. After that you Rimma ordered to lick her. You began to lick at the same time and ended with Rimma.'
+end
+if RimmaSex = 20 or RimmaEndEvent = 1 and RimmaRandEvent = 20:
+'<center><img src="images\zoo\rimma14.jpg"></center>'
+'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	anus += 1
+	gs 'stat'
+	'<center><img src="images\zoo\rimma20.jpg"></center>'
+	'Rimma you bent and her strapon entered your ass, she began to fuck you, you covered from an orgasm that you piss. Rima laughed at you.'
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 19 or RimmaEndEvent = 1 and RimmaRandEvent = 19:
+'<center><img src="images\zoo\rimmaBJ.jpg"></center>'
+'Rima pulled the strap of her purse and necklace with a chain leash employee. You put a collar and chain handed Rimma already wore a strap. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	anus += 1
+	vagina += 1
+	gs 'stat'
+	'<center><img src="images\zoo\rimma19.jpg"></center>'
+	'Rimma you put cancer and began to peck in the pussy, then pulled the strap and you put him in the ass, you were moaning held by the throat collar. Finally you are finished.'
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 18 or RimmaEndEvent = 1 and RimmaRandEvent = 18:
+'<center><img src="images\zoo\rimma14.jpg"></center>'
+'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	anus += 1
+	gs 'stat'
+	'<center><img src="images\zoo\rimma18.jpg"></center>'
+	'Rima put you cancer and you feel like you strap rested in the anus, you groaned and tried to relax. Strap came into you and Rimma start you fuck in the ass. She grabbed you by the hair and raised arm your face without stopping to peck you. Finally you are finished.'
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 17 or RimmaEndEvent = 1 and RimmaRandEvent = 17:
+'<center><img src="images\zoo\rimma14.jpg"></center>'
+'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	vagina += 1
+	gs 'stat'
+	'<center><img src="images\zoo\rimma17.jpg"></center>'
+	'Rimma you put cancer and has driven you strap pussy began furiously fuck you and slam you in the ass hands until you have finished.'
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 16 or RimmaEndEvent = 1 and RimmaRandEvent = 16:
+'<center><img src="images\zoo\rimma14.jpg"></center>'
+'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	vagina += 1
+	gs 'stat'
+	'<center><img src="images\zoo\rimma16.jpg"></center>'
+	'Rima put you on your back and spread your legs, she had driven strap you in the pussy and began to furiously fuck you until you are covered orgasm.'
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 15 or RimmaEndEvent = 1 and RimmaRandEvent = 15:
+'<center><img src="images\zoo\rimma14.jpg"></center>'
+'Rima pulled the strap of her purse and put them on it. She put you on your knees and slipped the strap you in the mouth, that you started to suck lubricating saliva.'
+	act 'Further':
+	cls
+	cls
+	minut += 30
+	vagina += 1
+	gs 'stat'
+	'<center><img src="images\zoo\rimma15.jpg"></center>'
+	'Rima does not put you over and has driven you from your saliva wet strapon in pussy, she began to furiously fuck you and soon you covered orgasm.'
+	act 'Hold it': gt 'korr'
+	end
+exit
+end
+if RimmaSex = 14 or RimmaEndEvent = 1 and RimmaRandEvent = 14:
+anus += 8
+'<center><img src="images\zoo\rimma13.jpg"></center>'
+'Rimma you put cancer and heavily greased lubricated anus you enter you immediately became both hands, gradually she managed it and she started to fuck your ass hands until you have finished.'
+end
+if RimmaSex = 13 or RimmaEndEvent = 1 and RimmaRandEvent = 13:
+anus += 8
+'<center><img src="images\zoo\rimma12.jpg"></center>'
+'Rima put you on your back and lifting your ass properly lubed your anus. Her hand came easily to you and Rima followed became poking you in the ass his second hand. Soon the two hands were you in the ass and started to fuck Rimma your ass. Soon you left off.'
+end
+if RimmaSex = 12 or RimmaEndEvent = 1 and RimmaRandEvent = 12:
+anus += 6
+vagina += 5
+'<center><img src="images\zoo\rimma11.jpg"></center>'
+'Rima put you back on the bed and began to thrust one hand you in the ass, and the other hand in the vagina. Soon both hands inside you and Rima started to fuck you hands, you could not stand such pressure and finished.'
+end
+if RimmaSex = 11 or RimmaEndEvent = 1 and RimmaRandEvent = 11:
+anus += 6
+'<center><img src="images\zoo\rimma10.jpg"></center>'
+'Rimma you put cancer and began to thrust his hand to you in the ass, her hand was soon entirely in your ass and she began to actively fuck your anus its river, you could not last long and roughly finished.'
+end
+if RimmaSex = 10 or RimmaEndEvent = 1 and RimmaRandEvent = 10:
+anus += 6
+'<center><img src="images\zoo\rimma9.jpg"></center>'
+'Rimma you put cancer and began to fuck your ass fingers sometimes spitting on the hole. Soon she was able to stick to your ass the whole hand and you left off.'
+end
+if RimmaSex = 9 or RimmaEndEvent = 1 and RimmaRandEvent = 9:
+anus += 5
+'<center><img src="images\zoo\rimma8.jpg"></center>'
+'Expanding convenient for you, Rima started to fuck your ass fingers soon from her skillful actions you covered orgasm.'
+end
+if RimmaSex = 8 or RimmaEndEvent = 1 and RimmaRandEvent = 8:
+anus += 3
+'<center><img src="images\zoo\rimma7.jpg"></center>'
+'Rima put you on the back and started to caress your clitoris tongue simultaneously massaging your anus hand. Soon you covered orgasm.'
+end
+if RimmaSex = 7 or RimmaEndEvent = 1 and RimmaRandEvent = 7:
+vagina += 5
+'<center><img src="images\zoo\rimma6.jpg"></center>'
+'Rima put you on the back and began to enter your fingers into the vagina until her whole hand was not inside you. Then she started to fuck you one second hand caressing your body. You began moaning in orgasm and Rimma passionately grabbed you by the throat.'
+end
+if RimmaSex = 6 or RimmaEndEvent = 1 and RimmaRandEvent = 6:
+vagina += 5
+'<center><img src="images\zoo\rimma5.jpg"></center>'
+'Rima put you on the back and began to lick your clitoris. You felt her fingers penetrate your pussy and begin to fuck you. Rimma gradually introduced new fingers and now she began to fuck you in the pussy with his fist, you broke and finished.'
+end
+if RimmaSex = 5 or RimmaEndEvent = 1 and RimmaRandEvent = 5:
+vagina += 2
+'<center><img src="images\zoo\rimma4.jpg"></center>'
+'Rima put you on the back and began to lick your clitoris. You felt her fingers penetrate your pussy and begin to fuck you. Soon you covered orgasm.'
+end
+if RimmaSex = 4 or RimmaEndEvent = 1 and RimmaRandEvent = 4:
+'<center><img src="images\zoo\rimma3.jpg"></center>'
+'Rima put you on the back and sat on top substituting his sweaty pussy. You started to lick her and caress her arms soon Rima strongly pressed to your face her crotch finished, you also embraced orgasm.'
+end
+if RimmaSex = 3 or RimmaEndEvent = 1 and RimmaRandEvent = 3:
+'<center><img src="images\zoo\rimma2.jpg"></center>'
+'Rima sat on the sofa legs spread, you dropped to her knees and began to lick her pussy with his tongue, while not forgetting to caress her pussy fingers. Rima began to moan in bliss and taking your hair harder pressed to her pussy until she began to beat in orgasm, at this time you also embraced orgasm.'
+end
+if RimmaSex = 2 or RimmaEndEvent = 1 and RimmaRandEvent = 2:
+'<center><img src="images\zoo\rimma.jpg"></center>'
+'Rimma lay on top of you and offered her pussy started to lick your passion. You began to caress her tongue pussy Rimma and soon engulfed you unearthly bliss ended with orgasm.'
+end
+act 'Hold it': gt 'korr'
+}
+--- RimmaSexQW ---------------------------------
+

+ 215 - 0
locations/RynokHoz

@@ -0,0 +1,215 @@
+# RynokHoz
+if $ARGS[0] = 'start':
+minut += 15
+if arturplan > 4000: arturplan -= 1000
+gs 'stat'
+'You went into a master container skluzhaschy warehouse and dwelling, where he pulled out a bottle of vodka and a snack'
+	act 'Drink along with a host':
+	cla
+	minut += 15
+	gs 'stat'
+	'Arthur set the table, put a bottle of vodka and invited you to sit on a chair.'
+	'You got drunk together with the owner and he pulled you to her hugging. Then he took out your chest and began to fondle'
+		act 'Surrender':
+		cla
+		if rinhoz = 0: Set rinhoz = 1 & Set guy += 1
+		Set sex += 1
+		vagina += 1
+		Set cumass += 1
+		Set horand = RAND(1,100)
+		'<center><img src="images\pics\rinsex.jpg"></center>'
+		'You are relaxed and started hugging the host response. He undressed and put your stomach on the bags with cereal, spread your buttocks and your zasoval hard and hot cock in your pussy'
+		if horand > horny: Set horny += 10 & 'You were not satisfied'
+		if horand <= horny: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+		Set gbrand = RAND(1,100)
+			if gbrand < 95 and palevorin = 0:
+			'After sex, the host has written you a premium in the amount of 2,000 rubles, and you went each about his business.'
+			Set money += 2000
+			act 'Go home': gt 'street'
+			end
+
+			if palevorin >= 1:
+			'After sex, the host has written you a premium in the amount of 2,000 rubles, and you went each about his business.'
+			Set money += 2000
+			act 'Go home': gt 'street'
+			end
+
+			if gbrand >= 95 and palevorin = 0:
+			if palevorin = 0: palevorin = 1
+			cla
+			'While the owner you fucked you heard the creaking front door, entered the room, two more men. You know them is Abdul Hassan, owners of neighboring tents.'
+			'You froze in astonishment and shame, you caught moaning fuck bare ass, the men were glad, and guffawed. They offered you serve them and then no one will know about this incident.'
+				act 'Silently dress':
+				cla
+				Set money += 2000
+				if rinslut = 0: Set rinslut = 1
+				'You with a red face of shame dressed silently, at this time the owner handed you 2,000 rubles as a bonus.'
+				act 'Go home': gt 'street'
+				end
+
+				act 'Agree to gangbang':
+				cla
+				Set palevorin = 2
+				'Host finished on you and gave way to the two guys, one of them raised your ass and threw you in pussy stuck to his penis, you groaned in pain when he hit you in the womb, the second guy immediately pulled penis and began to clap them on your face, you take it in your mouth. So you fry two guys, and the owner was sitting and looking at what is happening.'
+				'<center><img src="images\pics\rinkrug.jpg"></center>'
+				if abdulasex = 0: abdulasex = 1 & guy += 1
+				if hasansex = 0: hasansex = 1 & guy += 1
+				Set sex += 1
+				vagina += 1
+				Set bj += 1
+				gang += 1
+				Set cumass += 1
+				Set cumlip += 1
+				'And finally Abdul Hasan filled steel finish and one in your mouth and the second you on your ass.'
+				Set money += 5000
+				'After the boys finished owner came to you and gave you a bonus of 5000 rubles'
+				act 'Go home': gt 'street'
+				end
+			end
+			!if palevorin >= 1:
+			!'After sex, the host has written you a premium in the amount of 2,000 rubles, and you went each about his business.'
+			!Set money += 2000
+			!act 'Go home': gt 'street'
+			!end
+
+		end
+
+		act 'Suck':
+		cla
+		if rinhoz = 0: Set rinhoz = 1 & Set guy += 1
+		Set bj += 1
+		Set cumlip += 1
+		Set horand = RAND(1,100)
+		'<center><img src="images\pics\rinbj.jpg"></center>'
+		'You sat down before the master on his knees and took out his cock around his mouth and started sucking him, absorbing member in the throat and licking balls host when he began to cum in your mouth, you were forced to swallow his struhnyu nor wash or not to spit it .'
+		if horand > vaf: Set horny += 10 & 'You were not satisfied'
+		if horand <= vaf: Set horny = 0 & orgasm += 1 & 'You covered orgasm'
+		Set gbrand = RAND(1,100)
+			if gbrand < 95 and palevorin = 0:
+			'After sex, the host has written you a premium in the amount of 2,000 rubles, and you went each about his business.'
+			Set money += 2000
+			act 'Go home': gt 'street'
+			end
+			!
+			if palevorin >= 1:
+			'After sex, the host has written you a premium in the amount of 2,000 rubles, and you went each about his business.'
+			Set money += 2000
+			act 'Go home': gt 'street'
+			end
+
+			if gbrand >= 95 and palevorin = 0:
+			if palevorin = 0: palevorin = 1
+			'Have you finished doing blowjob and licking the remnants of sperm with the host member when the door opened and two men entered the closet. You know them is Abdul Hassan, owners of neighboring tents.'
+			wait 3000
+			'You froze in astonishment and shame, you were caught with a mouth full of sperm licking red eldu, the men were glad, and guffawed. They offered you serve them and then no one will know about this incident.'
+				act 'Wipe your mouth and correct clothes':
+				cla
+				Set money += 2000
+				if rinslut = 0: Set rinslut = 1
+				'You with a red face of shame began to wipe the remnants of sperm from her lips and correct clothes, at this time the owner handed you 2,000 rubles as a bonus.'
+				act 'Go home': gt 'street'
+				end
+
+				act 'They agree to suck':
+				cla
+				Set palevorin = 2
+				'Licking prick you master nodded his head in agreement. Two men immediately took out their members and framed them to your mouth, you immediately began to suck two dick'
+				'<center><img src="images\pics\rintri.jpg"></center>'
+				if abdulasex = 0: abdulasex = 1 & guy += 1
+				if hasansex = 0: hasansex = 1 & guy += 1
+				Set bj += 2
+				gang += 1
+				Set cumlip += 2
+				'Finally Abdul Hassan steel cum in your mouth, you swallow and lick sperm until their members did not fall off.'
+				Set money += 5000
+				'After the boys finished owner came to you and gave you a bonus of 5000 rubles'
+				act 'Go home': gt 'street'
+				end
+			end
+			!if palevorin >= 1:
+			!'After sex, the host has written you a premium in the amount of 2,000 rubles, and you went each about his business.'
+			!Set money += 2000
+			!act 'Go home': gt 'street'
+			!end
+		end
+	end
+end
+
+if $ARGS[0] = 'bus':
+'You are the driver stopped in the shed, where he pulled out a bottle of vodka and a snack'
+	act 'Drinking with driver':
+	cla
+	'You got drunk together with the driver and he began to squeeze your breasts and ass'
+		act 'Surrender':
+		cla
+		if vodila = 0: Set vodila = 1 & Set guy += 1
+		Set sex += 1
+
+		Set cumass += 1
+		'You are relaxed and started hugging in response cage. He undressed you and put the cancer, you feel his hot cock hard and pushing the vaginal wall is part of you, you involuntarily groaned from the flood of feelings for you.'
+		'<center><img src="images\pics\busSex.jpg"></center>'
+		Set horand = RAND(1,100)
+		if horand > horny: Set horny += 10 & 'You were not satisfied'
+		if horand <= horny: Set horny = 0 & 'You covered orgasm'
+		'After having sex with a carrier you went each about his business.'
+		!Set money += 2000
+		act 'Go home': gt 'street'
+		end
+
+		act 'Suck':
+		cla
+		if vodila = 0: Set vodila = 1 & Set guy += 1
+		Set sex += 1
+		Set oral += 1
+		Set cumlip += 1
+		'You sat down before the driver got on his knees and his cock wrapped around his lips and began to suck when the driver began to cum in your mouth, you were forced to swallow cum, neither wash nor spit it no where.'
+		'<center><img src="images\pics\busbj.jpg"></center>'
+		Set horand = RAND(1,100)
+		if horand > horny: Set horny += 10 & 'You were not satisfied'
+		if horand <= horny: Set horny = 0 & 'You covered orgasm'
+		'After suction cage, you went each about his business.'
+		!Set money += 2000
+		act 'Go home': gt 'street'
+		end
+	act 'Swear at it and go': gt 'street'
+	end
+end
+
+if $ARGS[0] = 'opusteha':
+'You three fellows went into the container warehouse employee and cabins, where they got their members and you kneeling immediately sucked in three'
+Set rinslut = 1
+Set sex += 1
+Set bj += 3
+Set cumlip += 3
+Set money += 2000
+if repa < 6: Set repa = 6
+'<center><img src="images\pics\tri6.jpg"></center>'
+Set horand = RAND(1,100)
+if horand > oral: Set horny += 10 & 'You were not satisfied'
+if horand <= oral: Set horny = 0 & 'You covered orgasm'
+'After the men left off in your mouth, the owner took thousands in 2000 and gave you as a premium'
+act 'Go home': gt 'street'
+end
+
+if $ARGS[0] = 'opusteha2':
+'Armenians took you into the shed, and set him on his knees in front of him pulled out his big dick. You licked his lips and started grinding his powerful member of his mouth.'
+Set tiprand = RAND(1,2)
+Set guy += 1
+Set bj += 1
+Set throat += 1
+if tiprand = 1: Set cumlip += 1
+if tiprand = 2: Set cumface += 1
+Set money += 500
+if repa < 6: Set repa = 6
+if tiprand = 1: 'Armenian grabbed you by the head and finished in your mouth. You were forced to swallow everything.'
+if tiprand = 2: 'Armenian pulled his cock out of your mouth and hold your head for cumshot on your face.'
+if tiprand = 1: '<center><img src="images\pics\rinslutBJ.jpg"></center>'
+if tiprand = 2: '<center><img src="images\pics\bukkOne.jpg"></center>'
+Set horand = RAND(1,100)
+if horand > oral: Set horny += 10 & 'You were not satisfied'
+if horand <= oral: Set horny = 0 & 'You covered orgasm'
+'After the Armenian finished, he tucked in his pants member and threw you five hundred-ruble notes.'
+act 'Go home': gt 'street'
+end
+--- RynokHoz ---------------------------------
+

+ 16 - 0
locations/Sgrup

@@ -0,0 +1,16 @@
+# Sgrup
+gs 'stat'
+'Singles'
+$textgrup = ''
+i = 0
+:markgruploop
+i += 1
+if grupTipe[i] = 0:$textgrup +='
+'+$npcGo[i]
+if i < 26: jump 'markgruploop'
+
+'<<$textgrup>>'
+
+dynamic $din_sekondparturok
+--- Sgrup ---------------------------------
+

+ 16 - 0
locations/Sgrup1

@@ -0,0 +1,16 @@
+# Sgrup1
+gs 'stat'
+'Botany'
+$textgrup = ''
+i = 0
+:markgruploop
+i += 1
+if grupTipe[i] = 1:$textgrup +='
+'+$npcGo[i]
+if i < 26: jump 'markgruploop'
+
+'<<$textgrup>>'
+
+dynamic $din_sekondparturok
+--- Sgrup1 ---------------------------------
+

+ 16 - 0
locations/Sgrup2

@@ -0,0 +1,16 @@
+# Sgrup2
+gs 'stat'
+'Sportiki'
+$textgrup = ''
+i = 0
+:markgruploop
+i += 1
+if grupTipe[i] = 2:$textgrup +='
+'+$npcGo[i]
+if i < 26: jump 'markgruploop'
+
+'<<$textgrup>>'
+
+dynamic $din_sekondparturok
+--- Sgrup2 ---------------------------------
+

+ 16 - 0
locations/Sgrup3

@@ -0,0 +1,16 @@
+# Sgrup3
+gs 'stat'
+'Steep'
+$textgrup = ''
+i = 0
+:markgruploop
+i += 1
+if grupTipe[i] = 3:$textgrup +='
+'+$npcGo[i]
+if i < 26: jump 'markgruploop'
+
+'<<$textgrup>>'
+
+dynamic $din_sekondparturok
+--- Sgrup3 ---------------------------------
+

+ 16 - 0
locations/Sgrup4

@@ -0,0 +1,16 @@
+# Sgrup4
+gs 'stat'
+'Gopnik'
+$textgrup = ''
+i = 0
+:markgruploop
+i += 1
+if grupTipe[i] = 4:$textgrup +='
+'+$npcGo[i]
+if i < 26: jump 'markgruploop'
+
+'<<$textgrup>>'
+
+dynamic $din_sekondparturok
+--- Sgrup4 ---------------------------------
+

+ 16 - 0
locations/Sgrup5

@@ -0,0 +1,16 @@
+# Sgrup5
+gs 'stat'
+'Outcasts'
+$textgrup = ''
+i = 0
+:markgruploop
+i += 1
+if grupTipe[i] = -1:$textgrup +='
+'+$npcGo[i]
+if i < 26: jump 'markgruploop'
+
+'<<$textgrup>>'
+
+dynamic $din_sekondparturok
+--- Sgrup5 ---------------------------------
+

+ 22 - 0
locations/SgrupDisco

@@ -0,0 +1,22 @@
+# SgrupDisco
+gs 'stat'
+$textgrup = ''
+$textgrup2 = ''
+i = 0
+:markgruploop
+i += 1
+if grupTipe[i] = 3:$textgrup +='
+'+$npcGo[i]
+if grupTipe[i] = 4:$textgrup2 +='
+'+$npcGo[i]
+if i < 26: jump 'markgruploop'
+
+'Dancing on the dance floor'
+'<<$textgrup>>'
+
+'In one corner stand'
+'<<$textgrup2>>'
+
+act 'Move away': gt $loc, $metka
+--- SgrupDisco ---------------------------------
+

+ 204 - 0
locations/Snpc

@@ -0,0 +1,204 @@
+# Snpc
+!{
+$npcName[numnpc] = ''
+$npcSurName[numnpc] = ''
+$npcText[numnpc] = ''
+grupNPC[numnpc]=
+npcPol[numnpc]
+grupTipe[numnpc]
+}
+gs 'dinnpc'
+
+
+
+gs 'stat'
+'<center><B><font color = maroon><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></B></center>'
+'<center><img src="images\qwest\alter\npc<<numnpc>>.jpg "></center>'
+'<<$npcText[numnpc]>>'
+if grupTipe[numnpc] = -1: '<<$npcName[numnpc]>> refers to a group of outcasts.'
+if grupTipe[numnpc] = 0: ''
+if grupTipe[numnpc] = 1: '<<$npcName[numnpc]>> refers to a group of nerds.'
+if grupTipe[numnpc] = 2: '<<$npcName[numnpc]>> refers to a group sportikov.'
+if grupTipe[numnpc] = 3: '<<$npcName[numnpc]>> refers to a group of steep.'
+if grupTipe[numnpc] = 4: '<<$npcName[numnpc]>> refers to a group Gopnik.'
+if grupNPC[numnpc]<20: 'You have a bad attitude.'
+if grupNPC[numnpc] >= 20 and grupNPC[numnpc]<40: 'You tensions.'
+if grupNPC[numnpc] >= 40 and grupNPC[numnpc]<60: 'You have a normal relationship.'
+if grupNPC[numnpc] >= 60 and grupNPC[numnpc]<80: 'You have a good relationship.'
+if grupNPC[numnpc] >= 80: 'You have a great relationship.'
+if numnpc = 14 and KatjaOTN > 0:
+if KatjaHorny < 20: 'Katia looks calm and indifferent.'
+if KatjaHorny >= 20 and KatjaHorny < 40: 'Katya in the eyes jump merry twinkle.'
+if KatjaHorny >= 40 and KatjaHorny < 60: 'Katya has a faint blush on her cheeks and she looks at you mischievously.'
+if KatjaHorny >= 60 and KatjaHorny < 80: 'Kate blushed and languid looks at you.'
+if KatjaHorny >= 80: 'Katya all red as a lobster and her chest heaving from deep breathing.'
+end
+''
+''
+!act 'Move away': gt $locM, $metkaM
+!реакция на сперму
+gs 'cumreaction'
+!издевательства
+gs 'izdevat'
+!крутыши
+gs 'krutishi'
+
+if numnpc = 23 and albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0:
+'Albina easy smiles at you "<<$name>>, you spravlyaeshsya well in training, do not forget to come to it."'
+if GorSlut > 0: 'By the way, you go about disgusting rumors.'
+end
+if AlbFrend = 1 and numnpc = 23:
+AlbFrend = 2
+grupNPC[numnpc] = 100
+'Albina smiling at you, "Thank you <<$name>>, correctly say, a friend in need is a friend indeed. You rescued me very warning of Zvezdushkah unfortunately have to close our team, that would not run into trouble."'
+end
+if AlbFather = 2 and numnpc = 23 and AlbEnemy = 0:
+grupNPC[numnpc] = 0
+AlbEnemy = 1
+'Albina angrily glared "Oh, you bitch! Said at me taken in head to write. Well, you´ll regret it."'
+end
+
+!болталка с Котовым
+gs 'kotovtalker'
+!!!!!!!!!!!!!!!!!!!!!!!!!гопота!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+if grupTipe[numnpc] = 4:
+	if $loc = 'gdkin':
+		if GorSlut < 2:
+			if npcPol[numnpc] = 0:
+			'<<$npcName[numnpc]>> - Hey Svetsik, let podbuhnem, and then do something dumb like.'
+			else
+			'<<$npcName[numnpc]>> - Hey Svetsik, let podbuhnem, and then do something dumb like.'
+			end
+
+			act 'Drink beer':
+			cls
+			minut += 5
+			grupNPC[numnpc] += 5
+			alko += 1
+			salo += 1
+			fat += 2
+			energy += 10
+			gs 'stat'
+			'You drank beer in the company of friends.'
+			act 'Move away': gt $loc, $metka
+			end
+
+
+			act 'Refuse': grupNPC[numnpc] -= 5 & gt $loc, $metka
+		end
+		if GorSlut >= 2:
+			if npcPol[numnpc] = 0:
+			'<<$npcName[numnpc]>> - Cho priperlas, vaflersha. Huytsa want a nap or something?'
+
+			else
+			'<<$npcName[numnpc]>> - Hey cocksucker, sebi here. With you to stand beside you dumb.'
+			end
+
+			act 'Leave': grupNPC[numnpc] -= 5 & gt $loc, $metka
+		end
+	exit
+	end
+
+end
+
+	act 'Chat':
+	cls
+	if $loc = 'gdkin': minut += 5
+	gs 'stat'
+	'<center><B><font color = maroon><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></B></center>'
+	'<center><img src="images\qwest\alter\npc<<numnpc>>.jpg"></center>'
+		if numnpc = 1 and grupNPC[numnpc] = 0:
+		'Dima sniffed. "Get off me pimply pig."'
+		if $loc!'gdkin': dynamic $din_sekondparturok
+		if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+		exit
+		end
+		!если порядочная
+		gs 'nogorslut'
+		!если не порядочная
+		gs 'yesgorslut'
+	if $loc!'gdkin': dynamic $din_sekondparturok
+	if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+	end
+
+
+	!!!!!!!!!!!!!!!!!!!АРТЕМ ЧЕБОТАРЕВ БОТАН!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+	if numnpc = 2:
+		if dom > 0 and artomLernQW = 0:
+		act 'You could not pull me in a little school?':
+			cls
+			if $loc = 'gdkin': minut += 5
+			grupNPC[numnpc] += 5
+			sub += 1
+			if GorSlut < 3: artomLernQW = 1
+			gs 'stat'
+			'<center><B><font color = maroon><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></B></center>'
+			'<center><img src="images\qwest\alter\npc<<numnpc>>.jpg"></center>'
+			if GorSlut < 3: 'You came to Artem and asked him to help you to learn. Artem was a bit surprised and said to you "Okay. Come after school to my home, work."'
+			if GorSlut >= 3: 'You came to Artem and asked him to help you to learn. Artem outraged "Bah, I´ll spend my time on this as you are, of course, and no more can not fit me."'
+			if $loc!'gdkin': dynamic $din_sekondparturok
+			if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+			end
+		end
+	end
+
+
+	!!!!!!!!!!!!!!!КАТЯ МЕЙНОЛЬД!!!!!!!!!!!!!!!!!!!!!!!
+	if numnpc = 14 and meynoldQW = 1:
+		act 'Thank you for what you took away from the disco.':
+		cls
+		if $loc = 'gdkin': minut += 5
+		grupNPC[numnpc] += 5
+		meynoldQW = 2
+		gs 'stat'
+		'<center><B><font color = maroon><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></B></center>'
+		'<center><img src="images\qwest\alter\npc<<numnpc>>.jpg"></center>'
+		'You came to Kate and thanked her for what she stole you from the disco home when you have touched. Kate smiled at you. "Not at all, only you do not get drunk. Drunkenness could end badly."'
+		if $loc!'gdkin': dynamic $din_sekondparturok
+		if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+		end
+	end
+	if numnpc = 14 and meynoldQW > 1 and mop <= 1:
+	'Kate looks at you with a smile, "<<$name>>, give I to you though your eyes are tinted."'
+		act 'Cosmetics.':
+		cls
+		hapri = 1
+		if $loc = 'gdkin': minut += 5
+		gs 'stat'
+		'<center><B><font color = maroon><<$npcName[numnpc]>> <<$npcSurName[numnpc]>></font></B></center>'
+		'<center><img src="images\qwest\alter\npc<<numnpc>>.jpg"></center>'
+		'Katia quickly straightened your hair and asked. "You what? Little tint, usually distribute or shovel?"'
+			act 'Light make-up':
+			cla
+			set mop = 2
+			'Katya legonechko your eyes and let the little tint the lips.'
+			if KatjaOTN > 0: KatjaHorny += 10 & 'Kate blushes and depart from your eyes.'
+			if $loc!'gdkin': dynamic $din_sekondparturok
+			if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+			end
+
+			act 'Normal makeup':
+			cla
+			set mop = 3
+			'Kate has made up your lips, eyes and let the eyelids.'
+			if KatjaOTN > 0: KatjaHorny += 10 & 'Kate blushes and depart from your eyes.'
+			if $loc!'gdkin': dynamic $din_sekondparturok
+			if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+			end
+
+			act 'Bright makeup':
+			cla
+			set mop = 4
+			'Kate painted her lips bright lipstick you thickly painted her eyes and eyelashes, eyebrows and summed imposed deep shadows.'
+			if KatjaOTN > 0: KatjaHorny += 10 & 'Kate blushes and depart from your eyes.'
+			if $loc!'gdkin': dynamic $din_sekondparturok
+			if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+			end
+		end
+	end
+	!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+if $loc!'gdkin': dynamic $din_sekondparturok
+if $loc = 'gdkin': act 'Move away': gt $loc, $metka
+--- Snpc ---------------------------------
+

+ 166 - 0
locations/StasQW

@@ -0,0 +1,166 @@
+# StasQW
+gs 'stat'
+if StasKafe = 2:
+'<center><img src="images\qwest\sosed\kafe2.jpg"></center>'
+'After the dance, Stas took you by the hand to the table and taking your waist sat on his lap. He immediately began to kiss you and you felt his hand again penetrated you under her skirt began to caress your clitoris. Stas you whispered in your ear, "Come to you or can have fun in the toilet?"'
+	act 'Come to me!':
+	cls
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\kafe2.jpg"></center>'
+	'Stas sweeping gesture threw the money to the waitress, and then stood up and gave you a hand. Leaning on his arm you up from their homes and together with Stas left the cafe.'
+		act 'Go':
+		cls
+		minut += 5
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\go.jpg"></center>'
+		'Quite unsure of drunk step you went home, Stas gallantly caught under your arm and led you to the house, you show him the way home. Finally you come to your home, you Stas conducted to the apartment and when you opened the door, he literally dragged you to your apartment.'
+		act 'Further': SStip = 0 & gt 'StasSex'
+		end
+	end
+
+	!секс в туалете со стасом
+
+
+end
+if StasKafe = 1:
+'<center><img src="images\qwest\sosed\kafe.jpg"></center>'
+'After the dance, you sat down again at the table, the waitress brought the bill. You look at the figure and slightly stunned. Five thousand! Stas took the paper out of your hands and you said "Do not worry, I´ll pay."'
+	if money >= 5000:
+		act 'No thank you, I´ll pay.':
+		cls
+		money -= 5000
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\kafe.jpg"></center>'
+		'You got the money and paid the waitress. Stas stood up and gave you a hand. Leaning on his arm you up from their homes and together with Stas left the cafe.'
+			act 'Go':
+			cls
+			minut += 5
+			gs 'stat'
+			'<center><img src="images\qwest\sosed\go.jpg"></center>'
+			'Quite unsure of drunk step you went home, Stas gallantly caught under your arm and led you to the house, you show him the way home. Finally you come to your home, you have to spend Stas apartments and clearly expects you to invite him.'
+				act 'To invite': SStip = 0 & gt 'StasSex'
+
+				act 'Say goodbye':
+				cls
+				gs 'stat'
+				'You said goodbye with Stas and he sighed sadly and went down.'
+				act 'Close the door': gt 'korr'
+				end
+			end
+		end
+	end
+
+	act 'Oh it´s so cute!':
+	cls
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\kafe.jpg"></center>'
+	'You are glad that will not have to pay for the cafe and Stas sweeping gesture threw the money to the waitress, and then stood up and gave you a hand. Leaning on his arm you up from their homes and together with Stas left the cafe.'
+		act 'Go':
+		cls
+		minut += 5
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\go.jpg"></center>'
+		'Quite unsure of drunk step you went home, Stas gallantly caught under your arm and led you to the house, you show him the way home. Finally you come to your home, you have to spend Stas apartments and clearly expects you to invite him. You get crushed on the doorstep, thinking how would snub Stas, but looking at it you feel indebted to him, he found you a job, he forked over the cafe, though it was your duty and put it over the threshold, you just can not.'
+		act 'To invite': SStip = 0 & gt 'StasSex'
+		end
+	end
+
+end
+if StasKafe = 0:
+'<center><B><font color = maroon>Cafe</font></B></center>'
+'<center><img src="images\etogame\kafe.jpg"></center>'
+'You sat on a chair and gestured Stas master´s waitress. When the waitress came, he ordered champagne and fruit. Order quickly brought Stas poured champagne glasses. "A toast to friendship."'
+	act 'Drink for acquaintance':
+	cls
+	minut += 5
+	horny += 5
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\kafe.jpg"></center>'
+	'You drank champagne and Stas started telling funny stories pouring champagne into glasses.'
+		act 'Drink and chat':
+		cls
+		minut += 60
+		horny += 15
+		water = 24
+		energy = 24
+		salo += 2
+		fat += 20
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\kafe.jpg"></center>'
+		'You are relaxed and drinking champagne that you listened to tales regaled Stas. For chatter, you do not even notice how Stas ordered another bottle and more. Finally you realize that you are already well plucked. Here in the cafe zairala music and Stas rising from his chair gallantly handed you a hand offering dance.'
+			act 'Dance':
+			cls
+			minut += 1
+			horny += 10
+			gs 'stat'
+			'<center><img src="images\qwest\sosed\dance.jpg"></center>'
+			'You came to the dance floor and Stas hugged you and you start dancing. His hands while dancing slowly slipped from the waist to the hips and you began to stroke them. You feel like your hand Stas squeezed soft ass.'
+				if horny < 100:
+					act 'Raise his hands above':
+					cls
+					minut += 1
+					horny += 10
+					gs 'stat'
+					'<center><img src="images\qwest\sosed\dance.jpg"></center>'
+					'You took his hands and raised them Stas again on your waist. Stas just smiled wider and again his hands began to crawl to you on the ass.'
+						if horny < 100:
+							act 'Again raise his hands above':
+							cls
+							minut += 1
+							horny += 10
+							gs 'stat'
+							'<center><img src="images\qwest\sosed\dance.jpg"></center>'
+							'Once again you took Stas hands and raised them to his waist. Stas apparently only covered by this passion and he began gently stroking gently down your back you hands on the ass. Finally dance is over.'
+							act 'Sit at the table': StasKafe = 1 & gt $curloc
+							end
+						end
+
+						act 'Dance':
+						cls
+						minut += 1
+						horny += 20
+						gs 'stat'
+						'<center><img src="images\qwest\sosed\dance2.jpg"></center>'
+						'You continued to dance and become inflamed Stas tuck your hands under her skirt. Soon Stas felt your panties and ran my hand. You swept excitement when your Stas felt a small bump clitoris and began to fondle him. Suddenly, the dance is over, but Stas was not going back sits at the table'
+							act 'Sit at the table': StasKafe = 2 & gt $curloc
+						end
+
+					end
+				end
+
+				act 'Dance':
+				cls
+				minut += 1
+				horny += 20
+				gs 'stat'
+				'<center><img src="images\qwest\sosed\dance2.jpg"></center>'
+				'You continued to dance and become inflamed Stas tuck your hands under her skirt. Soon Stas felt your panties and ran my hand. You swept excitement when your Stas felt a small bump clitoris and began to fondle him.'
+						if horny < 100:
+							act 'Raise his hands above':
+							cls
+							minut += 1
+							horny += 10
+							gs 'stat'
+							'<center><img src="images\qwest\sosed\dance.jpg"></center>'
+							'Once again you took Stas hands and raised them to his waist. Stas apparently only covered by this passion and he began gently stroking gently down your back you hands on the ass. Finally dance is over.'
+							act 'Sit at the table': StasKafe = 2 & gt $curloc
+							end
+						end
+
+						act 'Dance':
+						cls
+						minut += 1
+						horny += 20
+						gs 'stat'
+						'<center><img src="images\qwest\sosed\dance2.jpg"></center>'
+						'You continued to dance and become inflamed Stas tuck your hands under her skirt. Soon Stas felt your panties and ran my hand. You swept excitement when your Stas felt a small bump clitoris and began to fondle him. Suddenly, the dance is over, but Stas was not going back sits at the table'
+							act 'Sit at the table': StasKafe = 2 & gt $curloc
+						end
+				end
+			end
+		end
+	end
+end
+
+--- StasQW ---------------------------------
+

+ 53 - 0
locations/StasSex

@@ -0,0 +1,53 @@
+# StasSex
+
+if SStip = 0:
+minut += 5
+horny += 10
+gs 'stat'
+'<center><img src="images\qwest\sosed\stas.jpg"></center>'
+'You entered the apartment and Stas razuvshis immediately dug its lips in yours and you felt his hands covered your breasts started to caress them and compress. He´s not stopping to caress you took into your bedroom.'
+	act 'Go into the bedroom.':
+	cls
+	gs 'stat'
+	'<center><img src="images\qwest\sosed\pov.jpg"></center>'
+	'Stas drop you on the bed and began to undress without interrupting you fondle your breasts and undress himself.'
+		act 'Next.':
+		cls
+		if StasikSex > 0: StasikSex += 1
+		if StasikSex = 0: StasikSex = 1 & guy += 1
+		!if ValeraSex = 0:ValeraSex = 1 & guy += 1
+		!gang += 1
+		minut += 15
+		gs 'stat'
+		'<center><img src="images\qwest\sosed\sex.jpg"></center>'
+		'You are relaxed and began to enjoy the caress breasts and pussy.'
+		$boy = 'Stasik'
+		dick = 15
+		silavag = 1
+		pose = 0
+		!dynamic $sexstart
+		'You felt like a body Stasik expanded the your feet and his hard cock rested against your soft, expiring pussy juice.'
+		dynamic $sexstart2
+		!dynamic $sexcum
+		set cumpussy += 1
+		'<<$boy>> groaned and you feel like jet of sperm hit you inside your body.'
+			if tabletki <= 0 and mesec <= 0:
+			gs 'preg'
+			set manna -= 15
+			set willpower -= 15
+			'Hell, because after all, you can fly, you thought with horror.'
+			end
+
+			act 'Breath.':
+			cls
+			minut += 5
+			gs 'stat'
+			'<center><img src="images\qwest\sosed\aftersex.jpg"></center>'
+			'Stas tears with you and is located near your breast stroking hand. Of your pussy slowly follows sperm mixed with your vaginal juices. Stas said apologetically, "I´m sorry that you came inside, could not resist." He reached out and began to get out of bed. "Well, I gotta go Svetsik."'
+			act 'Hold up the door.': gt 'korr'
+			end
+		end
+	end
+end
+--- StasSex ---------------------------------
+

+ 73 - 0
locations/TV

@@ -0,0 +1,73 @@
+# TV
+if $ARGS[0] = 'start':
+cla
+
+clr
+gs 'stat'
+set elektro += 5
+
+'<center><img src="images\pics\telek.jpg"></center>'
+'You turn on the TV and settled comfortably on the couch.'
+
+if TV = 1: 'Ancient TV turns on and out came the sound of hoarse advertising.'
+if TV = 2: 'Huge plasma joined and out came the sound of advertising smartly.'
+
+if kabel = 0:
+	'You do not have cable, so shows only one channel at a constant advertising and news.'
+	act 'Watch TV (1:00)': gt 'TV','nokable'
+end
+
+if kabel = 1:
+	'You have cable TV.'
+	act 'Watch TV (1:00)': gt 'TV','kable'
+end
+
+if daystart < 10 and StoryLine = 0: 'Sometimes while watching TV look accidentally stops on your legs or chest, and every time it´s a bit shocking for you to see that your body is now a woman.'
+	act 'Turn off the TV and get off the couch':
+		cla
+		gt 'TV','fin'
+	end
+end
+
+if $ARGS[0] = 'nokable':
+cla
+*clr
+set minut += 60
+set manna += 3
+set willpower += RAND(5,10)
+set manna += RAND(10,50)
+set elektro += 3
+clr
+gs 'stat'
+'<center><img src="images\pics\telek.jpg"></center>'
+'You are viewing the central channel lying on the couch. Watch almost nothing solid and cheesy advertising program.'
+if daystart < 10 and StoryLine = 0: 'Sometimes while watching TV look accidentally stops on your legs or chest, and every time it´s a bit shocking for you to see that your body is now a woman.'
+
+act 'Watch TV (1:00)': gt 'TV','nokable'
+act 'Turn off the TV and get off the couch': gt 'TV','fin'
+end
+
+if $ARGS[0] = 'kable':
+cla
+*clr
+set minut += 60
+set manna += 6
+set willpower += RAND(10,20)
+set manna += RAND(50,100)
+set elektro += 3
+clr
+gs 'stat'
+'<center><img src="images\pics\telek.jpg"></center>'
+'You are viewing cable television.'
+if daystart < 10 and StoryLine = 0: 'Sometimes while watching TV look accidentally stops on your legs or chest, and every time it´s a bit shocking for you to see that your body is now a woman.'
+
+act 'Watch TV (1:00)': gt 'TV','kable'
+act 'Turn off the TV and get off the couch': gt 'TV','fin'
+end
+
+if $ARGS[0] = 'fin':
+	cla
+	gt $locM, $metkaM
+end
+--- TV ---------------------------------
+

+ 35 - 0
locations/Terminal

@@ -0,0 +1,35 @@
+# Terminal
+set minut += 5
+'<center><B><font color = maroon>Storage terminal</font></B></center>'
+'<center><img src="images\etogame\terminal.jpg"></center>'
+clr
+gs 'stat'
+!fcolor = rgb(0,0,0)
+!bcolor = rgb(255,255,255)
+!LCOLOR = rgb(106,90,205)
+'A plurality of storage buildings to which drive up truck for loading and unloading.'
+
+
+	act 'Leave':
+	cla
+	set minut += 5
+	gt 'nord'
+	end
+
+	if TerminalPapper = 1 and DayTerminalPapper = day:
+		act 'Classified documents':
+		cls
+		set minut += 15
+		TerminalPapper = 2
+		fcolor = rgb(0,0,0)
+		bcolor = rgb(255,255,255)
+		LCOLOR = rgb(106,90,205)
+		gs 'stat'
+		'You went to the office and gave the documents to the manager.'
+		act 'Leave': minut += 5 & gt 'nord'
+		end
+
+	end
+
+--- Terminal ---------------------------------
+

+ 46 - 0
locations/Timofei

@@ -0,0 +1,46 @@
+# Timofei
+minut += 1
+sosedDay = day
+gs 'stat'
+'<center><img src="images\qwest\sosed\sosed.jpg"></center>'
+'Timothy shakes ashes in a jar and you nod "Hello."'
+
+act 'Say hello and leave': gt 'etoexhib','pos51'
+
+act 'Chat':
+cls
+minut += 15
+Sosed += 1
+gs 'stat'
+'<center><img src="images\qwest\sosed\sosed.jpg"></center>'
+	if sosedSlut = 0:
+		if sosed = 1:
+		'Timothy says that studying in college and soon it will end.'
+		end
+		if sosed = 2:
+		'Timothy says that he lives with his mother, his father lives in a divorce with his mother and live with another family.'
+		end
+		if sosed = 3:
+		'Timothy tells us that soon he will finish studying for law and father promised to give him a car.'
+		end
+		if sosed = 4:
+		'Timothy says that he and his childhood studying dance and still, he and his team are sometimes the house of culture.'
+		end
+		if sosed = 5:
+		'Timothy tells us that in the evenings he earns repairing computers.'
+		end
+		if sosed = 6:
+		'Timothy says that after college he was going to go to college, that he had not been taken into the army.'
+		end
+		if sosed >= 7:
+		'Timothy fun talking to you about life, computers, wheelbarrows.'
+		end
+	end
+	if sosedSlut = 1:
+	'You are trying to strike up a conversation, but Timothy responsible monosyllables and extinguished a cigarette goes home.'
+	end
+act 'Say goodbye and leave': gt 'etoexhib','pos51'
+end
+
+--- Timofei ---------------------------------
+

+ 33 - 0
locations/TimofeiMetro

@@ -0,0 +1,33 @@
+# TimofeiMetro
+minut += 1
+sosedMetroDay = day
+gs 'stat'
+!'<center><img src="images\qwest\sosed.jpg"></center>'
+'Timothy saw you and said hello, "Hello <<$name>>."'
+if cumfrot= 0 and cumface = 0 and sosedSlut = 0: 'You chatted with Timothy while riding the subway.'
+if sosedSlut = 1:
+'After greeting Timothy all kind shows that he is not interested in your further communication.'
+end
+if sosedSlut = 0:
+	if cumfrot > 0 or cumface > 0:
+	sosedSlut = 1
+		if cumface > 0:
+		'He looked puzzled at your face. "<<$name>>, your face is smeared in something." He stared at you and after a moment he realized that you cum on her face. "What´s that? Cum?"'
+		else
+		'He started chatting with you fun, then suddenly noticed semen on your clothes, his eyes widened noticeably "What´s that? Cum?"'
+		end
+
+		act 'Excuses':
+		cls
+		gs 'stat'
+		'You began to make excuses, claiming that it is all an accident and you are absolutely innocent. But Timothy frankly do not believe you and listen to you without interest.'
+		act 'Get out of the car': gt 'metro','start'
+		end
+
+	end
+end
+
+act 'Get out of the car': gt 'metro','start'
+
+--- TimofeiMetro ---------------------------------
+

+ 114 - 0
locations/Vnlake1

@@ -0,0 +1,114 @@
+# Vnlake1
+'<center><img src="images\img\Lake\Vnlake1\vnlake1.jpg"></center>'
+'While you were sunbathing you came tipsy girl with a bottle of wine under, sat down next to you and began to stroke your back.'
+act 'Drive away': gt 'Nudelake'
+act 'Kiss':
+	cla
+	*clr
+	set lesbian += 1
+	set girl += 1
+	'<center><img src="images\img\Lake\Vnlake1\vnlake2.jpg"></center>'
+	'You povarachivaetsya her and bites her lips, she begins to fondle your breasts tongue, and hand massages you pussy.'
+	act 'Proceed': gt 'Vnlake1','variant'
+end
+
+if $ARGS[0] = 'variant':
+cla
+*clr
+'<center><img src="images\img\Lake\Vnlake1\vnlake0.jpg"></center>'
+'The girl looks at you in anticipation of your actions'
+act 'Lick her': gt 'Vnlake1','ukuni'
+act 'Ask you to lick': gt 'Vnlake1','kuni'
+act 'Ask to lick your anus': gt 'Vnlake1','anuli'
+act 'Insert the bottle in her pussy': gt 'Vnlake1','bvag'
+act 'Insert the bottle in her ass': gt 'Vnlake1','banal'
+act 'Ask you to insert a bottle in pussy': gt 'Vnlake1','ubvag'
+act 'Ask you to insert a bottle in the ass': gt 'Vnlake1','ubanal'
+act 'Sit on the bottle.': gt 'Vnlake1','ubsit'
+act 'Rubbing pussies.': gt 'Vnlake1','sex'
+end
+
+if $ARGS[0] = 'ukuni':
+cla
+*clr
+'<center><img src="images\img\Lake\Vnlake1\vnlake4.jpg"></center>'
+'You kiss her breasts moving eventually going down lower and lower and now its current before you pussy, you begin to caress her tongue sponges, setting the stage for his tongue between them touch the clitoris, she pushes her lips with your fingers that nothing had prevented you caress the clitoris.'
+act 'More': gt 'Vnlake1','variant'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'kuni':
+cla
+*clr
+set kuni += 1
+'<center><img src="images\img\Lake\Vnlake1\vnlake5.jpg"></center>'
+'Girl holds his tongue over your thighs, crotch and kisses down to the vagina, her tongue slides over your crotch then caressing the clitoris is penetrating the vagina.'
+act 'More': gt 'Vnlake1','variant'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'anuli':
+cla
+*clr
+'<center><img src="images\img\Lake\Vnlake1\vnlake6.jpg"></center>'
+'She kisses your buttocks priblezhayas moving eventually to the center, reaching a goal, she spends the language of your anus and then shoves it inside your priests, prints and again licking the anus, then all repeated.'
+act 'More': gt 'Vnlake1','variant'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'bvag':
+cla
+*clr
+'<center><img src="images\img\Lake\Vnlake1\vnlake7.jpg"></center>'
+'You take the bottle neck and poke into her pussy, she kisses you while you are driving with one hand and the second bottle fondle her breasts.'
+act 'More': gt 'Vnlake1','variant'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'banal':
+cla
+*clr
+'<center><img src="images\img\Lake\Vnlake1\vnlake8.jpg"></center>'
+'You take a bottle, licking the neck, trying to leave it on the maximum amount of saliva, and gently insert it into the anus of girls starting to fuck her ass bottle medleno first then faster and faster.'
+act 'More': gt 'Vnlake1','variant'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'ubvag':
+cla
+*clr
+set sex += 1
+set orgasm += 1
+'<center><img src="images\img\Lake\Vnlake1\vnlake9.jpg"></center>'
+'Girl puts you in a bottle pussy, she moves it back and forth while constantly provarachivaet, the bottle in her hands to get better soon, and any member of your body shuddered in orgasm.'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'ubanal':
+cla
+*clr
+'<center><img src="images\img\Lake\Vnlake1\vnlake10.jpg"></center>'
+'Girl spits on you ass, collects saliva bottle neck and inserts it into the anus to you, you feel like a glass slide in your ass, bringing you pleasure.'
+act 'More': gt 'Vnlake1','variant'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'ubsit':
+cla
+*clr
+'<center><img src="images\img\Lake\Vnlake1\vnlake11.jpg"></center>'
+'You put the bottle and sit down on her with my anus, you liked the feel of the slip, she caressed your breasts tongue until you jumped on the bottle.'
+act 'More': gt 'Vnlake1','variant'
+act 'Leave': gt 'Nudelake'
+end
+
+if $ARGS[0] = 'sex':
+cla
+*clr
+set orgasm += 1
+'<center><img src="images\img\Lake\Vnlake1\vnlake12.jpg"></center>'
+'You sat across from each other, woven so that your feet would touch pussy and started to move her hips caressing each other, until the wave of pleasure is not covered you both.'
+act 'Leave': gt 'Nudelake'
+end
+--- Vnlake1 ---------------------------------
+

+ 45 - 0
locations/Vnlake2

@@ -0,0 +1,45 @@
+# Vnlake2
+'<center><img src="images\img\Lake\Vnlake2\vnlake1.jpg"></center>'
+'Tan you dozed off, and you dream about as a caress your breasts, as someone caressing tongue your pussy, you open HVAs and understand that this is not a dream, next to you two men one caress your breasts, the second you have already dug his lips between her legs.'
+act 'Push them': gt 'Nudelake'
+act 'Touch member':
+	cla
+	*clr
+	set guy += 2
+	set bj += 1
+	'<center><img src="images\img\Lake\Vnlake2\vnlake2.jpg"></center>'
+	'Spit you a member of one of them and get up on his knees, men rise and stand next to you, their members to Paul on you, you take them in hand and begin to suck alternately.'
+	act 'Stand on all fours':
+		cla
+		*clr
+		set sex += 1
+		'<center><img src="images\img\Lake\Vnlake2\vnlake3.jpg"></center>'
+		'Sucked enough you get up on all fours, one of the men in front of you lies a member to face a second knelt behind and came into your vagina.'
+		act 'Change position':
+			cla
+			*clr
+			set anal += 1
+			set orgasm += 3
+			'<center><img src="images\img\Lake\Vnlake2\vnlake4.jpg"></center>'
+			'Sitting on a dildo, you pushed her hands buttocks inviting second enter your ass, which he did. They fuck you in the trunk in two, and you were moaning and ended. Have you finished that many times lost count, and the men all went finally took one member of your ass, you decided that it would end now but it was not there.'
+			'"Sit down ass" said the man from the bottom'
+			act 'Seats':
+				cla
+				*clr
+				set cumass += 1
+				'<center><img src="images\img\Lake\Vnlake2\vnlake5.jpg"></center>'
+				'You acted with the member turned her back to him and planted his ass on his dildo, came second to your face and put his penis in your mouth. Soon you povstvovali that your ass flooded with sperm and dick in your mouth is about to finish.'
+				act 'Remove the mouth':
+					cla
+					*clr
+					set cumface += 1
+					'<center><img src="images\img\Lake\Vnlake2\vnlake6.jpg"></center>'
+					'You spat member of his mouth and the man was discharged on your face.'
+					act 'Stay on the beach': gt 'Nudelake'
+					end
+				end
+			end
+		end
+	end
+--- Vnlake2 ---------------------------------
+

+ 177 - 0
locations/Voltrener

@@ -0,0 +1,177 @@
+# Voltrener
+	$din_trener_bj = {
+		act 'give blowjob':
+		cls
+		bj += 1
+		if trenerSex > 0: trenerSex += 1
+		if trenerSex = 0: trenerSex = 1 & guy += 1
+		if volleysostav > 0: trenerepa += 2
+		gs 'stat'
+		'<center><img src="images\qwest\alter\ev\tren.jpg"></center>'
+		'You squatted in front of the coach and stroked his crotch and felt how his cock stood up. You reached into his sweatpants gum holding with the other hand and groped hot cock trainer. You pulled the standing member of sweatpants and leaned toward him around his lips.'
+
+			if trenerSex >= 5:
+
+			end
+
+			if tipTrsex = 0:
+			cumlip += 1
+			swallow += 1
+			gs 'stat'
+			'Coach groaned slightly and your mouth spurted warm jet of sperm. You started to swallow warm liquid fills your mouth.'
+			end
+
+			if volleysostav = 0:
+			volleysostav = 1
+			trenerepa = 20
+			'Coach bosses cock in his pants. "Okay <<$surname>>, you are very diligent girl, maybe you will come out of sense, consider that you have a team, but of course in replacement players."'
+			end
+		if tipTrsex = 0: act 'Leave': tipTrsex = 0 & gt 'gdksport'
+		end
+	}
+	$din_trener_gorslut = {
+	gs 'stat'
+	'You reluctantly nodded his head, "It´s true, I really <<$gnikname>>. And what does this have to volleyball?" Coach smiled, "Indirect attitude, very indirectly, we´re now discussing how you get into the team. And I wonder what you can do. You know what I Gauvreau?"'
+		act 'No':
+		cls
+		gs 'stat'
+		'You shake your head and told the coach that do not understand the coach sighed, "And you do not mind bleschesh, is not it? Well, I lonely man, and all around a pretty young girl. So clear?"'
+		act 'Leave': gt 'gdksport'
+		dynamic $din_trener_bj
+		end
+
+		act 'Coach put his hand on her knee':
+		cls
+		gs 'stat'
+		'You leaned forward slightly and put her palm on his knee coach grin you whispered "Need a little demonstration of my other skills? I understand you correctly?" Coach leaned back in his chair, "You´re a smart girl of <<$name>>, go on."'
+		dynamic $din_trener_bj
+		end
+	}
+
+	gs 'stat'
+	'<center><img src="images\qwest\alter\gdksport.jpg"></center>'
+	'You went into the room the coach in which there are cups, balls, sports equipment and a different table where sometimes sitting coach and fills various papers. Coach Mikhail Vlasov does not only lovers but also in the section just coach a professional team volleybolistok.'
+	if volleysostav > 0:
+	if trenerepa < 20: 'The coach does not wish you any longer.'
+	if trenerepa >= 20 and trenerepa < 40: 'Coach barely tolerates you.'
+	if trenerepa >= 40 and trenerepa < 60: 'You have a normal relationship with the coach.'
+	if trenerepa >= 60 and trenerepa < 80: 'You have a good relationship with the coach.'
+	if trenerepa >= 80: 'Trainer in you doted.'
+		if trenerepa <= 0:
+		volleysostav = -1
+		'Coach menacing appeals to you. "All <<$surname>>, you make me sick with their flourishes. I´ll exclude from the team!"'
+		act 'Leave': gt 'gdksport'
+		exit
+		end
+
+	end
+		act 'Talk with the coach':
+		cls
+		gs 'stat'
+			if volleysostav = -1:
+				if trenerSex = 0:
+				'Coach looked up at you, "<<$surname>>. Did not even come near me. Longer I´ll put you in command!"'
+				end
+				if trenerSex > 0:
+				'Coach looked up at you, "<<$surname>>. Did not even come near me. Longer I´ll put you in the team!"'
+				end
+			end
+		if volleysostav = 0:
+				if volleyboll < 25:
+				'Coach looked at you "And <<$surname>>. Do not distract me from things."'
+				end
+				if volleyboll >= 25 and volleyboll < 50:
+				'Coach looked at you "And <<$surname>>. You need to devote more time to training, you are all very bad."'
+				end
+				if volleyboll >= 50 and volleyboll < 75:
+				'Coach looked at you "And <<$surname>>. You certainly did not play bad, but not bad for an amateur. Higher level you do not you pull."'
+				end
+				if volleyboll >= 75:
+				'Coach looked at you "And <<$surname>>. Do you have the makings of athletes, though I´m not sure that at the professional level you get that either."'
+					act 'Asks the pros':
+					cls
+					gs 'stat'
+					if GorSlut = 0:
+							if volleyboll < 100:
+							'You started to ask the coach to include you in command, but he shook his head. "<<$surname>> is not buried, you have a good amateur level. Potyanesh But you do not."'
+							end
+							if volleyboll >= 100:
+							'You started to ask the coach to include you in the team, the coach thought. "Of course you can try to include you in the replacement, but I do not even know if I should."'
+								act 'Persuade':
+								cls
+								dom -= 1
+								gs 'stat'
+									if dom >= 10:
+									!if volleysostav > 0:trenerepa -= 1
+									volleysostav = 1
+									trenerepa = 20
+									'You started to prove the coach that you want to include in the team, the coach tried to protest, but your head was so convincing that he eventually gave up. "Okay <<$surname>>, I´ll put you in command until naturally only in the bench."'
+									else
+									'You started to prove the coach that you want to include in the team, but failed to show sufficient vigor and coach threw all your arguments denying you.'
+									end
+								act 'Leave': gt 'gdksport'
+								end
+							end
+					end
+					if GorSlut > 0:
+					'You started to ask the coach to include you in the. Coach thought, "Hey <<$surname>>, then other devchoki about you say different things. Example you <<$gnikname>>. Is that true?"'
+							act 'It´s all lies':
+							cls
+							gs 'stat'
+								if dom > 0:
+								'You started to prove the coach that rumors about you it´s all lies and dismiss them envious. You said quite convincingly and coach seems to believe.'
+									act 'Make sure to include the team':
+									cls
+									dom -= 1
+									gs 'stat'
+										if dom >= 10:
+										!if volleysostav > 0:trenerepa -= 1
+										volleysostav = 1
+										trenerepa = 20
+										'You started to prove the coach that you want to include in the team, the coach tried to protest, but your head was so convincing that he eventually gave up. "Okay <<$surname>>, I´ll put you in command until naturally only in the bench."'
+										else
+										'You started to prove the coach that you want to include in the team, but failed to show sufficient vigor and coach threw all your arguments denying you.'
+										end
+									act 'Leave': gt 'gdksport'
+									end
+								else
+								'You started to prove the coach that rumors about you it´s all lies and dismiss them envious. You said not very convincing and coach you frankly do not believe. "<<$surname>>, stop lying, You´re holding me for a fool?"'
+									act 'Okay, it´s true, I <<$gnikname>>':
+									cls
+									gs 'stat'
+									dynamic $din_trener_gorslut
+									end
+								end
+							act 'Leave': gt 'gdksport'
+							end
+
+							act 'It´s true, I <<$gnikname>>':
+							cls
+							gs 'stat'
+							dynamic $din_trener_gorslut
+							end
+
+					end
+					act 'Leave': gt 'gdksport'
+					end
+				end
+			end
+			if volleysostav > 0:
+				if trenerSex = 0:
+				'Coach looked at you "And <<$surname>>. Do not distract me from things."'
+				end
+				if trenerSex > 0:
+				'Coach looked at you "And <<$surname>>. Done for coming."'
+					act 'Coach put his hand on her knee':
+					cls
+					gs 'stat'
+					'You leaned forward slightly and put her palm on his knee coach grin you whispered "Need a little demonstration of my skills? I understand you correctly?" Coach leaned back in his chair, "You´re a smart girl of <<$name>>, go on."'
+					dynamic $din_trener_bj
+					end
+				end
+			end
+		act 'Leave': gt 'gdksport'
+		end
+	act 'Leave': gt 'gdksport'
+--- Voltrener ---------------------------------
+

+ 189 - 0
locations/WorkHosp

@@ -0,0 +1,189 @@
+# WorkHosp
+if $ARGS[0] = 'start':
+$sexloc = $CURLOC
+gs 'stat'
+set jobhosprand = rand(0,9)
+
+'<center><B><font color = maroon>Clinic</font></B></center>'
+'<center><img src="images\img\spaln\hospital.jpg"></center>'
+'The clinic are hard at work, patients sit in queues, doctors are receiving, nurses rush from office to office.'
+
+act 'Work in the procedural':
+set minut += 60
+if jobhosprand = 0: gt 'WorkHosp','2'
+'You worked in the treatment room.'
+cla
+act 'Move away': gt 'WorkHosp','start'
+end
+
+act 'Help the doctor at the reception':
+set minut += 60
+if jobhosprand = 0: gt 'WorkHosp','3'
+'You helped a doctor at the reception.'
+cla
+act 'Move away': gt 'WorkHosp','start'
+end
+
+act 'Relax in nursing':
+set minut += 30
+'You relax.'
+cla
+act 'Masturbate (0:15)':
+	set minut += 15
+	set mastrrand = rand(0,2)
+	if mastrrand = 0:
+		gt 'WorkHosp','1'
+	else
+		set picrand = 11
+		cla
+		*clr
+		set mastr += 1
+		'<center><img src="images\img\mastr\mastr<<picrand>>.jpg "></center>'
+		'You matrubiruete.'
+		set horny = 0
+		set orgasm += 1
+		'Pritnoe gradually grow warm and throbbing in the lower abdomen, then descend to the feeling you and your entire body covered hot waves of orgasm'
+		end
+	act 'Exit': gt 'WorkHosp','start'
+	end
+act 'Move away': gt 'WorkHosp','start'
+end
+
+act 'There in the cafeteria':
+	set minut += 30
+	set health += 10
+	set manna += 5
+	set willpower += 5
+	if energy >= 30:
+		set fat += 5
+		'You can no longer have.'
+		end
+	if energy >= 20 and energy < 30:
+		set fat += 3
+		set energy += 10
+		'You pushed through the power of a meal.'
+		end
+	if energy < 20:
+		set energy += 20
+		set fat += 1
+		'You gladly ate the food.'
+		end
+	if water >= 20:
+		'Tea in you no longer climbs.'
+		end
+	if water < 20:
+		'You gladly drank a mug of tea.'
+		set water += 20
+		end
+	end
+
+act 'Chat with Kate':
+set minut += 30
+kat = kat + 1
+if kat > 60 and military = 0: gt 'WorkHosp','milit'
+'You chatted with Kate.'
+cla
+if kat > 50:
+	act 'Suggest uedinitsa': gt 'WorkHosp','0'
+	end
+act 'Move away': gt 'WorkHosp','start'
+end
+
+if hour >= 16:
+cls
+'<center><B><font color = maroon>Clinic</font></B></center>'
+'<center><img src="images\img\spaln\hospital.jpg"></center>'
+'Your shift ended.'
+act 'Go home': gt 'street'
+end
+end
+
+if $ARGS[0] = 'milit':
+military = 1
+'"Listen, I immediately offered to earn the weekend, but I have plans. Overall the thing is close to the city are often held war games, well, according to the rules that need to be attended by doctors there. Do not be afraid you will be there with you doctor, so the maximum that you have to do is to stick patches. short if you decide on a Saturday bus at the clinic, he was waiting for from 6 to 9 hours. Yeah I almost forgot to pay for two days of 5000. "'
+cla
+act 'Move away': gt 'WorkHosp','start'
+end
+
+if $ARGS[0] = '0':
+cla
+*clr
+set katprorand = rand(0,2)
+if katprorand = 0:
+	set girl += 1
+	set lesbian += 1
+	set picrand = 11
+	xgt 'lezbsex','var'
+	end
+if katprorand = 1:
+	'<center><img src="images\img\spaln\hospsex7.jpg"></center>'
+	'Only you and Kat began to fondle each other as to the treatment the patient is entered. You backed away from her trying to pretend that nothing happened, on the contrary, Kate did not hesitate and was lying on the couch with her legs spread wide, proudly showing off her wet pussy on your tongue, and looked appealingly at the guy look inviting him prisoedinitsa.'
+	act 'Exit': gt 'WorkHosp','start'
+	act 'Amuse':
+		set girl += 1
+		set guy += 1
+		set lesbian += 1
+		set picrand = 12
+		gt 'podrsex','var'
+		end
+	end
+if katprorand = 2:
+	'<center><img src="images\img\spaln\hospsex8.jpg"></center>'
+	'When your games were in full swing in procedural included two doctors, but you were already so excited that not paying any attention to them continued, and when men began to caress you, you just degradability radvinuli legs wider, inviting them into your vagina.'
+	act 'Entertain':
+		set gang += 1
+		set picrand = 11
+		xgt 'sexdvanadva','var'
+		end
+	end
+end
+
+if $ARGS[0] = '1':
+cla
+*clr
+set mastrrand = rand(0,1)
+if mastrrand = 0:
+	'<center><img src="images\img\spaln\hospsex9.jpg"></center>'
+	'While you samozabveno masturbate, trying to bring herself to orgasm, the doctor enters the room, you are so keen that only notice it when his hand starts to pull your head to a standing member.'
+	if horny < 50: act 'Break and run': gt 'WorkHosp','start'
+	act 'Amuse':
+		set guy += 1
+		set picrand = 12
+		gt 'sex','minet'
+		end
+	end
+if mastrrand = 1:
+	'<center><img src="images\img\spaln\hospsex10.jpg"></center>'
+	'While you samozabveno masturbate, trying to bring herself to orgasm in the room includes two doctors, you are so keen that only notice them when they stand in front of you with members shaved and masturbate.'
+	if horny < 50: act 'Leave': gt 'WorkHosp','start'
+	set picrand = rand(12,13)
+	act 'Amuse': set guy += 2 & xgt 'sexdvoe','var'
+	end
+end
+
+if $ARGS[0] = '2':
+cla
+*clr
+set picrand = rand(13,15)
+'<center><img src="images\img\spaln\hospsex11.jpg"></center>'
+'To you and the patient comes from the doorway taking his pants demonstrates his flaccid penis and asks you to help him as you see it is not worth it. Mind you realize that it´s all just a silly gimmick that would fuck you, but you still feel sorry for him. And suddenly it does not worth it, and you will be able to pick it up, but what if he just no luck with girls and if today is not lucky, he will jump out of the window.'
+act 'Oust him': gt 'WorkHosp','start'
+act 'Pick up': set guy += 1 & gt 'sex','minet'
+end
+
+if $ARGS[0] = '3':
+cla
+*clr
+'<center><img src="images\img\spaln\hospsex12.jpg"></center>'
+'It comes to you pretty patient until the doctor tries to examine her, and then she touches his trousers near term, the doctor glances at you with a question in his eyes.'
+act 'Make her remark': gt 'WorkHosp','start'
+act 'Amuse':
+	set guy += 1
+	set girl += 1
+	set lesbian += 1
+	set picrand = 13
+	gt 'podrsex','var'
+	end
+end
+--- WorkHosp ---------------------------------
+

+ 105 - 0
locations/agentned

@@ -0,0 +1,105 @@
+# agentned
+gs 'stat'
+'<center><B><font color = maroon>Real Estate Agency</font></B></center>'
+
+act 'Exit': gt 'down'
+
+if BuyHous['Street'] ! 1 or BuyHous['Down'] ! 1 or BuyHous['Nord'] ! 1:
+	'You can buy an apartment in a residential area, Downtown or Northern region.'
+	'Renting an apartment costs 200 rubles per day, minimum rental is for a period of 30 days.'
+
+	if money >= 2000000:
+		if BuyHous['Street'] ! 1:
+			act 'Buy an apartment is residental dirstrict':
+				cls
+				money -= 2000000
+				housr = 1
+				BuyHous = 1
+				housr['Street'] = 1
+				BuyHous['Street'] = 1
+				gs 'stat'
+				'You bought an apartment in the residential area.'
+				act 'Exit': gt 'down'
+			end
+		end
+		if BuyHous['Down'] ! 1:
+			act 'Buy an apartment is downtown':
+				cls
+				money -= 2000000
+				housr = 1
+				BuyHous = 1
+				housr['Down'] = 1
+				BuyHous['Down'] = 1
+				gs 'stat'
+				'You bought an apartment in the downtown.'
+				act 'Exit': gt 'down'
+			end
+		end
+		if BuyHous['Nord'] ! 1:
+			act 'Buy an apartment is northern region':
+				cls
+				money -= 2000000
+				housr = 1
+				BuyHous = 1
+				housr['Nord'] = 1
+				BuyHous['Nord'] = 1
+				gs 'stat'
+				'You bought an apartment in the northern region.'
+				act 'Exit': gt 'down'
+			end
+		end
+	end
+end
+
+if BuyHous['Street']!1 or BuyHous['Down']!1 or BuyHous['Nord']!1:
+	if money >= 6000:
+		if BuyHous['Street'] ! 1:
+			act 'Rent an apartment in residental district':
+				cls
+				money -= 6000
+				housr = 1
+				BuyHous = 2
+				housr['Street'] = 1
+				BuyHous['Street'] = 2
+				ArendHouseSL['Street'] += 30
+				gs 'stat'
+				'You rented a flat in a residential area. Now you <<ArendHouseSL[''Street'']>> rental days.'
+				act 'Exit': gt 'down'
+			end
+		end
+		if BuyHous['Down'] ! 1:
+			act 'Rent an apartment in downtown':
+				cls
+				money -= 6000
+				housr = 1
+				BuyHous = 2
+				housr['Down'] = 1
+				BuyHous['Down'] = 2
+				ArendHouseSL['Down'] += 30
+				gs 'stat'
+				'You rented a flat in a downtown. Now you <<ArendHouseSL[''Down'']>> rental days.'
+				act 'Exit': gt 'down'
+			end
+		end
+		if BuyHous['Nord'] ! 1:
+			act 'Rent an apartment in northern region':
+				cls
+				money -= 6000
+				housr = 1
+				BuyHous = 2
+				housr['Nord'] = 1
+				BuyHous['Nord'] = 2
+				ArendHouseSL['Nord'] += 30
+				gs 'stat'
+				'You rented a flat in a northern region. Now you <<ArendHouseSL[''Nord'']>> rental days.'
+				act 'Exit': gt 'down'
+			end
+		end
+	end
+end
+
+if ArendHouseSL['Street']>0: 'Your residential house has <<ArendHouseSL[''Street'']>> rental days left.'
+if ArendHouseSL['Down']>0: 'Your Downtown house has <<ArendHouseSL[''Down'']>> rental days left.'
+if ArendHouseSL['Nord']>0: 'Your northern district house has <<ArendHouseSL[''Nord'']>> rental days left.'
+--- agentned ---------------------------------
+

+ 99 - 0
locations/albinaEv

@@ -0,0 +1,99 @@
+# albinaEv
+$din_albina_get_over_car = {
+'Strong hands grabbed you and out of the car.'
+	act 'Further':
+	cls
+	albinaCar = 1
+	gs 'stat'
+	'<center><img src="images\qwest\alter\grab.jpg"></center>'
+
+	end
+}
+
+
+
+albinaCarday = day
+gs 'stat'
+'<center><img src="images\qwest\alter\BMW.jpg"></center>'
+'You went out to the car and looked at Albina. She looked around you haughty look and started the car.'
+if albinaCar > 0:
+
+end
+if albinaCar = 0:
+	act 'Is that your car?':
+	cls
+	albinaCar = 1
+	gs 'stat'
+	'<center><B><font color = maroon><<$npcName[23]>> <<$npcSurName[23]>></font></B></center>'
+	'<center><img src="images\qwest\alter\npc23.jpg"></center>'
+	'You asked Albina "Is this your car?" Albina squirmed grimassy contemptuous "What? Of course not, this is the machine my father, I would never have bought it. Generally X5 is a machine for cattle suddenly grown rich and not for decent people." You shake your head, "You what? Rights have?" Albina laughed "Rights? Why should I, right? Do you know who my father is? He police chief of our town, though retired, but the connection remained. Never stopped me in his car." Albina second thought about something and said, "go for a drive."'
+		act 'Go with Albina':
+		cls
+		minut += 5
+		gs 'stat'
+		'<center><img src="images\qwest\alter\BMW.jpg"></center>'
+		'You sat down on the seat next to Albina and she touched the car. You went through the streets of the town, soon you moved out from the central streets and stopped at what that wilderness, where the trees darkened factory building. Albina looking at you smiled mysteriously "This is a surprise."'
+			act 'Look around':
+			cls
+			minut += 5
+			gs 'stat'
+			'<center><img src="images\qwest\alter\castle.jpg"></center>'
+			'You looked around and realized that you are in the territory of an abandoned factory. You looked at Albina, she grinned and poked manicured finger in the plate. Have you read the inscription on the plate "Property Ltd. The Snow Queen" Albina grinned "This castle of the Snow Queen. My Territory" The car stopped and two men approached BMW, the appearance of both was a little over 30 years, one tall, athletic, not the second big growth with tum, but very sturdy, with a red neck wrestling, powerful hands and broad shoulders. Albina opened the door, "Hi guys. How you doing?" Guys frown examined you and shorty boomed "Everything is fine."'
+				if AlbinaLast > 0 or AlbinaBlokDance > 0:
+				'Albina does not stop the engine, got out and told the guy, "I´ve brought you a not very obedient girl who knows something about my dance business." High grinned "I see." Strong Shorty silently and lazily toward you.'
+				if dom > 0:
+						act 'Go behind the wheel':
+						cls
+						minut += 5
+						gs 'stat'
+						'<center><img src="images\qwest\alter\BMW.jpg"></center>'
+							if agil >= 100:
+							'You deftly jumped behind the wheel of cars. Fortress was at the hood and the long man rushed to the driver´s door that would get you.'
+								act 'Into reverse':
+								cls
+								minut += 1
+								gs 'stat'
+								'<center><img src="images\qwest\alter\BMW.jpg"></center>'
+								'You abruptly passed back and stayed virtually the concrete fence. Before you see your hood as burly running to you. A driver´s door to long runs.'
+								end
+								act 'Sharply to go forward':
+								cls
+								minut += 1
+								gs 'stat'
+								'<center><img src="images\qwest\alter\BMW.jpg"></center>'
+								'You abruptly thrust gear and pull the clutch abruptly moved forward. Fortress with a bang flopped down on the hood and fell off the machine. Ahead you see the bushes, the gateway to which you moved Albina are to the right of you. From left to you is factory building brick wall.'
+								end
+							end
+							if agil < 100:
+							'You jumped behind the wheel of a car, but confused Nogmov between the seat and the gear lever. In the driver´s door stuck his hands long man.'
+							dynamic $din_albina_get_over_car
+							end
+						end
+					end
+					act 'Out of the car':
+					cls
+					minut += 5
+					gs 'stat'
+					'<center><img src="images\qwest\alter\castle.jpg"></center>'
+					'You jumped out of the car and see how you run burly side hood and trunk from the car obbegat long. The road back to cut you, but you notice the open door of the shop.'
+					end
+					act 'Sit in the car':
+					cls
+					minut += 5
+					gs 'stat'
+					'<center><img src="images\qwest\alter\BMW.jpg"></center>'
+					dynamic $din_albina_get_over_car
+					end
+				exit
+				end
+				if DanceWhore > 0:
+				'Albina does not stop the engine, got out and said, "Relax guys. <<$name>> of my Zvezdushek. Newcomer. But a lot of promise."'
+				end
+			end
+		end
+	end
+end
+
+act 'Move away': gt $loc, $metka
+--- albinaEv ---------------------------------
+

+ 67 - 0
locations/alex

@@ -0,0 +1,67 @@
+# alex
+minut += 30
+horny += 10
+gs 'stat'
+'Arriving at the apartment Lech that hour dragged various alcohol and made a starter, then you sat down at a table in the hall talking to each other.'
+'Finally you opyaneli and Lech attracted you to her.'
+
+act 'Get on your knees and take in the mouth':
+cls
+alexeySex += 1
+horny += 10
+bj += 1
+minut += 10
+gs 'stat'
+picrand = RAND(0,13)
+if picrand = 0: '<center><img src="images\qwest\alexey\bj.jpg"></center>'
+if picrand = 1: '<center><img src="images\qwest\alexey\bj1.jpg"></center>'
+if picrand = 2: '<center><img src="images\qwest\alexey\bj2.jpg"></center>'
+if picrand = 3: '<center><img src="images\qwest\alexey\bj3.jpg"></center>'
+if picrand = 4: '<center><img src="images\qwest\alexey\bj4.jpg"></center>'
+if picrand = 5: '<center><img src="images\qwest\alexey\bj5.jpg"></center>'
+if picrand = 6: '<center><img src="images\qwest\alexey\bj6.jpg"></center>'
+if picrand = 7: '<center><img src="images\qwest\alexey\bj7.jpg"></center>'
+if picrand = 8: '<center><img src="images\qwest\alexey\bj8.jpg"></center>'
+if picrand = 9: '<center><img src="images\qwest\alexey\bj9.jpg"></center>'
+if picrand = 10: '<center><img src="images\qwest\alexey\bj10.jpg"></center>'
+if picrand = 11: '<center><img src="images\qwest\alexey\bj11.jpg"></center>'
+if picrand = 12: '<center><img src="images\qwest\alexey\bj12.jpg"></center>'
+if picrand = 13: '<center><img src="images\qwest\alexey\bj13.jpg"></center>'
+
+'You kneel before him and clasped his dick <<$liptalk>> began to suck. Alexei lying relaxed and caught the buzz finally he dismissed you from the members and led to the bed.'
+
+gs 'oral','0'
+	act 'Unclothed':
+	cls
+	minut += 10
+	set $nameV = 'Alexey'
+	$boy = $nameV
+	set dick = 20
+	set silavag = 2
+	pose = 1
+	gs 'stat'
+	'<center><img src="images\qwest\alexey\sex.jpg"></center>'
+	'Hardly you undressed as Alesya practically force pulled you on the bed and put the cancer.'
+	dynamic $sexstart
+	'Alexei slapped you in the ass with his hand and said, "Well, how are flowing already a slut? Like ass twist on dick?"'
+	dynamic $sexstart2
+	'During sex Alex stuck somehow smeared cream finger in the ass and began to move it there. Soon he took his dick out of your pussy and stuck to them stared you in the ass.'
+		act 'Moan':
+		cls
+		minut += 10
+		set $nameV = 'Alexey'
+		$boy = $nameV
+		set dick = 20
+		set silavag = 2
+		pose = 1
+		gs 'stat'
+		'<center><img src="images\qwest\alexey\anal.jpg"></center>'
+		dynamic $analsex
+		gs 'BDsex','ancum'
+		'Alexei had finished with you slipped and went into the bathroom.'
+		act 'Leave': gt 'nord'
+		end
+	end
+end
+--- alex ---------------------------------
+

+ 89 - 0
locations/alexgang

@@ -0,0 +1,89 @@
+# alexgang
+minut += 30
+horny += 10
+
+gs 'stat'
+
+'Arriving at the apartment Lech that hour dragged various alcohol and made a starter, then you sat down at a table in the hall talking to each other.'
+'At this moment, the doorbell rang, Lech went to open. You heard a man´s voice in the hallway, "Hi Lech, I do not opazdal?" Lech said, "Come."'
+
+if alexgangbang = 0:
+	'You´re a little surprised, who would it be. At this moment entered the room Alexander E., nightclub owner. He greeted you and sat down on a chair.'
+else
+	'Entered the room Alexander E., nightclub owner. He greeted you and sat down on a chair.'
+end
+
+'Alexei began pouring alcohol and you have been drinking in Troy.'
+
+if alexgangbang = 0:
+	'Alex finally put down the bottle aside and got dick out of his pants. "Crawl here" You looked at him in surprise and looked at Sasha. Lech urged you "C´mon, do not tushuysya, everything is fine."'
+else
+	'Alex finally put down the bottle aside and got dick out of his pants. "Crawl here"'
+end
+
+act 'Get on your knees and take in the mouth':
+cls
+
+alexgangbang += 1
+horny += 10
+bj += 1
+minut += 10
+
+gs 'stat'
+
+picrand = RAND(0,13)
+if picrand = 0: '<center><img src="images\qwest\alexey\bj.jpg"></center>'
+if picrand = 1: '<center><img src="images\qwest\alexey\bj1.jpg"></center>'
+if picrand = 2: '<center><img src="images\qwest\alexey\bj2.jpg"></center>'
+if picrand = 3: '<center><img src="images\qwest\alexey\bj3.jpg"></center>'
+if picrand = 4: '<center><img src="images\qwest\alexey\bj4.jpg"></center>'
+if picrand = 5: '<center><img src="images\qwest\alexey\bj5.jpg"></center>'
+if picrand = 6: '<center><img src="images\qwest\alexey\bj6.jpg"></center>'
+if picrand = 7: '<center><img src="images\qwest\alexey\bj7.jpg"></center>'
+if picrand = 8: '<center><img src="images\qwest\alexey\bj8.jpg"></center>'
+if picrand = 9: '<center><img src="images\qwest\alexey\bj9.jpg"></center>'
+if picrand = 10: '<center><img src="images\qwest\alexey\bj10.jpg"></center>'
+if picrand = 11: '<center><img src="images\qwest\alexey\bj11.jpg"></center>'
+if picrand = 12: '<center><img src="images\qwest\alexey\bj12.jpg"></center>'
+if picrand = 13: '<center><img src="images\qwest\alexey\bj13.jpg"></center>'
+
+'You kneel before him and clasped his dick <<$liptalk>> began to suck. Alexei sat relaxed and caught the buzz finally he dismissed you from the members and led to the bed.'
+gs 'oral','0'
+'Lech you lifted and moved to the bed where Sasha was sitting. He put you on all fours, face to Sasha.'
+	act 'Take by mouth Sasha':
+	cls
+if sashaclubsex = 0: sashaclubsex = 1 & guy += 1
+	gang += 1
+	alexgangbang += 1
+	horny += 10
+	bj += 1
+	minut += 10
+	set $nameV = 'Alexey'
+	$boy = $nameV
+	set dick = 20
+	set silavag = 2
+	pose = 1
+	cumlip += 1
+	swallow += 1
+	gs 'stat'
+	picrand = RAND(0,9)
+	if picrand = 0: '<center><img src="images\qwest\alexey\gang.jpg"></center>'
+	if picrand = 1: '<center><img src="images\qwest\alexey\gang1.jpg"></center>'
+	if picrand = 2: '<center><img src="images\qwest\alexey\gang2.jpg"></center>'
+	if picrand = 3: '<center><img src="images\qwest\alexey\gang3.jpg"></center>'
+	if picrand = 4: '<center><img src="images\qwest\alexey\gang4.jpg"></center>'
+	if picrand = 5: '<center><img src="images\qwest\alexey\gang5.jpg"></center>'
+	if picrand = 6: '<center><img src="images\qwest\alexey\gang6.jpg"></center>'
+	if picrand = 7: '<center><img src="images\qwest\alexey\gang7.jpg"></center>'
+	if picrand = 8: '<center><img src="images\qwest\alexey\gang8.jpg"></center>'
+	if picrand = 9: '<center><img src="images\qwest\alexey\gang9.jpg"></center>'
+	'Standing on all fours, you started to suck Sasha. He was not big and soft dick hard standing in your mouth. Working hard but you got his cock stiffen.'
+	dynamic $sexstart
+	'Dangle your body from bumps in the ass during frictions and Lehi nebilo you need to move your head during a blow job, you just have to work on the lips clasping member tightly.'
+	dynamic $sexstart2
+	'Sasha came too in your mouth. Sperm was not much and you can easily swallow all.'
+	act 'Leave': gt 'nord'
+	end
+end
+--- alexgang ---------------------------------
+

+ 442 - 0
locations/alterStart

@@ -0,0 +1,442 @@
+# alterStart
+StoryLine = 1
+MagikDostup = 1
+
+umbrella = 1
+birthday = 5
+birthmonth = 3
+set $name = 'Svetlana'
+set $surname = 'Lebedev'
+set age = 15
+set vidage = 14
+!set age = 17
+!set vidage = 16
+set year = 2010
+!set month = 8
+set week = 6
+set hour = 10
+!day = 30
+set month = 3
+day = 9
+!!!!!!!!!!!!!!!
+!month = 3
+!day = 9
+!week = 6
+!hour = 10
+!!!!!!!!!!!!!!
+!!!!!!!!!!!!!!!
+month = 8
+day = 30
+week = 6
+hour = 9
+!!!!!!!!!!!!!!
+birthyear = year - age
+!тело
+set rost = 170
+set fat = 60
+set salo = 60
+set dick = 0
+set energy = 15
+set water = 15
+set son = 16
+!Статы
+set stren = 10
+set strenbuf = 10
+set speed = 10
+set agil = 10
+set agilbuf = 10
+set vital = 10
+set vitalbuf = 10
+set intel = 10
+set will = 10
+set react = 10
+set magik = 0
+set health = vital * 10 + stren * 5
+set willpower = intel * 5 + will * 5
+set manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
+!etogame
+set nastjaqw = 0
+!etogame
+set money = 50
+set vidageday = 300
+set housrA = 0
+set sarafan[1] = 1
+set sarafanH[1] = 30
+set odevnesh = 0
+set lobok = 3
+set leghair -= 5
+set mop = 1
+set recmop = 1
+set usemop = 0
+set usehapri = 0
+set uselipbalm = 0
+set housr = 0
+tanga = 1
+karta = 0
+
+
+clr
+gs 'stat'
+set numdres = 1
+set odetjeans = 1
+set numdress = 1
+set jeans[1] = 1
+set jeansH[1] = 100
+set jeansB[1] = 70
+
+
+set cltarelka = 0
+set fairy = 0
+set eda = 0
+set clrbelo = 10
+set poroshok = 0
+set shampoo = 0
+tampon = 20
+set nude = 0
+gs 'stat'
+set opPRE = 0
+set daystart = 0
+!addobj 'Character'
+!addobj 'See'
+!addobj 'Others'
+
+newclo[131] = 1
+yoga[15] = 1
+yogaH[15] = 100
+
+glacol = 1
+glaraz = 2
+hcol = 1
+lip = 2
+
+!hcol = black
+!hcol1 = brunette
+!hcol2 = red
+!hcol3 = blonde
+
+gs 'stat'
+clr
+
+dress[5] = 1
+dressH[5] = 100
+dressB[5] = 70
+
+palto = 1
+$palto = 'Chinese wear'
+
+father = 50
+mother = 50
+sister = 50
+brother = 50
+Suspeh = 75
+
+$npcName[1] = 'Dimka'
+$npcSurName[1] = 'Nosov'
+$npcText[1] = 'Dimka is a cute guy and all the girls adore him.'
+grupNPC[1] = 50
+npcPol[1] = 0
+grupTipe[1] = 3
+$npcGo[1] = '<a href="exec:numnpc = 1 & GT ''Snpc''"><<$npcName[1]>> <<$npcSurName[1]>></a>'
+
+$npcName[2] = 'Artem'
+$npcSurName[2] = 'Chebotarev'
+$npcText[2] = 'Artem is a typical nerd, but not a bad looking one.'
+grupNPC[2] = 50
+npcPol[2] = 0
+grupTipe[2] = 1
+$npcGo[2] = '<a href="exec:numnpc = 2 & GT ''Snpc''"><<$npcName[2]>> <<$npcSurName[2]>></a>'
+
+$npcName[3] = 'Ivan'
+$npcSurName[3] = 'Prokhorov'
+$npcText[3] = 'Ivan is an excellent athlete, who is able to succeed in any sport.'
+grupNPC[3] = 50
+npcPol[3] = 0
+grupTipe[3] = 2
+$npcGo[3] = '<a href="exec:numnpc = 3 & GT ''Snpc''"><<$npcName[3]>> <<$npcSurName[3]>></a>'
+
+$npcName[4] = 'Igor'
+$npcSurName[4] = 'Kruglov'
+$npcText[4] = 'Igor Nosov is a friend of Dimka and they are always together.'
+grupNPC[4] = 50
+npcPol[4] = 0
+grupTipe[4] = 3
+$npcGo[4] = '<a href="exec:numnpc = 4 & GT ''Snpc''"><<$npcName[4]>> <<$npcSurName[4]>></a>'
+
+$npcName[5] = 'Fedor'
+$npcSurName[5] = 'Kozlov'
+$npcText[5] = 'Fedor is not a bad athlete and he''S best friends with Vanya Prokhorov.'
+grupNPC[5] = 50
+npcPol[5] = 0
+grupTipe[5] = 2
+$npcGo[5] = '<a href="exec:numnpc = 5 & GT ''Snpc''"><<$npcName[5]>> <<$npcSurName[5]>></a>'
+
+$npcName[6] = 'Petka'
+$npcSurName[6] = 'Klyuyev'
+$npcText[6] = 'Petka is a nerd and can''t see beyond his textbook.'
+grupNPC[6] = 50
+npcPol[6] = 0
+grupTipe[6] = 1
+$npcGo[6] = '<a href="exec:numnpc = 6 & GT ''Snpc''"><<$npcName[6]>> <<$npcSurName[6]>></a>'
+
+$npcName[7] = 'Lesco'
+$npcSurName[7] = 'Tsarev'
+$npcText[7] = 'Lesco always gets bullied for some reason.'
+grupNPC[7] = 50
+npcPol[7] = 0
+grupTipe[7] = -1
+$npcGo[7] = '<a href="exec:numnpc = 7 & GT ''Snpc''"><<$npcName[7]>> <<$npcSurName[7]>></a>'
+
+$npcName[8] = 'Svyatoslav'
+$npcSurName[8] = 'Warriors'
+$npcText[8] = 'Svyatoslav is a athletic guy, who is persistently engaged in sports.'
+grupNPC[8] = 50
+npcPol[8] = 0
+grupTipe[8] = 2
+$npcGo[8] = '<a href="exec:numnpc = 8 & GT ''Snpc''"><<$npcName[8]>> <<$npcSurName[8]>></a>'
+
+$npcName[9] = 'Witek'
+$npcSurName[9] = 'Cats'
+$npcText[9] = 'Witek is aggressive and a strong guy, who considers himself a gangsta. But his personality is pretty much see-through. Lena is his twin-sister.'
+grupNPC[9] = 50
+npcPol[9] = 0
+grupTipe[9] = 4
+$npcGo[9] = '<a href="exec:numnpc = 9 & GT ''Snpc''"><<$npcName[9]>> <<$npcSurName[9]>></a>'
+
+$npcName[10] = 'Dan'
+$npcSurName[10] = 'Ryzhov'
+$npcText[10] = 'Dan is a tall and skinny guy who communicates to others with contempt and is always ready to expand on the concept. Just as he utvezhdeniyu, Dan knows the boys on the block clear that if that vpryagutsya for him.'
+grupNPC[10] = 50
+npcPol[10] = 0
+grupTipe[10] = 4
+$npcGo[10] = '<a href="exec:numnpc = 10 & GT ''Snpc''"><<$npcName[10]>> <<$npcSurName[10]>></a>'
+
+$npcName[11] = 'Bob'
+$npcSurName[11] = 'Shulgin'
+$npcText[11] = 'Bob is always with Dan and Vic, mostly watching their six, but Witek makes continously fun of him.'
+grupNPC[11] = 50
+npcPol[11] = 0
+grupTipe[11] = 4
+$npcGo[11] = '<a href="exec:numnpc = 11 & GT ''Snpc''"><<$npcName[11]>> <<$npcSurName[11]>></a>'
+
+$npcName[12] = 'Julia'
+$npcSurName[12] = 'Milov'
+$npcText[12] = 'Julia is a diligent and silent girl. She´s a really nerdy and almost no one talks to her.'
+grupNPC[12] = 50
+npcPol[12] = 1
+grupTipe[12] = 1
+$npcGo[12] = '<a href="exec:numnpc = 12 & GT ''Snpc''"><<$npcName[12]>> <<$npcSurName[12]>></a>'
+
+$npcName[13] = 'Lariska'
+$npcSurName[13] = 'Gruzdeva'
+$npcText[13] = 'Lariska is a very sportive girl, but is very dependent on other people´s opinions.'
+grupNPC[13] = 50
+npcPol[13] = 1
+grupTipe[13] = 2
+$npcGo[13] = '<a href="exec:numnpc = 13 & GT ''Snpc''"><<$npcName[13]>> <<$npcSurName[13]>></a>'
+
+$npcName[14] = 'Katia'
+$npcSurName[14] = 'Meynold'
+$npcText[14] = 'Katia is a hot, but impulsive girl. Vick is her twin-sister.'
+grupNPC[14] = 50
+npcPol[14] = 1
+grupTipe[14] = 3
+$npcGo[14] = '<a href="exec:numnpc = 14 & GT ''Snpc''"><<$npcName[14]>> <<$npcSurName[14]>></a>'
+
+$npcName[15] = 'Vick'
+$npcSurName[15] = 'Meynold'
+$npcText[15] = 'Vick is a very sensible girl. Katia is her twin sister.'
+grupNPC[15] = 50
+npcPol[15] = 1
+grupTipe[15] = 3
+$npcGo[15] = '<a href="exec:numnpc = 15 & GT ''Snpc''"><<$npcName[15]>> <<$npcSurName[15]>></a>'
+
+$npcName[16] = 'Natasha'
+$npcSurName[16] = 'Belova'
+$npcText[16] = 'Natasha is an excellent student, but she barely speaks to anyone.'
+grupNPC[16] = 50
+npcPol[16] = 1
+grupTipe[16] = 1
+$npcGo[16] = '<a href="exec:numnpc = 16 & GT ''Snpc''"><<$npcName[16]>> <<$npcSurName[16]>></a>'
+
+$npcName[17] = 'Inna'
+$npcSurName[17] = 'Devyatova'
+$npcText[17] = 'Inna is a tall and pretty girl, her sweet smile hides her arrogance.'
+grupNPC[17] = 50
+npcPol[17] = 1
+grupTipe[17] = 3
+$npcGo[17] = '<a href="exec:numnpc = 17 & GT ''Snpc''"><<$npcName[17]>> <<$npcSurName[17]>></a>'
+
+$npcName[18] = 'Christina'
+$npcSurName[18] = 'Zvereva'
+$npcText[18] = 'Christina tall and strong girl. She´s a great athlete and has leadership abilities who, together with her tenacity and intelligence make it a very serious figure.'
+grupNPC[18] = 50
+npcPol[18] = 1
+grupTipe[18] = 2
+$npcGo[18] = '<a href="exec:numnpc = 18 & GT ''Snpc''"><<$npcName[18]>> <<$npcSurName[18]>></a>'
+
+$npcName[19] = 'Lina'
+$npcSurName[19] = 'Starov'
+$npcText[19] = 'Lina is an athlete and a fully fledged Christian.'
+grupNPC[19] = 50
+npcPol[19] = 1
+grupTipe[19] = 2
+$npcGo[19] = '<a href="exec:numnpc = 19 & GT ''Snpc''"><<$npcName[19]>> <<$npcSurName[19]>></a>'
+
+$npcName[20] = 'Lena'
+$npcSurName[20] = 'Kotova'
+$npcText[20] = 'She''s the twin-sister to Witek. She is aggressive too and best of friends with Lera. Both tend to smoke in the bathrooms on a regular basis.'
+grupNPC[20] = 50
+npcPol[20] = 1
+grupTipe[20] = 4
+$npcGo[20] = '<a href="exec:numnpc = 20 & GT ''Snpc''"><<$npcName[20]>> <<$npcSurName[20]>></a>'
+
+$npcName[21] = 'Lera'
+$npcSurName[21] = 'Tsarev'
+$npcText[21] = 'Lera comes from a poor family, she quickly made friends with Lena and both are regulary smoking on the toilets.'
+grupNPC[21] = 50
+npcPol[21] = 1
+grupTipe[21] = 4
+$npcGo[21] = '<a href="exec:numnpc = 21 & GT ''Snpc''"><<$npcName[21]>> <<$npcSurName[21]>></a>'
+
+$npcName[22] = 'Bella'
+$npcSurName[22] = 'Artamonov'
+$npcText[22] = 'Bella is beautiful and arrogant girl.'
+grupNPC[22] = 50
+npcPol[22] = 1
+grupTipe[22] = 2
+$npcGo[22] = '<a href="exec:numnpc = 22 & GT ''Snpc''"><<$npcName[22]>> <<$npcSurName[22]>></a>'
+
+$npcName[23] = 'Albina'
+$npcSurName[23] = 'Barlovskaya'
+$npcText[23] = 'Albina from a wealthy family and always knew how to look good and dress well.'
+grupNPC[23] = 50
+npcPol[23] = 1
+grupTipe[23] = 3
+$npcGo[23] = '<a href="exec:numnpc = 23 & GT ''Snpc''"><<$npcName[23]>> <<$npcSurName[23]>></a>'
+
+$npcName[24] = 'Pauline'
+$npcSurName[24] = 'Sebagotulina'
+$npcText[24] = 'Pauline like pain in the ass who does not let her sit still, she and dvoechnitsa hooligan.'
+grupNPC[24] = 50
+npcPol[24] = 1
+grupTipe[24] = 4
+$npcGo[24] = '<a href="exec:numnpc = 24 & GT ''Snpc''"><<$npcName[24]>> <<$npcSurName[24]>></a>'
+
+$npcName[25] = 'Sonia'
+$npcSurName[25] = 'Ivanko'
+!$npcText[25] = 'Sonia once inadvertently drunk and fucked her in a circle Witek Kotov and his friends. After that, the girls shunned Sonya, and the boys thought she was a whore. Local gopota regularly drove to Sonia proposals have sex.'
+$npcText[25] = 'Sonia an ordinary girl.'
+grupNPC[25] = 50
+npcPol[25] = 1
+grupTipe[25] = 0
+$npcGo[25] = '<a href="exec:numnpc = 25 & GT ''Snpc''"><<$npcName[25]>> <<$npcSurName[25]>></a>'
+
+SHOWSTAT 0
+SHOWOBJS 0
+
+$din_alter_start_ev = {
+cls
+'When you were 13 years old, your period started like most other girls in your class. Your breasts started to grow and your armpit and pubic hair began to sprout. Your skin became covered with acne. When you finished 9th class, you did not drop out of school, and continued to study in the 10th grade.'
+
+'The summer holiday ends soon and you will go to your new class to start your first of the two years you''re going to study.'
+
+act 'Start the game':
+	SHOWSTAT 1
+	SHOWOBJS 1
+	health = vital * 10 + stren * 5 + 1000
+	willpower = intel * 5 + will * 5 + 1000
+	manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
+	addobj 'Character'
+	addobj 'See'
+	addobj 'Others'
+	gt 'bedrPar'
+end
+}
+
+'You were born in <<birthyear>>.'
+'Your mother and father, Natasha Mikhail <<$surname>>, were quite young and probably didn''t know how to protect themselves.'
+'You have a sister, Anne, who is 2 years older than you.'
+'You do not remember your real father because your parents divorced when you were still too young to remember. Your mom found another man and they had your little brother Nick.'
+set $name = input("What is your first name?")
+if $name = '':
+	set $name = 'Svetlana'
+end
+set $surname = input("What is your last name?")
+if $surname = '':
+	set $surname = 'Lebedev'
+end
+act 'Further':
+	cls
+
+	'In the kindergarten where you went everything was fine, but you don''t remember it. When you were 7 years old, you finished kindergarten and went to school.'
+
+	act 'You are a good student':
+		cls
+		fat = 150
+		salo = 150
+		intel = 50
+		Suspeh = 110
+		!!!!!!!!!!!!!! Maruda Hair Mod
+		set hairlength = 162
+		set hcol = 0
+		set hpingrip = 10
+		set hpingripw = 1
+		!!!!!!!!!!!!!! Maruda Hair Mod
+		gs 'stat'
+		clr
+		dressB[5] = bedra
+		jeansB[1] = bedra
+		mother = 100
+		'In school, you put a lot of effort to be an excellent pupil. You didn''t make any friends because you weren''t engaged in sports, but you have excellent grades and your mom is very proud of you.'
+
+		act 'Further': dynamic $din_alter_start_ev
+	end
+
+	act 'You are actively engaged in volleyball':
+		cls
+		stren = 25
+		vital = 25
+		speed = 25
+		agil = 25
+		fat = 20
+		salo = 20
+		volleyboll = 70
+		beg = 40
+		gsAboVolley = 120
+		!!!!!!!!!!!!!! Maruda Hair Mod
+		set hairlength = 97
+		set hcol = 3
+		set hscrunch = 10
+		set hscrunchw = 0
+		!!!!!!!!!!!!!! Maruda Hair Mod
+		gs 'stat'
+		clr
+		dressB[5] = bedra
+		jeansB[1] = bedra
+		'You spent all your free time training your volleyball skills. Because of that you weren''t that good in school and had less friends.'
+		act 'Further': dynamic $din_alter_start_ev
+	end
+
+	act 'You spent time outdoors':
+		cls
+		stren = 10
+		vital = 10
+		agil = 20
+		fat = 30
+		salo = 30
+		dom = 50
+		!!!!!!!!!!!!!! Maruda Hair Mod
+		set hairlength = 19
+		set hcol = 2
+		!!!!!!!!!!!!!! Maruda Hair Mod
+		gs 'stat'
+		clr
+		dressB[5] = bedra
+		jeansB[1] = bedra
+		'You spent almost all your free time outdoors playing with other girls and boys. As a result, you know how to get yourself out of trouble. You aren''t interested in School and sports.'
+		act 'Further': dynamic $din_alter_start_ev
+	end
+	
+end
+--- alterStart ---------------------------------
+

+ 36 - 0
locations/amrul

@@ -0,0 +1,36 @@
+# amrul
+*PL 'You leaned over the table.'
+*P '<center><img src="images\casino\amrul.jpg"></center>'
+ACT 'IPod':
+	st_1 = input 'Enter the amount'
+	if money < st_1:
+		msg 'You have enough money'
+		gt 'roulette'
+	end
+	if st_1 < 0:
+		msg 'Wrong, try again'
+		gt 'amrul'
+	end
+	if st_1 > 1000:
+		msg 'The maximum rate of 1000 rubles'
+		gt 'amrul'
+	end
+	set money -= st_1
+	gt 'rate'
+END
+ACT 'move away from the table':
+	gt 'roulette'
+END
+кч = 0
+чнч = 0
+мб = 0
+дю = 0
+ряд = 0
+чи = 100
+x_rul = 100
+
+clr
+gs 'stat'
+set minut += 5
+--- amrul ---------------------------------
+

+ 246 - 0
locations/andrey

@@ -0,0 +1,246 @@
+# andrey
+'<B><center><font size = 4><font color = purple>Manager Andrew M. Sobulyagin</font></center></B>'
+*nl
+*nl
+
+if young_shop_work = 0:
+if hour >= 18:
+msg '<B><center>Andrew M. Sobulyagin goodbye and leaves. His work day ended</center></B>'
+gt 'young_shop'
+end
+
+'<B>I knock on the door and walk into a room to the manager. He sits at a table and reading some papers.</B>'
+	act 'Talk about work':
+	cla
+	minut += 5
+	'The manager tells me that the store needs a girl consultant to work in the evening. Salary small but stable.'
+	'Begin work on the next working day after employment.'
+	'<B>Details</B>need to work 5 days a week (Monday-Friday) at 2:00. Salary - 800 rubles per day. Work need to come in 15 hours. Salary paid every week on Friday according to hours worked. 3 for truancy fired from his job.'
+		act '<B>Mull conditions and arrive at a different time</B>':
+		gt 'young_shop'
+		end
+
+		if work = 0 and hour < 15:
+		'If operating conditions suit me, I can now fill in the blanks and sign documents.'
+		*nl
+			act 'Get a job':
+			work = 1
+			set young_shop_work = 1
+			if week >= 1 and week <= 4: msg '<B><center>I get a job in youth clothing store '' '' Kies pussy. Starting tomorrow</center></B>'
+			if week = 5: msg '<B><center>I get a job in youth clothing store '' '' Kies pussy. Starting on Monday</center></B>'
+			minut+= 5
+			gt 'young_shop'
+			end
+		end
+	end
+
+act 'Leave': gt 'young_shop'
+end
+
+if young_shop_work = 1:
+	if hour>=19:
+		msg '<B><center>Andrew M. Sobulyagin goodbye and leaves. His work day ended</center></B>'
+		gt 'young_shop'
+	end
+
+'<B>I knock on the door and walk into a room to the manager. Andrew M. Sobulyagin normally picks papers, incidentally examining pictures of naked girls in the monitor.</B>' & *nl
+	if week = 5 and young_shop_salary > 0:
+	'<B>- Hello <<$char_name>>. For salary come from?</B>' & *nl
+		act 'Get salary':
+		minut += 15
+			!'if char_responsible < 400 and young_shop_bonus >= 1:
+			'<B><<$char_name>>, you are very irresponsible work, I have to deprive you of some bonuses! Try better.</B>'
+			*nl
+			set young_shop_bonus -= 2
+			if young_shop_bonus < 0: set young_shop_bonus = 0
+			set bonus_mood -= 100
+			end
+
+			if char_responsible >= 600:
+			'<B><<$char_name>>, you are a very responsible person! Keep up the good work. Oh yeah, you also relies nadbavochka.</B>'
+			*nl
+			set young_shop_bonus += 2
+			set bonus_mood += 100
+			end'
+
+		set money += young_shop_salary * 800 + young_shop_bonus * 200
+
+			msg '<center>I worked <B><<young_shop_salary>></B> days and get paid <B><<young_shop_salary*800>></B> rubles and bonus <B><<young_shop_bonus*200>></B> rubles. Total <B><<young_shop_salary*800 + young_shop_bonus*200>></B> RR</center>'
+		'<B>The manager counts I <B><<young_shop_salary*800 + young_shop_bonus*200>></B> rubles and received my signature again puts his nose in the paper.</B>'
+			*nl
+			set young_shop_salary = 0
+			set young_shop_bonus = 0
+		act 'Leave': gt 'young_shop'
+		end
+	exit
+	end
+
+	if young_shop_miss >= 3:
+	cla
+	'- What kind of people! - Andrew M. leans back in his studio. - Where have you been? We agreed truancy 3 - dismissal.'
+	*nl
+		act '<font color = green>Agree to dismissal</font>':
+		cla
+			'- Well, I did not get to go to work every day - I sigh.'
+			'Manager pulls paper and begins to fill the blanks. A few minutes later he hands me some papers and I put a signature.'
+			'More I do not work in the store.'
+		*nl
+		set young_shop_work = 2
+		set young_shop_miss = 0
+		set char_honest += 5
+		work = 0
+		set bonus_mood -= 100
+
+			if young_shop_salary > 0 or young_shop_bonus > 0:
+			set money += young_shop_salary * 800 + young_shop_bonus * 200
+			msg 'For <B><<young_shop_salary>></B> days I get paid <B><<young_shop_salary*800>></B> and a bonus rubles <B><<young_shop_bonus*200>></B> rubles. Total <B><<young_shop_salary*800 + young_shop_bonus*200>></B> rubles'
+			'<B>Andrew M. counts I <B><<young_shop_salary*800 + young_shop_bonus*200>></B> rubles.</B>'
+			*nl
+			set young_shop_salary = 0
+			set young_shop_bonus = 0
+			end
+		minut += 15
+		act 'Leave': gt 'young_shop'
+		end
+
+		act '<font color = navy>leave a Beg</font>':
+		cla
+			'- But I can not lose my job! It is very necessary to me - I have already in tears. - Please do not fire me.'
+			'- Then you have only one option: lock the door and show how your lips are able to convince - Andrew M. rises to his feet and taken the right hand for balls.'
+		*nl
+			act '<B>Escape</B>':
+			minut += 2
+			gt 'young_shop'
+			end
+
+
+			act '<font color = green>Lock the door and get on your knees</font>':
+			cla
+			'"It´s for work, go home and do nothing bad will happen" - I try to calm myself while lock the door. I turned to see how Sobulyagin unzips his pants and throws Mighty 18 centimeter penis. I go over and get up on his knees, his eyes closed.'
+			'- What is stuck? Let´s start! - Andrew grins.'
+			'I open my eyes and take a dick in both hands. From a distance of 5 centimeters, he seems to be simply overwhelming. I slightly open mouth and his tongue. First I lick the head, then the whole barrel member. A few minutes later I put my dick in your mouth and start doing translational movements of the head, the head is constantly licking tongue. I have a feeling that it grows in my mouth.'
+			'I am very fond of their occupation and do not notice as a member starts hitting streaks of sperm into my throat and into the airways. Struggling, I try not to stay and keep coughing, but I have enough on just 15 seconds. Clearing his throat, I open my eyes and see the manager buttons fly and goes to leave.'
+			'- And you did so! Such a valuable employee I can not dismiss. Spis absenteeism and you´ll write the last award for his efforts. And you go home to work today you can not go out, have worked! Only to any more truancy was not! - With these words he comes out of the office, and I´m starting to put itself in order.'
+			*nl
+			minut += 15
+			if sobulaginsex = 0: sobulaginsex = 1 & guy += 1
+			bj += 1
+			swallow += 1
+			cumlip += 1
+			set young_shop_miss = 2
+			set young_shop_salary = 1
+			set young_shop_bonus = 2
+			act 'Leave': gt 'young_shop'
+			end
+		end
+
+	end
+
+	if young_shop_miss < 3:
+
+		act '<font color = maroon>dismissed</font>':
+		cla
+			'- I would like to resign - I come to the table manager.'
+			'- Are you sure? Of course, I can arrange everything right Wait - Andrew M. scratching his head. - But then suddenly,?'
+		*nl
+
+			act '<B>Change of heart</B>':
+				'- You know, I should still think about it - I''m moving back to the door. - Come on, I''ll come next time.'
+				'- Right, something else may like?'
+			*nl
+			act 'Leave': gt 'young_shop'
+			end
+
+			act '<font color = maroon>dismissed</font>':
+				'- No, I already thought about it very thoroughly!'
+				'Okay, owner - a gentleman! - Manager fills several forms and gave me lictochki signature.'
+			*nl
+				if young_shop_salary > 0 or young_shop_bonus > 0:
+				set money += young_shop_salary * 800 + young_shop_bonus * 200
+				msg '<center>For <B><<young_shop_salary>></B> days I get paid <B><<young_shop_salary*800>></B> rubles and bonus <B><<young_shop_bonus*200>></B> rubles. Total <B><<young_shop_salary*800 + young_shop_bonus*200>></B> RR</center>'
+				'<B>Andrew M. counts I <B><<young_shop_salary*800 + young_shop_bonus*200>></B> rubles.</B>'
+				*nl
+				set young_shop_salary = 0
+				set young_shop_bonus = 0
+				end
+			set young_shop_work = 3
+			set young_shop_miss = 0
+			work = 0
+			act 'Leave': gt 'young_shop'
+			end
+		end
+	end
+act 'Leave': gt 'young_shop'
+end
+
+if young_shop_work = 2 and work = 0:
+	if hour>=18:
+		msg '<B><center>Andrew M. Sobulyagin goodbye and leaves. His work day ended</center></B>'
+		gt 'young_shop'
+	end
+
+'<B>I could ask for the manager to get me back to work.</B>'
+
+	act 'Beg to return to work':
+	cla
+	'- I do not even know - Andrei Mikhailovich obviously do not want to hire progulschitsu.'
+	'- Oh, please! I´ll do anything, I really need this job! - I do not even know how to convince him ..'
+	'- Anything? Ha! I know what you could do - open the eyes of the manager begins to evaluate my body. - Frankly, I fuck you in the ass, and then you and I still otsosesh. Hand?'
+	*nl
+		act '<B>Never</B>':
+		cla
+		'Paint rushed to my face. I´m even a little stunned by what he heard:'
+		'- Do you want me to do anal sex, and then I´ll have to lick all the juices from your penis? - It does not even fit in my head. - I will not do it!'
+		'- Do you want, how you want! - Andrew M. clearly upset.'
+		*nl
+		act 'Leave': gt 'young_shop'
+		end
+
+		act '<font color = green>Agree</font>':
+		'That´s not fair! You know how I need this job - I want to try to convince Andrew Sobulyagina.'
+		'- I only give you a chance. Actually, according to the rules, I should have told you categorically refuse! So I´m doing pretty good deed - the manager rises from his chair. - Decide.'
+		'- Okay, I agree - it seems that this is the best way out. - Thank you.'
+		'Andrew goes to the door and locks it, and I undress before the goal.'
+		'- And you have me shalunishka! - He comes up behind me and hugged starts to finger her nipples.'
+		'I´m getting more comfortable in and lean forward. Spreading buttocks with both hands and close my eyes.'
+		'- Okay, we can do without foreplay - Sobulyagin immediately swing plants with cock right up my ass and I turbid in the head from a sharp tearing pain.'
+		'Coming to myself I only when Andrew puts me naked on the couch in his office:'
+		'- I got so carried away your hole that did not manage to take out time and finished in your anus - the manager scratching his head. - Then I saw you some strange: glass eyes, to touch or words not react. You do not worry, everything was perfect! So get dressed and go home, I´ll work now decorated.'
+		'I got up and slowly begin to dress. Hands some cotton and listen hard, and anus just lit. Dressing, I wipe his aching ass palm and fingers is dirty brown sperm.'
+		'- Thank you very much! - I´m trying to smile on his face.'
+		*nl
+		set young_shop_work = 1
+		work = 1
+		if week >= 1 and week <= 4: msg '<B><center>I get a job in youth clothing store '' '' Kies pussy. Starting tomorrow</center></B>'
+		if week = 5: msg '<B><center>I get a job in youth clothing store '' '' Kies pussy. Starting on Monday</center></B>'
+		minut += 60
+		act 'Leave': gt 'young_shop'
+		end
+	end
+act 'Leave': gt 'young_shop'
+end
+
+if young_shop_work = 3:
+	if hour>=18:
+		msg '<B><center>Andrew M. Sobulyagin goodbye and leaves. His work day ended</center></B>'
+		gt 'young_shop'
+	end
+
+'<B>The manager is not against me again take on the job, so I quit on their own, and was not fired for absenteeism.</B>'
+		act 'Back to work':
+		cla
+		'- And we are waiting for you! - Andrew M. gave me forms. - I even argued with Valera from the male department, that you come back to us!'
+		'I fill forms and return them to the manager.'
+		*nl
+		work = 1
+		set young_shop_work = 1
+		if week >= 1 and week <= 4: msg '<B><center>I get a job in youth clothing store '' '' Kies pussy. Starting tomorrow</center></B>'
+		if week = 5: msg '<B><center>I get a job in youth clothing store '' '' Kies pussy. Starting on Monday</center></B>'
+		minut += 15
+		act 'Leave': gt 'young_shop'
+		end
+
+act 'Leave': gt 'young_shop'
+end
+--- andrey ---------------------------------
+

Some files were not shown because too many files changed in this diff