1
0

meet 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542
  1. # meet
  2. if $ARGS[0] = 'start':
  3. minut += 15
  4. dayA += 1
  5. svidanieA = 0
  6. giftNum = giftNumA
  7. fcolor = rgb(0, 0, 0)
  8. bcolor = rgb(255, 255, 255)
  9. lcolor = rgb(106, 90, 205)
  10. $boy = $boyA
  11. $boybody = $boybodyA
  12. $boybod = $boybodA
  13. $boyface = $boyfaceA
  14. !!long cock
  15. dick = dickA
  16. !! sexual force of 0 prior_to 2
  17. silaVag = silaVagA
  18. !!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
  19. finance = financeA
  20. !!check in appearance, a parameter vnesh
  21. vneshBoy = vneshBoyA
  22. $boyClo = $boyCloA
  23. !!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
  24. figurBoy = figurBoyA
  25. !!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
  26. titBoy = titBoyA
  27. !!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
  28. haerBoy = haerBoyA
  29. !!character 0 - soft, 1 -norm 2 - aggressor
  30. harakBoy = harakBoyA
  31. !!perversity
  32. izvrat = izvratA
  33. if love = 3:
  34. '<<$boyA>> has hired a wedding limousine and it''s outside waiting for you. This is it, you are getting married today.'
  35. act 'Sit in a limousine':
  36. cla
  37. 'You get into the limo, and it drives off. Soon the limo delivers to the wedding, <<$boyA>> is waiting for you as you walk down the aisle.'
  38. act 'Marry husband':
  39. cla
  40. minut += 60
  41. love = 0
  42. bfA = 0
  43. husband = 100
  44. husbanday = 0
  45. $husName = $boyA
  46. $husHair = $boyfaceA
  47. $husBody = $boybodyA
  48. $husFat = $boybodA
  49. husDick = dickA
  50. harakHusb = harakBoyA
  51. izvratH = izvratA
  52. silavagH = silavagA
  53. husbFin = financeA
  54. husbandMark = 1
  55. 'The wedding reception took place at a cafe. There were not many guests neither you or the groom have that many friends or family. It was a lot of congratulations, toasts, merrymaking and crying. By the evening, all were drunk and you and your husband staggered into a taxi, which took you home.'
  56. act 'Wedding night':gt 'husbsex', 'room'
  57. end
  58. end
  59. exit
  60. elseif love = 2:
  61. '<<$boyA>> looks very excited and suddenly pulls the ring out of the box.'
  62. '(<<$boyA>>) - <<$name>>. I offer you my hand and heart with very, come for my husband.'
  63. act 'No (turn him down)':
  64. minut += 60
  65. bfA = 0
  66. pregtalk = 0
  67. gt 'street'
  68. end
  69. act 'Yes':
  70. cla
  71. 'You agreed and put a ring on your finger. <<$boyA>> rejoiced and hugged kissed you.'
  72. '(<<$boyA>>) - And now you gone choose a wedding dress.'
  73. act 'Go for the dress':
  74. cla
  75. minut += 60
  76. love = 3
  77. '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.'
  78. 'After all these winding through the city and you''re tired <<$boyA>> to drive you home, warning that the next meeting you''re married.'
  79. act 'Leave':gt 'street'
  80. end
  81. end
  82. exit
  83. end
  84. if mop > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and love = 1 and harakBoyA = 0:
  85. '<<$boyA>> looks very excited, he decided to look around you that you are willing to appear before his mother.'
  86. act 'Meet the parents':gt 'love', 'mother'
  87. exit
  88. elseif mop > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and love = 1 and harakBoyA = 1 and tanga = 1:
  89. '<<$boyA>> examining you decided that you are ready to appear before his friends.'
  90. act 'Meet his friends':gt 'love', 'frends'
  91. exit
  92. end
  93. if skin = 0:bfa -= 2 & $meetskin = 'worth looking at his feet'
  94. if skin = 1:bfa -= 1 & $meetskin = 'throws at you view'
  95. if skin = 2:$meetskin = 'Looking at you'
  96. if skin = 3:bfa += 1 & $meetskin = 'seeing you smiling'
  97. if skin = 4:bfa += 2 & $meetskin = 'seeing you smiling'
  98. if harakBoyA = 0:
  99. if mop <= 2 and mop > 0:bfA += 1 & $meetmop = 'you are so beautiful today.'
  100. if mop = 4:bfA -= 1 & $meetmop = 'great weather today.'
  101. elseif harakBoyA = 1:
  102. if mop <= 3 and mop > 0:bfA += 1 & $meetmop = 'you are so beautiful today.'
  103. if mop = 4:bfA -= 1 & $meetmop = 'clearly you made up, not like Halloween.'
  104. elseif harakBoyA = 2:
  105. if mop = 4:bfA += 1 & $meetmop = 'you are so beautiful today.'
  106. if mop <= 2 and mop > 0:bfA -= 1 & $meetmop = 'great weather today.'
  107. end
  108. if mop = 0:bfA -= 1 & $meetmop = 'Um, you have flowed cosmetics.'
  109. if hapri = 1 and curly > 0:bfA += 2 & $meethair = 'You have a very beautiful hairstyle.'
  110. if hapri = 1 and curly = 0:bfA += 1 & $meethair = 'You have pretty hair.'
  111. if hapri = 0:bfA -= 1 & $meethair = 'I look at you in a hurry for our meeting.'
  112. if harakBoyA = 0:$meet = '"Hello darling, I am glad to see you, <<$meetmop>> <<$meethair>>"'
  113. if harakBoyA = 1:$meet = '"Hello <<$name>>, I am glad to see you, <<$meetmop>> <<$meethair>>"'
  114. if harakBoyA = 2:$meet = '"Hi <<$name>>! Glad to see you, <<$meetmop>> <<$meethair>>"'
  115. $meetcol = ''
  116. if dayA > 10 and harakBoy = 2:
  117. if haerBoyA ! hcol:
  118. bfA = bfA - 5
  119. if haerBoyA = 0:$meetcol = '<<$boyA>> tells you that you would go black hair.'
  120. if haerBoyA = 1:$meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
  121. if haerBoyA = 2:$meetcol = '<<$boyA>> tells you that you would have gone red hair.'
  122. if haerBoyA = 3:$meetcol = '<<$boyA>> tells you that you would go light hair color.'
  123. elseif haerBoyA = hcol:
  124. bfA += 1
  125. '<<$boyA>> says that you have a wonderful hair color.'
  126. end
  127. end
  128. if dayA > 20 and harakBoy = 1:
  129. if haerBoyA ! hcol:
  130. bfA = bfA - 5
  131. if haerBoyA = 0:$meetcol = '<<$boyA>> tells you that you would go black hair.'
  132. if haerBoyA = 1:$meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
  133. if haerBoyA = 2:$meetcol = '<<$boyA>> tells you that you would have gone red hair.'
  134. if haerBoyA = 3:$meetcol = '<<$boyA>> tells you that you would go light hair color.'
  135. elseif haerBoyA = hcol:
  136. bfA += 1
  137. '<<$boyA>> says that you have a wonderful hair color.'
  138. end
  139. elseif dayA > 30 and harakBoy = 0:
  140. if haerBoyA ! hcol:
  141. bfA = bfA - 5
  142. if haerBoyA = 0:$meetcol = '<<$boyA>> tells you that you would go black hair.'
  143. if haerBoyA = 1:$meetcol = '<<$boyA>> tells you that you would have gone blond hair color.'
  144. if haerBoyA = 2:$meetcol = '<<$boyA>> tells you that you would have gone red hair.'
  145. if haerBoyA = 3:$meetcol = '<<$boyA>> tells you that you would go light hair color.'
  146. elseif haerBoyA = hcol:
  147. bfA += 1
  148. '<<$boyA>> says that you have a wonderful hair color.'
  149. end
  150. end
  151. if lip = 0:$meetlip = 'thin lips'
  152. if lip = 1:$meetlip = 'soft lips'
  153. if lip = 2:$meetlip = 'plump lips'
  154. if lip = 3:$meetlip = 'large, plump lips'
  155. if lip = 4:$meetlip = 'thick and huge lips'
  156. 'At the entrance <<$meetskin>> <<$boyA>>. You''ll see he comes to you and says. <<$meet>> <<$meetcol>>'
  157. if financeA = 0:$clom = 'deshovy dressed in a tracksuit.'
  158. if financeA = 1:$clom = 'dressed in jeans and a sweater.'
  159. if financeA = 2:$clom = 'dressed in a respectable and expensive jacket.'
  160. if harakBoyA = 0:'<<$boyA>> looks timid and not confident young man <<$clom>>'
  161. if harakBoyA = 1:'<<$boyA>> looks calm and confident young man <<$clom>>'
  162. if harakBoyA = 2:'<<$boyA>> looks cocky and brash young man <<$clom>>'
  163. ! WD: Uninitialised ~ 'giftDay' us 'giftDayA'
  164. if dayA >= 2 and financeA = 2 and giftDayA < (dayA - giftNum):
  165. giftrand = rand(0, 2)
  166. if giftrand <= financeA:
  167. giftDayA = dayA
  168. giftNum += 1
  169. gift = rand(bfa * 20, bfa * 30)
  170. if gift > 2500:gift = 2500
  171. giftNumA = giftNum
  172. money += gift
  173. '<<$boyA>> reached into his pocket and pulled out a gift for you <<gift>> <b>₽</b>.'
  174. end
  175. ! WD: Uninitialised ~ 'giftDay' us 'giftDayA'
  176. elseif dayA >= 5 and financeA = 1 and giftDayA < (dayA - giftNum):
  177. giftrand = rand(0, 2)
  178. if giftrand <= financeA:
  179. giftDayA = dayA
  180. giftNum += 1
  181. gift = rand(bfa * 10, bfa * 20)
  182. if gift > 1500:gift = 1500
  183. giftNumA = giftNum
  184. money += gift
  185. '<<$boyA>> reached into his pocket and pulled out a gift for you <<gift>> <b>₽</b>.'
  186. end
  187. ! WD: Uninitialised ~ 'giftDay' us 'giftDayA'
  188. elseif dayA >= 10 and financeA = 0 and giftDayA < (dayA - giftNum):
  189. giftrand = rand(0, 2)
  190. if giftrand <= financeA:
  191. giftDayA = dayA
  192. giftNum += 1
  193. gift = rand(bfa * 5, bfa * 10)
  194. if gift > 500:gift = 500
  195. giftNumA = giftNum
  196. money += gift
  197. '<<$boyA>> reached into his pocket and pulled out a gift for you. He gave you <<gift>> <b>₽</b>.'
  198. end
  199. end
  200. '<<$boybody>> <<$boybod>> <<$boyface>> walks up to you and wants to kiss you.'
  201. if venera < 4 and spdirtyv = 0:
  202. !!cumlip
  203. act 'Kiss with tongue':
  204. cla
  205. if spdirtyb = 0:
  206. '<center><img src="images/etogame/kiss.jpg"></center>'
  207. if harakBoyA = 0:bfa -= 2 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> blushed and pulled away.'
  208. if harakBoyA = 1:bfa -= 1 & 'You pressed your <<$meetlip>> to solid lips male mouth open and thrust his tongue into his mouth. <<$boyA>> gently obsasal your language.'
  209. if harakBoyA = 2: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.'
  210. act 'Finish the kiss':xgt 'meet', 'a'
  211. exit
  212. elseif spdirtyb > 0:
  213. '<center><img src="images/etogame/cumlip.jpg"></center>'
  214. '<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pull away. "What is it?" he asked, "Do you smell mouth sperm."'
  215. if izvrat = 1:
  216. bfa += 5
  217. DOM += 1
  218. '<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'
  219. act 'Finish the kiss':xgt 'meet', 'a'
  220. exit
  221. else
  222. bfa = 0
  223. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  224. act 'Leave':gt 'street'
  225. exit
  226. end
  227. end
  228. end
  229. act 'Kiss on the lips':
  230. cla
  231. if cumlip = 0:
  232. '<center><img src="images/etogame/kiss1.jpg"></center>'
  233. if harakBoyA = 0:'You framed to kiss her lips and <<$boyA>> a little embarrassed kissed you.'
  234. if harakBoyA = 1:bfa += 2 & 'You framed for a kiss lips <<$boyA>> quickly kissed you.'
  235. if harakBoyA = 2:bfa -= 1 & 'You framed for a kiss lips <<$boyA>> juicy kiss you, pressing his lips to your firm <<$meetlip>>.'
  236. act 'Finish the kiss':xgt 'meet', 'a'
  237. exit
  238. elseif spdirtyb > 0:
  239. '<center><img src="images/etogame/cumlip.jpg"></center>'
  240. '<<$boyA>> kissed you in your smelling sperm <<$meetlip>> and pull away. "What is it?" he asked, "Do you smell mouth sperm."'
  241. if izvrat = 1:
  242. bfa += 5
  243. DOM += 1
  244. '<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'
  245. act 'Finish the kiss':xgt 'meet', 'a'
  246. exit
  247. else
  248. boya = 0
  249. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  250. act 'Leave':gt 'street'
  251. exit
  252. end
  253. end
  254. end
  255. act 'Kiss on the cheek':
  256. cla
  257. DOM += 1
  258. '<center><img src="images/etogame/kiss2.jpg"></center>'
  259. if harakBoyA = 0:bfa += 1 & 'You framed and cheek <<$boyA>> timidly kissed you.'
  260. if harakBoyA = 1:'You framed and cheek <<$boyA>> you kissed.'
  261. if harakBoyA = 2:bfa -= 2 & 'You framed and cheek <<$boyA>> kissed you discouraged with views.'
  262. if giftDayA = dayA:
  263. bfa -= 3
  264. if harakBoyA = 0:'<<$boyA>> looks upset.'
  265. if harakBoyA = 1:'<<$boyA>> looks offended.'
  266. if harakBoyA = 2:'<<$boyA>> looks angry.'
  267. end
  268. act 'Finish the kiss':xgt 'meet', 'a'
  269. exit
  270. end
  271. act 'Do not kiss':
  272. cla
  273. DOM += 2
  274. if harakBoyA = 0:bfa -= 1 & 'You nodded and said hello, <<$boyA>> get confused and blushed slightly.'
  275. if harakBoyA = 1:bfa -= 2 & 'You nodded and said hello <<$boyA>> frowned slightly.'
  276. if harakBoyA = 2:bfa -= 3 & 'You nodded and said hello <<$boyA>> chuckled and grinned.'
  277. if giftDayA = dayA:
  278. bfa -= 3
  279. if harakBoyA = 0:'<<$boyA>> looks upset.'
  280. if harakBoyA = 1:'<<$boyA>> looks offended.'
  281. if harakBoyA = 2:'<<$boyA>> looks angry.'
  282. end
  283. act 'Next':xgt 'meet', 'a'
  284. exit
  285. end
  286. elseif venera >= 4:
  287. bfa = 0
  288. '<center><img src="images/etogame/venera.jpg"></center>'
  289. '<<$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."'
  290. act 'Leave':gt 'street'
  291. exit
  292. elseif spdirtyv > 0:
  293. '<center><img src="images/etogame/cumface.jpg"></center>'
  294. '<<$boyA>> take a closer look at you and said, "What have you got stuck in your hair? Is that sperm?"'
  295. if izvrat = 1:
  296. bfa += 5
  297. DOM += 1
  298. '<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'
  299. act 'Yes it is the sperm still have questions?':
  300. cla
  301. gs 'stat'
  302. '(You) - Yes, it''s sperm still have questions?'
  303. '<<$boyA>> shook his head.'
  304. xgt 'meet', 'a'
  305. end
  306. exit
  307. else
  308. boya = 0
  309. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  310. act 'Leave':gt 'street'
  311. exit
  312. end
  313. end
  314. end
  315. if $ARGS[0] = 'a':
  316. if spdirtyc > 0:
  317. '"Hey, what are you smeared?" asked <<$boyA>> looking at your ass. "It''s sperm!"'
  318. if izvrat = 1:
  319. bfa += 5
  320. DOM += 1
  321. '<<$boyA>> blushed and lowered his eyes, you''ll clearly see how he formed a mound on his trousers.'
  322. else
  323. bfa = 0
  324. '<<$boyA>> angry you threw myself "Oh, you dirty whore! Get lost, that I would not see you anymore, all we had done for!"'
  325. act 'Leave':gt 'street'
  326. exit
  327. end
  328. end
  329. if financeA = 0:
  330. if ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and PCloSkirt > 0:
  331. bfa -= (harakBoyA + 1)
  332. '"And you dress smartly, " remarked skeptical <<$boyA>> looking at your expensive dress.'
  333. end
  334. if PCloSkirtShortness > 0 or $clothingworntype = 'exercise':
  335. bfa += (harakBoyA + 1)
  336. '"A classy outfit, " said <<$boyA>>'
  337. end
  338. mesorand = rand(0, 1)
  339. if mesorand = 0:
  340. '<<$boyA>> offered you a beer in the stairwell.'
  341. act 'Sorry, but I urgently need to escape':
  342. cla
  343. bfa -= (harakBoyA + 1)
  344. gt 'street'
  345. end
  346. act 'Come on':gt 'podezdM', 'start'
  347. exit
  348. elseif mesorand = 1:
  349. '<<$boyA>> suggest that you take a walk in the park.'
  350. act 'Sorry, but I urgently need to escape':
  351. cla
  352. bfa -= (harakBoyA + 1)
  353. gt 'street'
  354. end
  355. act 'Come on':gt 'parkM', 'start'
  356. exit
  357. end
  358. elseif financeA = 1:
  359. if ($clothingworntype = 'expensive' or $clothingworntype = 'formal'):
  360. boyA += (harakBoyA + 1)
  361. '"Great clothes, " said admiringly <<$boyA>>.'
  362. end
  363. if $clothingworntype = 'exercise':
  364. bfa -= (harakBoyA + 1)
  365. '"And you''re athletic girl" skeptical noticed <<$boyA>> looking at your clothes.'
  366. end
  367. mesorand = rand(0, 2)
  368. if mesorand = 0:
  369. '<<$boyA>> suggest that you go to the movies.'
  370. act 'Sorry, but I urgently need to escape':
  371. cla
  372. bfa -= (harakBoyA + 1)
  373. gt 'street'
  374. end
  375. act 'Come on':gt 'kinoM', 'start'
  376. exit
  377. elseif mesorand = 1:
  378. '<<$boyA>> suggest that you take a walk in the park'
  379. act 'Sorry, but I urgently need to escape.':
  380. cla
  381. bfa -= (harakBoyA + 1)
  382. gt 'street'
  383. end
  384. act 'Come on':gt 'parkM', 'start'
  385. exit
  386. elseif mesorand = 2:
  387. '<<$boyA>> suggest that you sit in a cafe.'
  388. act 'Sorry, but I urgently need to escape.':
  389. cla
  390. bfa -= (harakBoyA + 1)
  391. gt 'street'
  392. end
  393. act 'Come on':gt 'kafeM', 'start'
  394. exit
  395. end
  396. elseif financeA = 2:
  397. if ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and PCloSkirt > 0:
  398. bfa += (harakBoyA + 1)
  399. '"You''ve got great taste in clothes, " said admiringly <<$boyA>> looking at your expensive dress.'
  400. elseif $clothingworntype ! 'expensive' and $clothingworntype ! 'formal':
  401. bfa -= harakBoyA + 1
  402. '"Dear naryadets" remarked skeptical <<$boyA>> examining your unpretentious clothes.'
  403. end
  404. mesorand = rand(0, 1)
  405. if mesorand = 0:
  406. '<<$boyA>> suggest that you go to a cafe.'
  407. act 'Sorry, but I urgently need to escape':
  408. cla
  409. bfa -= (harakBoyA + 1)
  410. gt 'street'
  411. end
  412. act 'Come on':gt 'kafeM', 'start'
  413. exit
  414. elseif mesorand = 1:
  415. '<<$boyA>> suggest that you go to a restaurant.'
  416. act 'Sorry, but I urgently need to escape':
  417. cla
  418. bfa -= (harakBoyA + 1)
  419. gt 'street'
  420. end
  421. act 'Come on':gt 'restoranM', 'start'
  422. exit
  423. end
  424. end
  425. end
  426. --- meet ---------------------------------