1
0

svi 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618
  1. # svi
  2. if $ARGS[0] = 'poor':
  3. set minut += 20
  4. if Venera >= 3:
  5. set bfA = 0
  6. '<<$boyA>> you saw signs of venereal disease and dumped you.'
  7. act 'Leave':gt 'street'
  8. exit
  9. end
  10. if sweat > 1:
  11. !!sweating
  12. set bfA -= 1
  13. if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
  14. if harakBoyA = 1:'<<$boyA>> wrinkles her nose in disgust and tells you that he appeared urgent business.'
  15. if harakBoyA = 2:'<<$boyA>> tells you that you would not hurt to wash.'
  16. if harakBoyA = 3:'<<$boyA>> tells you that it appeared urgent business.'
  17. if harakBoyA = 4:'<<$boyA>> wrinkles her nose in disgust and tells you that she appeared urgent business.'
  18. if harakBoyA = 5:'<<$boyA>> tells you that you would not hurt to wash.'
  19. act 'Leave':gt 'steet'
  20. exit
  21. end
  22. if vatnik = 2:
  23. !!quilted_jacket
  24. set bfA -= 1
  25. if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
  26. if harakBoyA = 1:'<<$boyA>> scornfully looks at you and tells you that they have any urgent matters.'
  27. if harakBoyA = 2:'<<$boyA>> tells you that you are in rags like a scarecrow.'
  28. if harakBoyA = 3:'<<$boyA>> tells you that it appeared urgent business.'
  29. if harakBoyA = 4:'<<$boyA>> scornfully looks at you and tells you that she had her urgent business.'
  30. if harakBoyA = 5:'<<$boyA>> tells you that you are in rags like a scarecrow.'
  31. act 'Leave':gt 'street'
  32. exit
  33. end
  34. if harakBoyA > 0 and izvrat = 0 and (cumface > 0 or cumlip > 0):
  35. set bfA = 0
  36. '<<$boyA>> you saw traces of semen. He called you slut had severed relations with you.'
  37. act 'Leave':gt 'street'
  38. exit
  39. end
  40. if daya < 10 and boyonceA = 0:
  41. !!candy buketny period
  42. set vstrand = rand(0, 2)
  43. if vstrand = 0:
  44. '<<$boyA>> offers a walk in the park.'
  45. act 'Walk in the park':
  46. cla
  47. set minut += 60
  48. set fat += 1
  49. set bfA += 1
  50. 'You walked in the park with a guy. <<$boyA>> telling stories and jokes hunted.'
  51. act 'To invite':
  52. cla
  53. if dayA < 3:set bfA -= 1
  54. gt 'svidan', 'kvartA'
  55. end
  56. act 'Say goodbye and go home':
  57. cla
  58. set bfA += 1
  59. gt 'street'
  60. end
  61. end
  62. act 'Refuse':
  63. cla
  64. set bfA -= 1
  65. gt 'street'
  66. end
  67. end
  68. if vstrand = 1:
  69. '<<$boyA>> offers to go to the cinema.'
  70. act 'Go to the cinema':
  71. cla
  72. set minut += 60
  73. set fat += 1
  74. set bfA += 1
  75. 'You went to the cinema for a new movie. <<$boyA>> hug you.'
  76. act 'Hug his hand':
  77. cla
  78. 'You watch a movie guy hugging hand. Finally the film ends.'
  79. set bfA += 1
  80. act 'To invite':
  81. cla
  82. if dayA < 3:set bfA -= 1
  83. gt 'svidan', 'kvartA'
  84. end
  85. act 'Say goodbye and go home':
  86. cla
  87. set bfA += 1
  88. gt 'street'
  89. end
  90. end
  91. end
  92. act 'Refuse':
  93. cla
  94. set bfA -= 1
  95. gt 'street'
  96. end
  97. end
  98. if vstrand = 2:
  99. '<<$boyA>> offers a drink pivasika in porch.'
  100. act 'Drink beer':
  101. cla
  102. set minut += 60
  103. set fat += 1
  104. set bfA += 1
  105. '<<$boyA>> bought pivasika and crackers and you went with him to the porch, where drinking and fun chatting.'
  106. act 'To invite':
  107. cla
  108. if dayA < 3:set bfA -= 1
  109. gt 'svidan', 'kvartA'
  110. end
  111. act 'Say goodbye and go home':
  112. cla
  113. set bfA += 1
  114. gt 'street'
  115. end
  116. end
  117. act 'Refuse':
  118. cla
  119. set bfA -= 1
  120. gt 'street'
  121. end
  122. end
  123. end
  124. if daya >= 10 and boyonceA = 0:
  125. '<<$boyA>> says he´s a grown man and he is not satisfied platonic relationship.'
  126. act 'Leave':
  127. cla
  128. set bfA = 0
  129. gt 'street'
  130. end
  131. act 'Agrees to have sex':
  132. cla
  133. *clr
  134. set minut += 20
  135. 'You agreed to have sex. <<$boyA>> happy.'
  136. act 'Go to your apartment':gt 'svidan', 'kvartA'
  137. act 'Go into the bushes':gt 'svidan', 'kustA'
  138. end
  139. exit
  140. end
  141. if dayA > 15:gs 'boylove', 'haer'
  142. if dayA > 30:gs 'boylove', 'figure'
  143. if dayA > 60:gs 'boylove', 'tits'
  144. if boyonceA > 0:
  145. '<<$boyA>> offers to hang out in the stairwell with pivasikom.'
  146. act 'Potusit':
  147. cla
  148. set minut += 60
  149. set fat += 1
  150. set bfA += 1
  151. 'You drank beer in the stairwell with her boyfriend. <<$boyA>> hugged you and said that he wants you.'
  152. act 'Go to your apartment':gt 'svidan', 'kvartA'
  153. act 'Go into the bushes':gt 'svidan', 'kustA'
  154. end
  155. act 'Refuse':
  156. cla
  157. set bfA -= 1
  158. gt 'street'
  159. end
  160. end
  161. end
  162. if $ARGS[0] = 'norm':
  163. set minut += 20
  164. if Venera >= 3:
  165. set bfA = 0
  166. '<<$boyA>> you saw signs of venereal disease and dumped you.'
  167. act 'Leave':gt 'street'
  168. exit
  169. end
  170. if sweat > 1:
  171. !!sweating
  172. set bfA -= 1
  173. if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
  174. if harakBoyA = 1:'<<$boyA>> wrinkles her nose in disgust and tells you that he appeared urgent business.'
  175. if harakBoyA = 2:'<<$boyA>> tells you that you would not hurt to wash.'
  176. act 'Leave':gt 'street'
  177. exit
  178. end
  179. if vatnik = 2:
  180. !!quilted_jacket
  181. set bfA -= 1
  182. if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
  183. if harakBoyA = 1:'<<$boyA>> scornfully looks at you and tells you that they have any urgent matters.'
  184. if harakBoyA = 2:'<<$boyA>> tells you that you are in rags like a scarecrow.'
  185. act 'Leave':gt 'street'
  186. exit
  187. end
  188. if harakBoyA > 0 and izvrat = 0 and (cumface > 0 or cumlip > 0):
  189. set bfA = 0
  190. '<<$boyA>> you saw traces of semen. He called you slut had severed relations with you.'
  191. act 'Leave':gt 'street'
  192. exit
  193. end
  194. if daya < 10 and boyonceA = 0:
  195. !!candy buketny period
  196. set vstrand = rand(0, 2)
  197. if vstrand = 0:
  198. '<<$boyA>> offers to go to the cafe.'
  199. act 'Go to the cafe':
  200. cla
  201. set minut += 60
  202. set fat += 1
  203. set bfA += 1
  204. 'You went to a cafe with a guy. <<$boyA>> telling stories and jokes hunted.'
  205. act 'To invite':
  206. cla
  207. if dayA < 3:set bfA -= 1
  208. gt 'svidan', 'kvartA'
  209. end
  210. act 'Say goodbye and go home':
  211. cla
  212. set bfA += 1
  213. gt 'street'
  214. end
  215. end
  216. act 'Refuse':
  217. cla
  218. set bfA -= 1
  219. gt 'street'
  220. end
  221. end
  222. if vstrand = 1:
  223. '<<$boyA>> offers to go to the cinema.'
  224. act 'Go to the cinema':
  225. cla
  226. set minut += 60
  227. set fat += 1
  228. set bfA += 1
  229. 'You went to the cinema for a new movie. <<$boyA>> hug you.'
  230. act 'Hug his hand':
  231. cla
  232. 'You watch a movie guy hugging hand. Finally the film ends.'
  233. set bfA += 1
  234. act 'To invite':
  235. cla
  236. if dayA < 3:set bfA -= 1
  237. gt 'svidan', 'kvartA'
  238. end
  239. act 'Say goodbye and go home':
  240. cla
  241. set bfA += 1
  242. gt 'street'
  243. end
  244. end
  245. end
  246. act 'Refuse':
  247. cla
  248. set bfA -= 1
  249. gt 'street'
  250. end
  251. end
  252. if vstrand = 2:
  253. '<<$boyA>> provides for a walk.'
  254. act 'Walk':
  255. cla
  256. set minut += 60
  257. set fat += 1
  258. set bfA += 1
  259. '<<$boyA>> to take you by the arm and you were walking down the street talking.'
  260. act 'To invite':
  261. cla
  262. if dayA < 3:set bfA -= 1
  263. gt 'svidan', 'kvartA'
  264. end
  265. act 'Say goodbye and go home':
  266. cla
  267. set bfA += 1
  268. gt 'street'
  269. end
  270. end
  271. act 'Refuse':
  272. cla
  273. set bfA -= 1
  274. gt 'street'
  275. end
  276. end
  277. end
  278. if daya >= 10 and boyonceA = 0:
  279. '<<$boyA>> says he´s a grown man and he is not satisfied platonic relationship.'
  280. act 'Leave':
  281. cla
  282. set bfA = 0
  283. gt 'street'
  284. end
  285. act 'Agrees to have sex':
  286. cla
  287. *clr
  288. set minut += 20
  289. 'You agreed to have sex. <<$boyA>> happy.'
  290. act 'Go to your apartment':gt 'svidan', 'kvartA'
  291. act 'Go in his car':gt 'svidan', 'carA'
  292. end
  293. exit
  294. end
  295. if dayA > 12 and skin < 2:set bfA -= 1
  296. if dayA > 12:gs 'boylove', 'haer'
  297. if dayA > 24:gs 'boylove', 'figure'
  298. if dayA > 48:gs 'boylove', 'tits'
  299. if dayA > 22 and glaraz < 1:set bfA -= 1
  300. if dayA > 40 and lip < 1:set bfA -= 1
  301. if boyonceA > 0:
  302. '<<$boyA>> offers sit in a cafe.'
  303. act 'The cafe':
  304. cla
  305. set minut += 60
  306. set fat += 1
  307. set bfA += 1
  308. 'You came to the cafe <<$boyA>> ordered a full table and you sat talking and having fun. <<$boyA>> hugged you and said that he wants you.'
  309. act 'Go to your apartment':gt 'svidan', 'kvartA'
  310. act 'Go in his car':gt 'svidan', 'carA'
  311. end
  312. act 'Refuse':
  313. cla
  314. set bfA -= 1
  315. gt 'street'
  316. end
  317. end
  318. end
  319. if $ARGS[0] = 'reach':
  320. set minut += 20
  321. if Venera >= 3:
  322. set bfA = 0
  323. '<<$boyA>> you saw signs of venereal disease and dumped you.'
  324. act 'Leave':gt 'street'
  325. exit
  326. end
  327. if sweat > 1:
  328. !!вsweating
  329. set bfA -= 1
  330. if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
  331. if harakBoyA = 1:'<<$boyA>> wrinkles her nose in disgust and tells you that he appeared urgent business.'
  332. if harakBoyA = 2:'<<$boyA>> tells you that you would not hurt to wash.'
  333. act 'Leave':gt 'street'
  334. exit
  335. end
  336. if vatnik = 2:
  337. !!quilted_jacket
  338. set bfA -= 1
  339. if harakBoyA = 0:'<<$boyA>> tells you that he appeared urgent business.'
  340. if harakBoyA = 1:'<<$boyA>> scornfully looks at you and tells you that they have any urgent matters.'
  341. if harakBoyA = 2:'<<$boyA>> tells you that you are in rags like a scarecrow.'
  342. act 'Leave':gt 'street'
  343. exit
  344. end
  345. if harakBoyA > 0 and izvrat = 0 and (cumface > 0 or cumlip > 0):
  346. set bfA = 0
  347. '<<$boyA>> you saw traces of semen. He called you slut had severed relations with you.'
  348. act 'Leave':gt 'street'
  349. exit
  350. end
  351. if dayA > 5 and skin < 3:set bfA -= 1
  352. if dayA > 10:gs 'boylove', 'haer'
  353. if dayA > 20:gs 'boylove', 'figure'
  354. if dayA > 30:gs 'boylove', 'tits'
  355. if dayA > 10 and glaraz < 2:set bfA -= 1
  356. if dayA > 6 and lip < 2:set bfA -= 1
  357. if dayA > 8 and resnic < 1:set bfA -= 1
  358. if daya < 10 and boyonceA = 0:
  359. !!candy buketny period
  360. set vstrand = rand(0, 2)
  361. if vstrand = 0:
  362. '<<$boyA>> offers to go to the cafe.'
  363. act 'Go to the cafe':
  364. cla
  365. set minut += 60
  366. set fat += 1
  367. set bfA += 1
  368. 'You went to a cafe with a guy. <<$boyA>> telling stories and jokes hunted.'
  369. act 'To invite':
  370. cla
  371. if dayA < 3:set bfA -= 1
  372. gt 'svidan', 'kvartA'
  373. end
  374. act 'Say goodbye and go home':
  375. cla
  376. set bfA += 1
  377. gt 'street'
  378. end
  379. end
  380. act 'Refuse':
  381. cla
  382. set bfA -= 1
  383. gt 'street'
  384. end
  385. end
  386. if vstrand = 1:
  387. '<<$boyA>> offers to go to the cinema.'
  388. act 'Go to the cinema':
  389. cla
  390. set minut += 60
  391. set fat += 1
  392. set bfA += 1
  393. 'You went to the cinema for a new movie. <<$boyA>> hug you.'
  394. act 'Hug his hand':
  395. cla
  396. 'You watch a movie guy hugging hand. Finally the film ends.'
  397. set bfA += 1
  398. act 'To invite':
  399. cla
  400. if dayA < 3:set bfA -= 1
  401. gt 'svidan', 'kvartA'
  402. end
  403. act 'Say goodbye and go home':
  404. cla
  405. set bfA += 1
  406. gt 'street'
  407. end
  408. end
  409. end
  410. act 'Refuse':
  411. cla
  412. set bfA -= 1
  413. gt 'street'
  414. end
  415. end
  416. if vstrand = 2:
  417. '<<$boyA>> offers to go to the restaurant.'
  418. act 'Go to the restaurant':
  419. cla
  420. set minut += 60
  421. set fat += 1
  422. set bfA += 1
  423. '<<$boyA>> has led you to the restaurant. There waiter quickly covered table and you sat enjoying the food, wine and socializing'
  424. act 'To invite':
  425. cla
  426. if dayA < 3:set bfA -= 1
  427. gt 'svidan', 'kvartA'
  428. end
  429. act 'Say goodbye and go home':
  430. cla
  431. set bfA += 1
  432. gt 'street'
  433. end
  434. end
  435. act 'Refuse':
  436. cla
  437. set bfA -= 1
  438. gt 'street'
  439. end
  440. end
  441. end
  442. if daya >= 10 and boyonceA = 0:
  443. '<<$boyA>> says he´s a grown man and he is not satisfied platonic relationship.'
  444. act 'Leave':
  445. cla
  446. set bfA = 0
  447. gt 'street'
  448. end
  449. act 'Agrees to have sex':
  450. cla
  451. *clr
  452. set minut += 20
  453. 'You agreed to have sex. <<$boyA>> happy.'
  454. act 'Go to your apartment':gt 'svidan', 'kvartA'
  455. act 'Go to him':gt 'svidan', 'hisA'
  456. end
  457. exit
  458. end
  459. if boyonceA > 0:
  460. '<<$boyA>> offers sit in a cafe.'
  461. act 'The cafe':
  462. cla
  463. set minut += 60
  464. set fat += 1
  465. set bfA += 1
  466. 'You came to the cafe <<$boyA>> ordered a full table and you sat talking and having fun. <<$boyA>> hugged you and said that he wants you.'
  467. act 'Go to your apartment':gt 'svidan', 'kvartA'
  468. act 'Go to him':gt 'svidan', 'hisA'
  469. end
  470. act 'Refuse':
  471. cla
  472. set bfA -= 1
  473. gt 'street'
  474. end
  475. end
  476. end
  477. --- svi ---------------------------------