1
1

324_meet 32 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906
  1. # meet
  2. <<<<<<< 324_meet
  3. if $ARGS[0] = 'start':
  4. fcolor = rgb(0,0,0)
  5. bcolor = rgb(255,255,255)
  6. LCOLOR = rgb(106,90,205)
  7. set minut += 15
  8. set dayA += 1
  9. set svidanieA = 0
  10. giftNum = giftNumA
  11. $boy = $boyA
  12. $namev = $boy
  13. $boybody = $boybodyA
  14. $boybod = $boybodA
  15. $boyface = $boyfaceA
  16. !длинна члена
  17. dick = dickA
  18. !! половая сила от 0 до 2
  19. silaVag = silaVagA
  20. !!Обеспеченность, отвечает за деньги и требования 0 нищий, 1 середняк 2 богат
  21. finance = financeA
  22. !!проверка по внешности, от параметра vnesh
  23. vneshBoy = vneshBoyA
  24. $boyClo = $boyCloA
  25. !0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
  26. figurBoy = figurBoyA
  27. !0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
  28. titBoy = titBoyA
  29. !любимый цвет волос 0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
  30. haerBoy = haerBoyA
  31. !характер 0 - мягкий, 1 -норма 2 - агрессор
  32. harakBoy = harakBoyA
  33. !извращенность
  34. izvrat = izvratA
  35. if love = 3:
  36. 'Met you <<$boyA>> and planted them in a hired wedding limousine.'
  37. act 'Sit in a limousine.':
  38. cla
  39. 'You got into the limo, and <<$boyA>> sat in another car. Soon the limo pulled up to the palace wedding.'
  40. act 'Marry husband':
  41. cla
  42. set minut += 60
  43. love = 0
  44. bfA = 0
  45. husband = 100
  46. husbanday = 0
  47. $husName = $boyA
  48. $husHair = $boyfaceA
  49. $husBody = $boybodyA
  50. $husFat = $boybodA
  51. husDick = dickA
  52. harakHusb = harakBoyA
  53. izvratH = izvratA
  54. set silavagH = silavagA
  55. husbFin = financeA
  56. husbandMark = 1
  57. 'The wedding took place at a cafe. There were not many guests and of course only part of the groom. It was a lot of congratulations, toasts, merrymaking and cries bitterly. By evening, all drunk and you with souped husband took home.'
  58. act 'Wedding night.': gt 'husbsex','room'
  59. end
  60. end
  61. exit
  62. end
  63. if love = 2:
  64. '<<$boyA>> looks very excited and suddenly pulls the ring out of the box.'
  65. '(<<$boyA>>) - <<$name>>. I offer you my hand and heart with very, come for my husband.'
  66. act 'No. (Rasstatsya)':
  67. set minut += 60
  68. set bfA = 0
  69. set pregtalk = 0
  70. gt $HouseLocation
  71. end
  72. act 'Yes':
  73. cla
  74. 'You agreed and put a ring on your finger. <<$boyA>> rejoiced and hugged kissed you.'
  75. '(<<$boyA>>) - And now you gone choose a wedding dress.'
  76. act 'Go for the dress':
  77. cla
  78. set minut += 60
  79. set love = 3
  80. 'You got in a taxi with his bride and went to the store to choose a dress. You have chosen an expensive and luxurious dress and <<$boyA>> paid his purchase.'
  81. 'After all these winding through the city and you´re tired <<$boyA>> to drive you home, warning that the next meeting you´re married.'
  82. act 'Leave.': gt $HouseLocation
  83. end
  84. end
  85. exit
  86. end
  87. if mop > 1 and glamur = 1 and curly > 0 and love = 1 and harakBoyA = 0:
  88. '<<$boyA>> looks very excited, he decided to look around you that you are willing to appear before his mother.'
  89. act 'Go to parents.': gt 'love','mother'
  90. exit
  91. end
  92. if mop > 1 and glamur = 1 and curly > 0 and love = 1 and harakBoyA = 1 and tanga = 1:
  93. '<<$boyA>> examining you decided that you are ready to appear before his friends.'
  94. act 'Go to friends.': gt 'love','frends'
  95. exit
  96. end
  97. if skin = 0: set bfa -= 2 & set $meetskin = 'worth looking at his feet'
  98. if skin = 1: set bfa -= 1 & set $meetskin = 'throws at you view'
  99. if skin = 2: set $meetskin = 'Looking at you'
  100. if skin = 3: set bfa += 1 & set $meetskin = 'seeing you smiling'
  101. if skin = 4: set bfa += 2 & set $meetskin = 'seeing you smiling'
  102. if harakBoyA = 0:
  103. if mop <= 2 and mop > 0: set bfA += 1 & set $meetmop = 'you are so beautiful today.'
  104. if mop = 4: set bfA -= 1 & set $meetmop = 'great weather today.'
  105. end
  106. if harakBoyA = 1:
  107. if mop <= 3 and mop > 0: set bfA += 1 & set $meetmop = 'you are so beautiful today.'
  108. if mop = 4: set bfA -= 1 & set $meetmop = 'clearly you made up, not like Halloween.'
  109. end
  110. if harakBoyA = 2:
  111. if mop = 4: set bfA += 1 & set $meetmop = 'you are so beautiful today.'
  112. if mop <= 2 and mop > 0: set bfA -= 1 & set $meetmop = 'great weather today.'
  113. end
  114. if mop = 0: set bfA -= 1 & set $meetmop = 'Um, you have flowed cosmetics.'
  115. if hapri = 1 and curly > 0: set bfA += 2 & set $meethair = 'You have a very beautiful hairstyle.'
  116. if hapri = 1 and curly = 0: set bfA += 1 & set $meethair = 'You have pretty hair.'
  117. if hapri = 0: set bfA -= 1 & set $meethair = 'I look at you in a hurry for our meeting.'
  118. if harakBoyA = 0: set $meet = '"Hello darling, I am glad to see you, <<$meetmop>> <<$meethair>>"'
  119. if harakBoyA = 1: set $meet = '"Hello <<$name>>, I am glad to see you, <<$meetmop>> <<$meethair>>"'
  120. if harakBoyA = 2: set $meet = '"Hi Svetsik! Glad to see you, <<$meetmop>> <<$meethair>>"'
  121. =======
  122. if $ARGS[0]='start':
  123. fcolor=rgb(0,0,0)
  124. bcolor=rgb(255,255,255)
  125. LCOLOR = rgb(106,90,205)
  126. set minut = minut + 15
  127. set dayA = dayA + 1
  128. set svidanieA = 0
  129. giftNum=giftNumA
  130. $boy=$boyA
  131. $namev=$boy
  132. $boybody=$boybodyA
  133. $boybod=$boybodA
  134. $boyface=$boyfaceA
  135. !long cock
  136. dick=dickA
  137. !! sexual force of 0 prior_to 2
  138. silaVag=silaVagA
  139. !!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
  140. finance=financeA
  141. !!check in appearance, a parameter vnesh
  142. vneshBoy=vneshBoyA
  143. $boyClo=$boyCloA
  144. !0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
  145. figurBoy=figurBoyA
  146. !0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
  147. titBoy=titBoyA
  148. !favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
  149. haerBoy=haerBoyA
  150. !character 0 - soft, 1 -norm 2 - aggressor
  151. harakBoy=harakBoyA
  152. !perversity
  153. izvrat=izvratA
  154. if love = 3:
  155. 'you met <<$boyA>> and put them in a hired wedding limousine.'
  156. act 'Sit in a limousine.':
  157. cla
  158. 'You got into the limo, and <<$boyA>> got into another car. Soon the limo pulled up to the Wedding Palace.'
  159. act 'Marry husband':
  160. cla
  161. set minut = minut + 60
  162. love = 0
  163. bfA = 0
  164. husband = 100
  165. husbanday=0
  166. $husName=$boyA
  167. $husHair=$boyfaceA
  168. $husBody=$boybodyA
  169. $husFat=$boybodA
  170. husDick=dickA
  171. harakHusb=harakBoyA
  172. izvratH=izvratA
  173. set silavagH = silavagA
  174. husbFin=financeA
  175. husbandMark=1
  176. 'The wedding took place in a cafe. There were not many guests and of course only by the groom. There was a lot of congratulations, toast, merrymaking and cries bitterly. By evening all got drunk and you with souped husband took home.'
  177. act 'wedding Night.':gt'husbsex','room'
  178. end
  179. end
  180. exit
  181. end
  182. if love = 2:
  183. '<<$boyA>> looks very excited and suddenly pulls out a ring out of the box.'
  184. '(<<$boyA>>) - Sveta. I offer you my hand and heart with very, Come out for my husband.'
  185. act 'No. (rasstatsya)':
  186. set minut = minut + 60
  187. set bfA = 0
  188. set pregtalk=0
  189. gt'street'
  190. end
  191. act 'Yes_I_Am':
  192. cla
  193. 'You agreed and put a ring on his finger. <<$boyA>> happy and hugged you kissed.'
  194. '(<<$boyA>>) - Now go choose your wedding dress.'
  195. act 'Go for a fee':
  196. cla
  197. set minut = minut + 60
  198. set love = 3
  199. 'You got into a taxi with his bride and went to the store to choose a dress. You have chosen an expensive and luxurious dress and <<$boyA>> paid for its purchase.'
  200. 'After all these winding through the city and you`re tired <<$boyA>> drove you home, warning, that at the next meeting you marry.'
  201. act 'Get_Away.':gt'street'
  202. end
  203. end
  204. exit
  205. end
  206. if mop > 1 and glamur = 1 and curly > 0 and love = 1 and harakBoyA = 0:
  207. '<<$boyA>> looks very excited, Look around you , that you are willing to appear before his mom.'
  208. act 'Go to the parents.':gt'love','mother'
  209. exit
  210. end
  211. if mop > 1 and glamur = 1 and curly > 0 and love = 1 and harakBoyA = 1 and tanga=1:
  212. '<<$boyA>> Look around you decided, that you are willing to appear before his friends.'
  213. act 'Go to friends.':gt'love','frends'
  214. exit
  215. end
  216. if skin = 0:set bfa = bfa - 2&set $meetskin = 'worth looking at his feet'
  217. if skin = 1:set bfa = bfa - 1&set $meetskin = 'throws at you view'
  218. if skin = 2:set $meetskin = 'Looking at you'
  219. if skin = 3:set bfa = bfa + 1&set $meetskin = 'seeing you smiling'
  220. if skin = 4:set bfa = bfa + 2&set $meetskin = 'seeing you smiling'
  221. if harakBoyA = 0:
  222. if mop <= 2 and mop > 0:set bfA = bfA + 1&set $meetmop = 'you are so beautiful today.'
  223. if mop = 4:set bfA = bfA - 1&set $meetmop = 'great weather today.'
  224. end
  225. if harakBoyA = 1:
  226. if mop <= 3 and mop > 0:set bfA = bfA + 1&set $meetmop = 'you are so beautiful today.'
  227. if mop = 4:set bfA = bfA - 1&set $meetmop = 'clearly you nakrasili, not like Halloween.'
  228. end
  229. if harakBoyA = 2:
  230. if mop = 4:set bfA = bfA + 1&set $meetmop = 'you are so beautiful today.'
  231. if mop <= 2 and mop > 0:set bfA = bfA - 1&set $meetmop = 'great weather today.'
  232. end
  233. if mop = 0:set bfA = bfA - 1&set $meetmop = 'Emm, you cosmetics flowed.'
  234. if hapri = 1 and curly > 0:set bfA = bfA + 2&set $meethair = 'You have a very beautiful hairstyle.'
  235. if hapri = 1 and curly = 0:set bfA = bfA + 1&set $meethair = 'You have a nice hairstyle.'
  236. if hapri = 0:set bfA = bfA - 1&set $meethair = 'I look you in a hurry to our meeting.'
  237. if harakBoyA = 0:set $meet = '"Hello favorite! Nice to see you, <<$meetmop>> <<$meethair>>"'
  238. if harakBoyA = 1:set $meet = '"Hello World! Nice to see you, <<$meetmop>> <<$meethair>>"'
  239. if harakBoyA = 2:set $meet = '"Hello Svetsik! Nice to see you, <<$meetmop>> <<$meethair>>"'
  240. >>>>>>> 324_meet
  241. set $meetcol = ''
  242. if dayA > 10 and harakBoy = 2:
  243. <<<<<<< 324_meet
  244. if haerBoyA ! hcol:
  245. bfA = bfA - 5
  246. if haerBoyA = 0: set $meetcol = '<<$boyA>> tells you that you would go black hair.'
  247. if haerBoyA = 1: set $meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
  248. if haerBoyA = 2: set $meetcol = '<<$boyA>> tells you that you would have gone red hair.'
  249. if haerBoyA = 3: set $meetcol = '<<$boyA>> tells you that you would go light hair color.'
  250. end
  251. if haerBoyA = hcol:
  252. set bfA += 1
  253. '<<$boyA>> says that you have a wonderful hair color.'
  254. end
  255. end
  256. if dayA > 20 and harakBoy = 1:
  257. if haerBoyA ! hcol:
  258. bfA = bfA - 5
  259. if haerBoyA = 0: set $meetcol = '<<$boyA>> tells you that you would go black hair.'
  260. if haerBoyA = 1: set $meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
  261. if haerBoyA = 2: set $meetcol = '<<$boyA>> tells you that you would have gone red hair.'
  262. if haerBoyA = 3: set $meetcol = '<<$boyA>> tells you that you would go light hair color.'
  263. end
  264. if haerBoyA = hcol:
  265. set bfA += 1
  266. '<<$boyA>> says that you have a wonderful hair color.'
  267. end
  268. end
  269. if dayA > 30 and harakBoy = 0:
  270. if haerBoyA ! hcol:
  271. bfA = bfA - 5
  272. if haerBoyA = 0: set $meetcol = '<<$boyA>> tells you that you would go black hair.'
  273. if haerBoyA = 1: set $meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
  274. if haerBoyA = 2: set $meetcol = '<<$boyA>> tells you that you would have gone red hair.'
  275. if haerBoyA = 3: set $meetcol = '<<$boyA>> tells you that you would go light hair color.'
  276. end
  277. if haerBoyA = hcol:
  278. set bfA += 1
  279. '<<$boyA>> says that you have a wonderful hair color.'
  280. end
  281. end
  282. if lip = 0: set $meetlip = 'thin lips'
  283. if lip = 1: set $meetlip = 'soft lips'
  284. if lip = 2: set $meetlip = 'plump lips'
  285. if lip = 3: set $meetlip = 'large, plump lips'
  286. if lip = 4: set $meetlip = 'thick and huge lips'
  287. =======
  288. if haerBoyA ! hcol:
  289. bfA = bfA - 5
  290. if haerBoyA = 0:set $meetcol = '<<$boyA>> speaks, you would go black hair.'
  291. if haerBoyA = 1:set $meetcol = '<<$boyA>> speaks, you would have gone brown hair color.'
  292. if haerBoyA = 2:set $meetcol = '<<$boyA>> speaks, you would go red hair.'
  293. if haerBoyA = 3:set $meetcol = '<<$boyA>> speaks, you would go bright hair color.'
  294. end
  295. if haerBoyA = hcol:
  296. set bfA = bfA + 1
  297. '<<$boyA>> speaks, that you have a beautiful hair color.'
  298. end
  299. end
  300. if dayA > 20 and harakBoy = 1:
  301. if haerBoyA ! hcol:
  302. bfA = bfA - 5
  303. if haerBoyA = 0:set $meetcol = '<<$boyA>> speaks, you would go black hair.'
  304. if haerBoyA = 1:set $meetcol = '<<$boyA>> speaks, you would have gone brown hair color.'
  305. if haerBoyA = 2:set $meetcol = '<<$boyA>> speaks, you would go red hair.'
  306. if haerBoyA = 3:set $meetcol = '<<$boyA>> speaks, you would go bright hair color.'
  307. end
  308. if haerBoyA = hcol:
  309. set bfA = bfA + 1
  310. '<<$boyA>> speaks, that you have a beautiful hair color.'
  311. end
  312. end
  313. if dayA > 30 and harakBoy = 0:
  314. if haerBoyA ! hcol:
  315. bfA = bfA - 5
  316. if haerBoyA = 0:set $meetcol = '<<$boyA>> speaks, you would go black hair.'
  317. if haerBoyA = 1:set $meetcol = '<<$boyA>> speaks, you would have gone brown hair color.'
  318. if haerBoyA = 2:set $meetcol = '<<$boyA>> speaks, you would go red hair.'
  319. if haerBoyA = 3:set $meetcol = '<<$boyA>> speaks, you would go bright hair color.'
  320. end
  321. if haerBoyA = hcol:
  322. set bfA = bfA + 1
  323. '<<$boyA>> speaks, that you have a beautiful hair color.'
  324. end
  325. end
  326. if lip = 0:set $meetlip = 'thin lips'
  327. if lip = 1:set $meetlip = 'soft lips'
  328. if lip = 2:set $meetlip = 'plump lips'
  329. if lip = 3:set $meetlip = 'large, plump lips'
  330. if lip = 4:set $meetlip = 'thick and huge lips'
  331. >>>>>>> 324_meet
  332. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  333. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  334. <<<<<<< 324_meet
  335. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!ДИАЛОГ
  336. =======
  337. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!DIALOGUE
  338. >>>>>>> 324_meet
  339. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  340. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  341. <<<<<<< 324_meet
  342. 'At the entrance <<$meetskin>> <<$boyA>>. You´ll see he comes to you and says. <<$meet>> <<$meetcol>>'
  343. if financeA = 0: set $clom = 'deshovy dressed in a tracksuit.'
  344. if financeA = 1: set $clom = 'dressed in jeans and a sweater.'
  345. if financeA = 2: set $clom = 'dressed in a respectable and expensive jacket.'
  346. if harakBoyA = 0: '<<$boyA>> looks timid and not confident young man <<$clom>>'
  347. if harakBoyA = 1: '<<$boyA>> looks calm and confident young man <<$clom>>'
  348. if harakBoyA = 2: '<<$boyA>> looks cocky and brash young man <<$clom>>'
  349. if dayA >= 2 and financeA = 2 and giftDay < (dayA - giftNum):
  350. set giftrand = RAND(0,2)
  351. if giftrand <= financeA:
  352. set giftDayA = dayA
  353. set giftNum += 1
  354. set gift = RAND(bfa * 20, bfa * 30)
  355. if gift > 2500: gift = 2500
  356. giftNumA = giftNum
  357. set money += gift
  358. '<<$boyA>> reached into his pocket and pulled out a gift for you <<gift>> rubles.'
  359. end
  360. end
  361. if dayA >= 5 and financeA = 1 and giftDay < (dayA - giftNum):
  362. set giftrand = RAND(0,2)
  363. if giftrand <= financeA:
  364. set giftDayA = dayA
  365. set giftNum += 1
  366. set gift = RAND(bfa * 10, bfa * 20)
  367. if gift > 1500: gift = 1500
  368. giftNumA = giftNum
  369. set money += gift
  370. '<<$boyA>> reached into his pocket and pulled out a gift for you <<gift>> rubles.'
  371. end
  372. end
  373. if dayA >= 10 and financeA = 0 and giftDay < (dayA - giftNum):
  374. set giftrand = RAND(0,2)
  375. if giftrand <= financeA:
  376. set giftDayA = dayA
  377. set giftNum += 1
  378. set gift = RAND(bfa * 5, bfa * 10)
  379. if gift > 500: gift = 500
  380. giftNumA = giftNum
  381. set money += gift
  382. '<<$boyA>> reached into his pocket and pulled out a gift for you. He gave you <<gift>> rubles.'
  383. end
  384. end
  385. '<<$boybody>> <<$boybod>> <<$boyface>> walks up to you and wants to kiss you.'
  386. if venera < 4 and cumface = 0:
  387. !cumlip
  388. act 'Kiss with tongue.':
  389. cla
  390. if cumlip = 0:
  391. '<center><img src="images\etogame\kiss.jpg"></center>'
  392. if harakBoyA = 0: set bfa -= 2 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> blushed and pulled away.'
  393. if harakBoyA = 1: set bfa -= 1 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> gently obsasal your language.'
  394. if harakBoyA = 2: set bfa += 2 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> aggressively pushed his tongue into your mouth and almost started to fuck you in the mouth with his tongue.'
  395. act 'Finish the kiss.': xgt 'meet','a'
  396. exit
  397. end
  398. if cumlip > 0:
  399. '<center><img src="images\etogame\cumlip.jpg"></center>'
  400. '<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pull away. "What is it?" he asked, "Do you smell mouth sperm."'
  401. if izvrat = 1:
  402. set bfa += 5
  403. set DOM += 1
  404. '<<$boyA>> blushed and lowered his eyes, you´ll clearly see how he formed a mound on his trousers.'
  405. act 'Finish the kiss.': xgt 'meet','a'
  406. exit
  407. else
  408. set bfa = 0
  409. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  410. act 'Leave.': gt $HouseLocation
  411. exit
  412. end
  413. end
  414. end
  415. act 'Kiss on the lips.':
  416. cla
  417. if cumlip = 0:
  418. '<center><img src="images\etogame\kiss1.jpg"></center>'
  419. if harakBoyA = 0: 'You framed to kiss her lips and <<$boyA>> a little embarrassed kissed you.'
  420. if harakBoyA = 1: set bfa += 2 & 'You framed for a kiss lips <<$boyA>> quickly kissed you.'
  421. if harakBoyA = 2: set bfa -= 1 & 'You framed for a kiss lips <<$boyA>> juicy kiss you, pressing his lips to your firm <<$meetlip>>.'
  422. act 'Finish the kiss.': xgt 'meet','a'
  423. exit
  424. end
  425. if cumlip > 0:
  426. '<center><img src="images\etogame\cumlip.jpg"></center>'
  427. '<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pull away. "What is it?" he asked, "Do you smell mouth sperm."'
  428. if izvrat = 1:
  429. set bfa += 5
  430. set DOM += 1
  431. '<<$boyA>> blushed and lowered his eyes, you´ll clearly see how he formed a mound on his trousers.'
  432. act 'Finish the kiss.': xgt 'meet','a'
  433. exit
  434. else
  435. set boya = 0
  436. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  437. act 'Leave.': gt $HouseLocation
  438. exit
  439. end
  440. end
  441. end
  442. act 'Kiss on the cheek.':
  443. cla
  444. '<center><img src="images\etogame\kiss2.jpg"></center>'
  445. set DOM += 1
  446. if harakBoyA = 0: set bfa += 1 & 'You framed and cheek <<$boyA>> timidly kissed you.'
  447. if harakBoyA = 1: 'You framed and cheek <<$boyA>> you kissed.'
  448. if harakBoyA = 2: set bfa -= 2 & 'You framed and cheek <<$boyA>> kissed you discouraged with views.'
  449. if giftDayA = dayA:
  450. set bfa -= 3
  451. if harakBoyA = 0: '<<$boyA>> looks upset.'
  452. if harakBoyA = 1: '<<$boyA>> looks offended.'
  453. if harakBoyA = 2: '<<$boyA>> looks angry.'
  454. end
  455. act 'Finish the kiss.': xgt 'meet','a'
  456. exit
  457. end
  458. act 'Do not kiss.':
  459. cla
  460. set DOM += 2
  461. if harakBoyA = 0: set bfa -= 1 & 'You nodded and said hello, <<$boyA>> get confused and blushed slightly.'
  462. if harakBoyA = 1: set bfa -= 2 & 'You nodded and said hello <<$boyA>> frowned slightly.'
  463. if harakBoyA = 2: set bfa -= 3 & 'You nodded and said hello <<$boyA>> chuckled and grinned.'
  464. if giftDayA = dayA:
  465. set bfa -= 3
  466. if harakBoyA = 0: '<<$boyA>> looks upset.'
  467. if harakBoyA = 1: '<<$boyA>> looks offended.'
  468. if harakBoyA = 2: '<<$boyA>> looks angry.'
  469. end
  470. act 'Next.': xgt 'meet','a'
  471. exit
  472. end
  473. end
  474. if venera >= 4:
  475. '<center><img src="images\etogame\venera.jpg"></center>'
  476. set bfa = 0
  477. '<<$boyA>> take a closer look at you and said, "What have you got with the lips? They are very sore. Is that genital herpes? I´d better go, do not want to get infected. Goodbye."'
  478. act 'Leave.': gt $HouseLocation
  479. exit
  480. end
  481. if cumface > 0:
  482. '<center><img src="images\etogame\cumface.jpg"></center>'
  483. '<<$boyA>> take a closer look at you and said, "What have you got stuck in your hair? Is that sperm?"'
  484. if izvrat = 1:
  485. set bfa += 5
  486. set DOM += 1
  487. '<<$boyA>> blushed and lowered his eyes, you´ll clearly see how he formed a mound on his trousers.'
  488. act 'Yes it is the sperm still have questions?':
  489. cla
  490. '(You) - Yes, it´s sperm still have questions?'
  491. '<<$boyA>> shook his head.'
  492. xgt 'meet','a'
  493. end
  494. exit
  495. else
  496. set boya = 0
  497. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  498. act 'Leave.': gt $HouseLocation
  499. exit
  500. end
  501. end
  502. =======
  503. 'At the entrance <<$meetskin>> <<$boyA>>. Sees you he comes to you and says. <<$meet>> <<$meetcol>>'
  504. if financeA = 0:set $clom = 'dressed in a tracksuit deshovy.'
  505. if financeA = 1:set $clom = 'dressed in jeans and a sweater.'
  506. if financeA = 2:set $clom = 'dressed in a respectable and expensive jacket.'
  507. if harakBoyA = 0:'<<$boyA>> looks shy and not confident young man <<$clom>>'
  508. if harakBoyA = 1:'<<$boyA>> looks confident and calm young man <<$clom>>'
  509. if harakBoyA = 2:'<<$boyA>> looks cocky and brash young man <<$clom>>'
  510. if dayA >= 2 and financeA = 2 and giftDay < (dayA - giftNum):
  511. set giftrand = RAND (0,2)
  512. if giftrand <= financeA:
  513. set giftDayA = dayA
  514. set giftNum = giftNum + 1
  515. set gift = RAND (bfa*20,bfa*30)
  516. if gift>2500:gift=2500
  517. giftNumA=giftNum
  518. set money = money + gift
  519. '<<$boyA>> reached into his pocket and pulled out a gift for you to <<gift>> rubles.'
  520. end
  521. end
  522. if dayA >= 5 and financeA = 1 and giftDay < (dayA - giftNum):
  523. set giftrand = RAND (0,2)
  524. if giftrand <= financeA:
  525. set giftDayA = dayA
  526. set giftNum = giftNum + 1
  527. set gift = RAND (bfa*10,bfa*20)
  528. if gift>1500:gift=1500
  529. giftNumA=giftNum
  530. set money = money + gift
  531. '<<$boyA>> reached into his pocket and pulled out a gift for you to <<gift>> rubles.'
  532. end
  533. end
  534. if dayA >= 10 and financeA = 0 and giftDay < (dayA - giftNum):
  535. set giftrand = RAND (0,2)
  536. if giftrand <= financeA:
  537. set giftDayA = dayA
  538. set giftNum = giftNum + 1
  539. set gift = RAND (bfa*5,bfa*10)
  540. if gift>500:gift=500
  541. giftNumA=giftNum
  542. set money = money + gift
  543. '<<$boyA>> reached into his pocket and pulled out a gift for you to <<gift>> rubles.'
  544. end
  545. end
  546. '<<$boybody>> <<$boybod>> <<$boyface>> comes to you and wants to kiss you.'
  547. if venera < 4 and cumface = 0:
  548. !cumlip
  549. act 'Kiss with tongue.':
  550. cla
  551. if cumlip = 0:
  552. '<center><img src="pic/kiss.jpg" ></center>'
  553. if harakBoyA = 0:set bfa = bfa - 2&'You have pressed their <<$meetlip>> to solid guy lips and mouth slightly open thrust his tongue in his mouth. <<$boyA>> blushed and pulled.'
  554. if harakBoyA = 1:set bfa = bfa - 1&'You have pressed their <<$meetlip>> to solid guy lips and mouth slightly open thrust his tongue in his mouth. <<$boyA>> gently obsasal your language.'
  555. if harakBoyA = 2:set bfa = bfa + 2&'You have pressed their <<$meetlip>> to solid guy lips and mouth slightly open thrust his tongue in his mouth. <<$boyA>> aggressively pushed his tongue into your mouth and almost started to fuck you in the mouth with his tongue.'
  556. act 'finish kiss.':xgt'meet','a'
  557. exit
  558. end
  559. if cumlip > 0:
  560. '<center><img src="pic/cumlip.jpg" ></center>'
  561. '<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pulled. "what is that?" he asked "You mouth sperm smells."'
  562. if izvrat = 1:
  563. set bfa = bfa + 5
  564. set DOM = DOM + 1
  565. '<<$boyA>> blushed and lowered his eyes, you clearly see how he formed a mound on the trousers.'
  566. act 'finish kiss.':xgt'meet','a'
  567. exit
  568. else
  569. set bfa = 0
  570. '<<$boyA>> angry you threw myself "Oh! get_out, that I did not see you anymore, all we had done for!"'
  571. act 'Get_Away.':gt'street'
  572. exit
  573. end
  574. end
  575. end
  576. act 'Kiss on the lips.':
  577. cla
  578. if cumlip = 0:
  579. '<center><img src="pic/kiss1.jpg" ></center>'
  580. if harakBoyA = 0:'You have substituted for a kiss lips <<$boyA>> a little embarrassed kissed you.'
  581. if harakBoyA = 1:set bfa = bfa + 2&'You have substituted for a kiss lips <<$boyA>> you quickly smacked.'
  582. if harakBoyA = 2:set bfa = bfa - 1&'You have substituted for a kiss lips <<$boyA>> relish kissed you, pushing his firm lips to your <<$meetlip>>.'
  583. act 'finish kiss.':xgt'meet','a'
  584. exit
  585. end
  586. if cumlip > 0:
  587. '<center><img src="pic/cumlip.jpg" ></center>'
  588. '<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pulled. "what is that?" he asked "You mouth sperm smells."'
  589. if izvrat = 1:
  590. set bfa = bfa + 5
  591. set DOM = DOM + 1
  592. '<<$boyA>> blushed and lowered his eyes, you clearly see how he formed a mound on the trousers.'
  593. act 'finish kiss.':xgt'meet','a'
  594. exit
  595. else
  596. set boya = 0
  597. '<<$boyA>> angry you threw myself "Oh! get_out, that I did not see you anymore, all we had done for!"'
  598. act 'Get_Away.':gt'street'
  599. exit
  600. end
  601. end
  602. end
  603. act 'Kiss on the cheek.':
  604. cla
  605. '<center><img src="pic/kiss2.jpg" ></center>'
  606. set DOM = DOM + 1
  607. if harakBoyA = 0:set bfa = bfa + 1&'You framed cheek and <<$boyA>> timidly kissed you.'
  608. if harakBoyA = 1:'You framed cheek and <<$boyA>> you kissed.'
  609. if harakBoyA = 2:set bfa = bfa - 2&'You framed cheek and <<$boyA>> kissed you discouraged with views.'
  610. if giftDayA = dayA:
  611. set bfa = bfa - 3
  612. if harakBoyA = 0:'<<$boyA>> looks upset.'
  613. if harakBoyA = 1:'<<$boyA>> looks offended.'
  614. if harakBoyA = 2:'<<$boyA>> looks angry.'
  615. end
  616. act 'finish kiss.':xgt'meet','a'
  617. exit
  618. end
  619. act 'Do not kiss.':
  620. cla
  621. set DOM = DOM + 2
  622. if harakBoyA = 0:set bfa = bfa - 1&'You nodded and said hello, <<$boyA>> effaced and blushed slightly.'
  623. if harakBoyA = 1:set bfa = bfa - 2&'You nodded and said hello, <<$boyA>> frowned slightly.'
  624. if harakBoyA = 2:set bfa = bfa - 3&'You nodded and said hello, <<$boyA>> chuckled and grinned.'
  625. if giftDayA = dayA:
  626. set bfa = bfa - 3
  627. if harakBoyA = 0:'<<$boyA>> looks upset.'
  628. if harakBoyA = 1:'<<$boyA>> looks offended.'
  629. if harakBoyA = 2:'<<$boyA>> looks angry.'
  630. end
  631. act 'further.':xgt'meet','a'
  632. exit
  633. end
  634. end
  635. if venera >= 4:
  636. '<center><img src="pic/venera.jpg" ></center>'
  637. set bfa = 0
  638. '<<$boyA>> looked at you and said "What have you got with the lips? They are all in ulcers. This is, genital herpes? I`d better go, I do not want to catch. adieu."'
  639. act 'Get_Away.':gt'street'
  640. exit
  641. end
  642. if cumface > 0:
  643. '<center><img src="pic/cumface.jpg" ></center>'
  644. '<<$boyA>> looked at you and said "What have you got stuck in her hair? This is, sperm?"'
  645. if izvrat = 1:
  646. set bfa = bfa + 5
  647. set DOM = DOM + 1
  648. '<<$boyA>> blushed and lowered his eyes, you clearly see how he formed a mound on the trousers.'
  649. act 'Yes, still have questions?':
  650. cla
  651. gs'stat'
  652. '(Do_You) - Yes, still have questions?'
  653. '<<$boyA>> shook his head.'
  654. xgt'meet','a'
  655. end
  656. exit
  657. else
  658. set boya = 0
  659. '<<$boyA>> angry you threw myself "Oh! get_out, that I did not see you anymore, all we had done for!"'
  660. act 'Get_Away.':gt'street'
  661. exit
  662. end
  663. end
  664. >>>>>>> 324_meet
  665. end
  666. <<<<<<< 324_meet
  667. if $ARGS[0] = 'a':
  668. if financeA = 0:
  669. if glamur = 1:
  670. set bfa -= (harakBoyA + 1)
  671. '"And you dress smartly," remarked skeptical <<$boyA>> looking at your expensive dress.'
  672. end
  673. if skirt = 1 or sport = 1:
  674. set bfa += (harakBoyA + 1)
  675. '"A classy outfit," said <<$boyA>>'
  676. end
  677. set mesorand = RAND(0,1)
  678. if mesorand = 0:
  679. '<<$boyA>> offered you a beer in the stairwell.'
  680. act 'Sorry, but I urgently need to escape.':
  681. cla
  682. set bfa -= (harakBoyA + 1)
  683. gt $HouseLocation
  684. end
  685. act 'Come on.': gt 'podezdM','start'
  686. exit
  687. end
  688. if mesorand = 1:
  689. '<<$boyA>> suggest that you take a walk in the park.'
  690. act 'Sorry, but I urgently need to escape.':
  691. cla
  692. set bfa -= (harakBoyA + 1)
  693. gt $HouseLocation
  694. end
  695. act 'Come on.': gt 'parkM','start'
  696. exit
  697. end
  698. end
  699. if cumfrot > 0:
  700. '"Hey, what are you smeared?" asked <<$boyA>> looking at your ass. "It´s sperm!"'
  701. if izvrat = 1:
  702. set bfa += 5
  703. set DOM += 1
  704. '<<$boyA>> blushed and lowered his eyes, you´ll clearly see how he formed a mound on his trousers.'
  705. else
  706. set bfa = 0
  707. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  708. act 'Leave.': gt $HouseLocation
  709. exit
  710. end
  711. end
  712. if financeA = 1:
  713. if glamur = 1 or skirt = 1:
  714. set boyA += (harakBoyA + 1)
  715. '"Great clothes," said admiringly <<$boyA>>.'
  716. end
  717. if sport = 1:
  718. set bfa -= (harakBoyA + 1)
  719. '"And you´re athletic girl" skeptical noticed <<$boyA>> looking at your clothes.'
  720. end
  721. set mesorand = RAND(0,2)
  722. if mesorand = 0:
  723. '<<$boyA>> suggest that you go to the movies.'
  724. act 'Sorry, but I urgently need to escape.':
  725. cla
  726. set bfa -= (harakBoyA + 1)
  727. gt $HouseLocation
  728. end
  729. act 'Come on.': gt 'kinoM','start'
  730. exit
  731. end
  732. if mesorand = 1:
  733. '<<$boyA>> suggest that you take a walk in the park.'
  734. act 'Sorry, but I urgently need to escape.':
  735. cla
  736. set bfa -= (harakBoyA + 1)
  737. gt $HouseLocation
  738. end
  739. act 'Come on.': gt 'parkM','start'
  740. exit
  741. end
  742. if mesorand = 2:
  743. '<<$boyA>> suggest that you sit in a cafe.'
  744. act 'Sorry, but I urgently need to escape.':
  745. cla
  746. set bfa -= (harakBoyA + 1)
  747. gt $HouseLocation
  748. end
  749. act 'Come on.': gt 'kafeM','start'
  750. exit
  751. end
  752. end
  753. if financeA = 2:
  754. if glamur = 1:
  755. set bfa += (harakBoyA + 1)
  756. '"You´ve got great taste in clothes," said admiringly <<$boyA>> looking at your expensive dress.'
  757. end
  758. if glamur = 0:
  759. set bfa -= (harakBoyA + 1)
  760. '"Dear naryadets" remarked skeptical <<$boyA>> examining your unpretentious clothes.'
  761. end
  762. set mesorand = RAND(0,1)
  763. if mesorand = 0:
  764. '<<$boyA>> suggest that you go to a cafe.'
  765. act 'Sorry, but I urgently need to escape.':
  766. cla
  767. set bfa -= (harakBoyA + 1)
  768. gt $HouseLocation
  769. end
  770. act 'Come on.': gt 'kafeM','start'
  771. exit
  772. end
  773. if mesorand = 1:
  774. '<<$boyA>> suggest that you go to a restaurant.'
  775. act 'Sorry, but I urgently need to escape.':
  776. cla
  777. set bfa -= (harakBoyA + 1)
  778. gt $HouseLocation
  779. end
  780. act 'Come on.': gt 'restoranM','start'
  781. exit
  782. end
  783. end
  784. =======
  785. if $ARGS[0]='a':
  786. if financeA = 0:
  787. if glamur = 1:
  788. set bfa = bfa - (harakBoyA + 1)
  789. '"And you dress smartly" skeptical noticed <<$boyA>> looking at your expensive dress.'
  790. end
  791. if skirt = 1 or sport = 1:
  792. set bfa = bfa + (harakBoyA + 1)
  793. '"cool outfit" noticed <<$boyA>>'
  794. end
  795. set mesorand = RAND (0,1)
  796. if mesorand = 0:
  797. '<<$boyA>> offered you a beer at the entrance.'
  798. act 'Sorry, but I urgently need to run.':
  799. cla
  800. set bfa = bfa - (harakBoyA + 1)
  801. gt'street'
  802. end
  803. act 'Let`S_Go.':gt'podezdM','start'
  804. exit
  805. end
  806. if mesorand = 1:
  807. '<<$boyA>> suggest you take a walk in the park.'
  808. act 'Sorry, but I urgently need to run.':
  809. cla
  810. set bfa = bfa - (harakBoyA + 1)
  811. gt'street'
  812. end
  813. act 'Let`S_Go.':gt'parkM','start'
  814. exit
  815. end
  816. end
  817. if cumfrot > 0:
  818. '"hey, but what are you smeared?" asked <<$boyA>> looking at your ass. "The same sperm!"'
  819. if izvrat = 1:
  820. set bfa = bfa + 5
  821. set DOM = DOM + 1
  822. '<<$boyA>> blushed and lowered his eyes, you clearly see how he formed a mound on the trousers.'
  823. else
  824. set bfa = 0
  825. '<<$boyA>> angry you threw myself "Oh! get_out, that I did not see you anymore, all we had done for!"'
  826. act 'Get_Away.':gt'street'
  827. exit
  828. end
  829. end
  830. if financeA = 1:
  831. if glamur = 1 or skirt = 1:
  832. set bfa = bfa - (harakBoyA + 1)
  833. '"excellent wear" admiringly noticed <<$boyA>>.'
  834. end
  835. if sport = 1:
  836. set bfa = bfa - (harakBoyA + 1)
  837. '"Are you athletic girl" skeptical noticed <<$boyA>> looking at your clothes.'
  838. end
  839. set mesorand = RAND (0,2)
  840. if mesorand = 0:
  841. '<<$boyA>> suggest you go to the movies.'
  842. act 'Sorry, but I urgently need to run.':
  843. cla
  844. set bfa = bfa - (harakBoyA + 1)
  845. gt'street'
  846. end
  847. act 'Let`S_Go.':gt'kinoM','start'
  848. exit
  849. end
  850. if mesorand = 1:
  851. '<<$boyA>> suggest you take a walk in the park.'
  852. act 'Sorry, but I urgently need to run.':
  853. cla
  854. set bfa = bfa - (harakBoyA + 1)
  855. gt'street'
  856. end
  857. act 'Let`S_Go.':gt'parkM','start'
  858. exit
  859. end
  860. if mesorand = 2:
  861. '<<$boyA>> suggested that you sit in a cafe.'
  862. act 'Sorry, but I urgently need to run.':
  863. cla
  864. set bfa = bfa - (harakBoyA + 1)
  865. gt'street'
  866. end
  867. act 'Let`S_Go.':gt'kafeM','start'
  868. exit
  869. end
  870. end
  871. if financeA = 2:
  872. if glamur = 1:
  873. set bfa = bfa + (harakBoyA + 1)
  874. '"You have excellent taste in clothes" admiringly noticed <<$boyA>> looking at your expensive dress.'
  875. end
  876. if glamur = 0:
  877. set bfa = bfa - (harakBoyA + 1)
  878. '"cute naryadets" skeptical noticed <<$boyA>> looking at your sleek clothes.'
  879. end
  880. set mesorand = RAND (0,1)
  881. if mesorand = 0:
  882. '<<$boyA>> suggest you go to the cafe.'
  883. act 'Sorry, but I urgently need to run.':
  884. cla
  885. set bfa = bfa - (harakBoyA + 1)
  886. gt'street'
  887. end
  888. act 'Let`S_Go.':gt'kafeM','start'
  889. exit
  890. end
  891. if mesorand = 1:
  892. '<<$boyA>> suggest you go to a restaurant.'
  893. act 'Sorry, but I urgently need to run.':
  894. cla
  895. set bfa = bfa - (harakBoyA + 1)
  896. gt'street'
  897. end
  898. act 'Let`S_Go.':gt'restoranM','start'
  899. exit
  900. end
  901. end
  902. >>>>>>> 324_meet
  903. end
  904. --- meet ---------------------------------