foto_shoot.tw 51 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071
  1. :: foto_shoot
  2. <<set $here = 'foto_shoot'>>
  3. <<set $ARGS = $location_var[$here]>>
  4. <!-- !! ------------------------------------------------------------------------------------------------------>
  5. <!-- !!-->
  6. <!-- !! --------------------------------------- Job Requests ------------------------------------------------->
  7. <!-- !!-->
  8. <!-- !! ------------------------------------------------------------------------------------------------------>
  9. <<if $location_var[$here][0] == 'model'>>
  10. <<set $menu_off = 1>>
  11. <<if getvar("$model['status']") == 0>>
  12. <<setinit $model['status'] = 1>>
  13. <</if>>
  14. <<set $time.minutes += 5>>
  15. <<set $modelpay = ($pc.skillLevel("modelling") / 2 * 10) + ((min(fame['city_modelling'], 700) + pcs_apprnc)/2)>>
  16. <<set $modelpayfin = 900 + (15*rand(0,5))>>
  17. <h2>Manager</h2>
  18. <<image "locations/city/citycenter/photo/fotograph.jpg">>
  19. <p>"Hello $model['firstname']. Are you here to work? What kind of shoot would you like to do today?"</p>
  20. <!-- FAILED TO CONVERT
  21. !! '<a href="exec:gs ''shortgs'',''msg'',''There are three types of shoots: Catalog, Fashion, and Glamour. A catalog shoot is any shoot that is meant to appear in a shopping magazine or online catalog. They don''t do much for your fame but the base pay is steady. A fashion shoot is more stylized and though the base pay is not as high, there will be a bonus tip based on your modelling skill and fame. A glamour shoot will always involve nudity or risqué clothing and will typically be erotic in nature. This type of modelling will have good pay with good bonuses based on skill and fame, but also will spread your fame beyond the city far more quickly. If you grew up in a small town outside St. Petersburg, the pictures may reach its populace sooner rather than later.''">Modelling Shoot Guide</a>'
  22. -----
  23. <!-- !! '<<link "Modelling Shoot Guide">><<gs 'shortgs' 'msg' ERROR: FAILED TO CONVERT LITERAL: """''There are three types of shoots: Catalog""" $Fashion and Glamour. A catalog shoot is any shoot that is meant to appear in a shopping magazine or online catalog. They don't do much for your fame but the base pay is steady. A fashion shoot is more stylized and though the base pay is not as high there will be a bonus tip based on your % elling skill and fame. A glamour shoot will always involve nudity or risqué clothing and will typically be erotic in nature. This type of % elling will have good pay with good bonuses based on skill and fame but also will spread your fame beyond the city far more quickly. If you grew up in a small town outside St. Petersburg the pictures may reach its populace sooner rather than later.''>><</link>>'-->
  24. -->
  25. <<warn "CONVERSION ERROR 6a6ebf68c869889216d113466f14b94c">>
  26. <center><b><font color="blue">Modelling guide</font></b></center>
  27. <p><b>Catalog</b> - A catalog shoot is any shoot that is meant to appear in a basic paper or online catalog. They don't do much for your fame but the base pay is steady.</p>
  28. <p><b>Fashion</b> - A fashion shoot is more stylized and though the base pay is not as high, there will be a higher bonus based on your modelling skill and fame.</p>
  29. <p><b>Glamour</b> - A glamour shoot will always involve nudity or risqué clothing, though will always be artistic in nature. This type of modelling will have good pay with good bonuses based on skill and fame, but also will spread your fame beyond the city far more quickly. If you grew up in a small town outside St. Petersburg, the pictures may reach its populace sooner rather than later.</p>
  30. <p><b>Erotic</b> - An erotic shoot makes no excuses about its purpose. The intent is to capture sexual images of female bodies to sell to pornography sites and erotic magazines. This type of modelling will have the highest bonuses based on your appearance but will also increase your fame in the porn industry as well.</p>
  31. <!-- FAILED TO CONVERT
  32. *p '</table></center>'
  33. -----
  34. * ERROR: FAILED TO CONVERT LITERAL: """p '<""" / ERROR: FAILED TO CONVERT LITERAL: """table><""" / ERROR: FAILED TO CONVERT LITERAL: """center>'"""
  35. -->
  36. <<warn "CONVERSION ERROR 91d9c871a97e42e2438284ded49a4481">>
  37. <<actCLA 'Never mind'>>
  38. <h2>Manager</h2>
  39. <<image "locations/city/citycenter/photo/fotograph.jpg">>
  40. <p>"Sorry, I just realized that I have something to do right now. Can I come back later?"</p>
  41. <p>"Sure, no problem $pc.name_last, just let us know when you're ready to work."</p>
  42. <<actCLA 'Leave'>>
  43. <<gt 'foto' 'studio'>>
  44. <</actCLA>>
  45. <</actCLA>>
  46. <<actCLA 'Actually I`d like to practice'>>
  47. <<gt 'foto_practice' 'start'>>
  48. <</actCLA>>
  49. <<actCLA '"I`d like to do a catalog shoot"'>>
  50. <<if getvar("$modelfoto['shoots']") >= 10 and $pc.skillLevel("modelling") > 20 and getvar("$modelfoto['fashion']") < 1>>
  51. <<gt 'foto_events' 'fashion_persuasion'>>
  52. <</if>>
  53. <<image "locations/city/citycenter/photo/fotograph.jpg">>
  54. <p>"Alright, what kind of shoot? Clothing or swimsuits?"</p>
  55. <<actCLA 'Clothing'>>
  56. <<setinit $modelfoto['shoot_type'] = 'catalog'>>
  57. <<setinit $modelfoto['shoots'] += 1>>
  58. <<set $model_week = ($time.daystart - $time.weekday) / 7>>
  59. <<setinit $modelfoto['catalog'] += 1>>
  60. <<set $model_job_week += 1>>
  61. <<run $pc.skillExperienceGain('modelling',rand(2,5))>>
  62. <<run $pc.fameInc('city','modelling','tiny')>>
  63. <<set $time.minutes += 120>>
  64. <<set $finances.cash += 450>>
  65. <<setinit $modelfoto['earnings'] += 450>>
  66. <<if rand(1,2) == 1>>
  67. <<video "locations/city/citycenter/photo/catalog/1.mp4">>
  68. You spend two hours modelling various tights with tops for the online catalogs of retail clothing stores. You change clothes probably 30 times over the shoot, but always wear the same expression. It's boring but it still gets you paid.
  69. <<else>>
  70. <<video "locations/city/citycenter/photo/catalog/2.mp4">>
  71. You spend two hours modelling various dresses for the online catalogs of retail clothing stores. You change clothes probably 30 times over the shoot, but always wear the same expression. It's boring but it still gets you paid.
  72. <</if>>
  73. <p>You recieve 450 <b>₽</b> for the job.</p>
  74. <<actCLA 'Leave'>>
  75. <<gt 'foto' 'studio'>>
  76. <</actCLA>>
  77. <</actCLA>>
  78. <<actCLA 'Swimsuits'>>
  79. <<setinit $modelfoto['shoot_type'] = 'swim_catalog'>>
  80. <<setinit $modelfoto['shoots'] += 1>>
  81. <<set $model_week = ($time.daystart - $time.weekday) / 7>>
  82. <<setinit $modelfoto['catalog'] += 1>>
  83. <<set $model_job_week += 1>>
  84. <<run $pc.skillExperienceGain('modelling',rand(2,5))>>
  85. <<run $pc.fameInc('city','modelling','tiny')>>
  86. <<set $time.minutes += 120>>
  87. <<set $finances.cash += 450>>
  88. <<setinit $modelfoto['earnings'] += 450>>
  89. <<video "locations/city/citycenter/photo/bikini/#.mp4" 1 3>>
  90. <<set $bikinicatalog += 1>>
  91. You change in and out of various different bikinis, modelling them with the same pose and expression for use in online and department store catalogs.
  92. <p>You recieve 450 <b>₽</b> for the job.</p>
  93. <<actCLA 'Leave'>>
  94. <<gt 'foto' 'studio'>>
  95. <</actCLA>>
  96. <</actCLA>>
  97. <</actCLA>>
  98. <<actCLA '"I`d like to do a fashion shoot"'>>
  99. <<if $pc.skillLevel("modelling") < 20>>
  100. <<msg '"Sorry, but you aren""t a skilled enough model to do this kind of publication yet. Maybe get some practice in on your off days."'>>
  101. <<else>>
  102. <<image "locations/city/citycenter/photo/fotograph.jpg">>
  103. <p>"Alright, what kind of shoot would you like to do? Fashion, bikini, or lingerie?"</p>
  104. <<actCLA 'Fashion'>>
  105. <<setinit $modelfoto['shoot_type'] = 'fashion'>>
  106. <<if getvar("$modelfoto['fashion']") >= 10 and $modelfoto['bikini'] + getvar("$modelfoto['lingerie']") < 1 and getvar("$modelfoto['glamour']") < 1 and getvar("$modelfoto['nude']") < 1>>
  107. <<gt 'foto_events' 'lingerie_persuasion'>>
  108. <</if>>
  109. <<actCLA 'Look at something else'>>
  110. <<gt 'foto_shoot' 'model'>>
  111. <</actCLA>>
  112. <<actCLA 'Agree (2:00)'>>
  113. <<gt 'foto_shoot' 'fashion'>>
  114. <</actCLA>>
  115. <</actCLA>>
  116. <<actCLA 'Bikini'>>
  117. <<setinit $modelfoto['shoot_type'] = 'bikini'>>
  118. <<if $modelfoto['bikini'] + getvar("$modelfoto['lingerie']") >= 10 and $pc.skillLevel("modelling") > 20 and getvar("$modelfoto['glamour']") < 1 and getvar("$modelfoto['nude']") < 1>>
  119. <<gt 'foto_events' 'glamour_persuasion'>>
  120. <</if>>
  121. <<if $pc.pcs_inhib < 20>>
  122. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  123. <<actCLA 'Look at something else'>>
  124. <<gt 'foto_shoot' 'model'>>
  125. <</actCLA>>
  126. <<if $pc.skillLevel("modelling") > 20>>
  127. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  128. <<else>>
  129. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  130. <</if>>
  131. <<if $will_cost <= $pc.pcs_willpwr>>
  132. Or you could just force yourself do it anyways...
  133. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  134. <<gt 'foto_shoot' 'bikini'>>
  135. <</actCLA>>
  136. <</if>>
  137. <<else>>
  138. <<actCLA 'Look at something else'>>
  139. <<gt 'foto_shoot' 'model'>>
  140. <</actCLA>>
  141. <<actCLA 'Agree (2:00)'>>
  142. <<gt 'foto_shoot' 'bikini'>>
  143. <</actCLA>>
  144. <</if>>
  145. <</actCLA>>
  146. <<actCLA 'Lingerie modelling'>>
  147. <<setinit $modelfoto['shoot_type'] = 'lingerie'>>
  148. <<if $modelfoto['bikini'] + getvar("$modelfoto['lingerie']") >= 10 and getvar("$modelfoto['glamour']") < 1 and getvar("$modelfoto['nude']") < 1>>
  149. <<gt 'foto_events' 'glamour_persuasion'>>
  150. <</if>>
  151. <<if $pc.pcs_inhib < 25>>
  152. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  153. <<actCLA 'Look at something else'>>
  154. <<gt 'foto_shoot' 'model'>>
  155. <</actCLA>>
  156. <<if $pc.skillLevel("modelling") > 20>>
  157. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  158. <<else>>
  159. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  160. <</if>>
  161. <<if $will_cost <= $pc.pcs_willpwr>>
  162. Or you could just force yourself do it anyways...
  163. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  164. <<gt 'foto_shoot' 'lingerie'>>
  165. <</actCLA>>
  166. <</if>>
  167. <<else>>
  168. <<actCLA 'Look at something else'>>
  169. <<gt 'foto_shoot' 'model'>>
  170. <</actCLA>>
  171. <<actCLA 'Agree (2:00)'>>
  172. <<gt 'foto_shoot' 'lingerie'>>
  173. <</actCLA>>
  174. <</if>>
  175. <</actCLA>>
  176. <</if>>
  177. <</actCLA>>
  178. <<actCLA '"I`d like to do a glamour shoot"'>>
  179. <<if $pc.pcs_inhib < 30 and getvar("$modelfoto['glamour']") < 1>>
  180. <<msg 'You toy with the idea of exposing yourself on camera but then blush and realize you aren""t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you""re not ready to do it for real.'>>
  181. <<else>>
  182. <<gt 'foto_shoot' 'glamour_shoot'>>
  183. <</if>>
  184. <</actCLA>>
  185. <<actCLA '"I`d like to do a nude shoot"'>>
  186. <<if $pc.pcs_inhib < 30 and getvar("$modelfoto['nude']") < 1>>
  187. <<msg 'You toy with the idea of exposing yourself on camera but then blush and realize you aren""t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you""re not ready to do it for real.'>>
  188. <<else>>
  189. <<gt 'foto_shoot' 'nude_shoot'>>
  190. <</if>>
  191. <</actCLA>>
  192. <<if getvar("$Fit['FMR']") == 1>>
  193. <<actCLA '"I`d like to do a fitness shoot"'>>
  194. <<gt 'foto_shoot' 'fitness_shoot'>>
  195. <</actCLA>>
  196. <</if>>
  197. <</if>>
  198. <!-- !! 'Info guides:'-->
  199. <!-- !! '<<link "Erotic clothed">><<gs 'shortgs' 'msg' ''This type of shoot is not particularly more explicit but the clothes being % elled are inherently more sensual and will require some confidence to be able to wear them.''>><</link>>'-->
  200. <!-- !! '<<link "Topless">><<gs 'shortgs' 'msg' ''A topless shoot is any shoot that has you baring your breasts and shoulders while still wearing bottoms of some kind whether that be trousers $skirt or underwear.''>><</link>>'-->
  201. <!-- !! '<<link "Tasteful nude">><<gs 'shortgs' 'msg' ''A tastefully nude shoot is one that does not show genitals of any kind neither vagina or nipple. Your pay will be based more on your fame and appearance than your skill.''>><</link>>'-->
  202. <!-- !! '<<link "Topless nude">><<gs 'shortgs' 'msg' ''A topless nude shoot is one step further in eroticism while still maintaining class. Your nipples will be exposed but your vagina will remain hidden. It is considered erotic without being slutty like a character nude scene in a film. Skill plays a larger role in this type of shoot.''>><</link>>'-->
  203. <!-- !! '<<link "Fully nude">><<gs 'shortgs' 'msg' ''A fully nude shoot bares all. Your breasts $nipples and vagina will be visible. It is the most erotic gives the highest bonus from appearance and fame but will also spread your fame further and faster. If you are an aspiring star this may be good for your publicity. But if there are people you want to hide your work from this might reach them sooner than expected.''>><</link>>'-->
  204. <!-- !! act 'Erotic clothing with breast nudity':-->
  205. <!-- !!already matched the exhibitionism value above-->
  206. <!-- !! cla-->
  207. <!-- !! act 'Look at something else':gt 'foto_shoot','model'-->
  208. <!-- !! act 'Agree (2:00)':-->
  209. <!-- !! -->
  210. <!-- !! minut += 120-->
  211. <!-- !! modelpayfin = 700 + (modelpay) + (15*rand(0,5))-->
  212. <!-- !! modelfoto['nip'] += 1-->
  213. <!-- !! gs 'exp_gain', 'mdlng', rand(6,10)-->
  214. <!-- !! fame['city_modelling'] += rand(7,13)-->
  215. <!-- !! pav_modelling += rand(1,fame['city_modelling'])/10-->
  216. <!-- !! inhib_exp += 2-->
  217. <!-- !! -->
  218. <!-- !! '<<video "locations/city/citycenter/photo/model5.mp4">>'-->
  219. <!-- !! 'You dressed up in sexy clothes and spend the next two hours striking various poses for a photographer, your nipples occasionally slipping out from behind the clothing.'-->
  220. <!-- !! *nl-->
  221. <!-- !! 'After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'-->
  222. <!-- !! if pcs_mdlng >= 40 and commercial = 0:-->
  223. <!-- !! act 'Leave':gt'foto_events','commercial'-->
  224. <!-- !! else-->
  225. <!-- !! act 'Leave':gt 'foto', 'end'-->
  226. <!-- !! end-->
  227. <!-- !! end-->
  228. <!-- !! end-->
  229. <!-- !! ------------------------------------------------------------------------------------------------------>
  230. <!-- !!-->
  231. <!-- !! ------------------------------------- Glamour Requests ----------------------------------------------->
  232. <!-- !!-->
  233. <!-- !! ------------------------------------------------------------------------------------------------------>
  234. <<if $location_var[$here][0] == 'glamour_shoot'>>
  235. <<set $menu_off = 1>>
  236. <<image "locations/city/citycenter/photo/fotograph.jpg">>
  237. <p>"Alright, we can do that. What kind of glamour shoot?"</p>
  238. <<actCLA 'Sexy clothing'>>
  239. <<setinit $modelfoto['shoot_type'] = 'sexy_clo'>>
  240. <<if getvar("$modelfoto['sexy']") >= 10 and $modelfoto['trans_ling'] + getvar("$modelfoto['trans_ling']") < 1 and getvar("$modelfoto['nip']") < 1 and getvar("$modelfoto['nude']") < 1>>
  241. <<gt 'foto_events' 'trans_persuasion'>>
  242. <</if>>
  243. <<if $pc.pcs_inhib < 30>>
  244. <<if getvar("$modelfoto['sexy']") > 0>>
  245. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more</i> of these kinds of pictures of you floating around?</p>
  246. <<else>>
  247. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  248. <</if>>
  249. <<actCLA 'Look at something else'>>
  250. <<gt 'foto_shoot' 'model'>>
  251. <</actCLA>>
  252. <<actCLA 'Look at other glamour options'>>
  253. <<gt 'foto_shoot' 'glamour_shoot'>>
  254. <</actCLA>>
  255. <<if $pc.pcs_inhib > 20>>
  256. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  257. <<else>>
  258. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  259. <</if>>
  260. <<if $will_cost <= $pc.pcs_willpwr>>
  261. Or you could just force yourself do it anyways...
  262. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  263. <<gt 'foto_shoot' 'sexy'>>
  264. <</actCLA>>
  265. <</if>>
  266. <<else>>
  267. <<actCLA 'Look at something else'>>
  268. <<gt 'foto_shoot' 'model'>>
  269. <</actCLA>>
  270. <<actCLA 'Agree (2:00)'>>
  271. <<gt 'foto_shoot' 'sexy'>>
  272. <</actCLA>>
  273. <</if>>
  274. <</actCLA>>
  275. <<actCLA 'Transparent clothing'>>
  276. <<setinit $modelfoto['shoot_type'] = 'trans_clo'>>
  277. <<if $modelfoto['trans_ling'] + getvar("$modelfoto['transparent']") >= 5 and getvar("$modelfoto['topless']") < 1 and getvar("$modelfoto['nude']") < 1>>
  278. <<gt 'foto_events' 'topless_persuasion'>>
  279. <</if>>
  280. <<if $pc.pcs_inhib < 45>>
  281. <<if getvar("$modelfoto['transparent']") > 0>>
  282. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more</i> of these kinds of pictures of you floating around?</p>
  283. <<else>>
  284. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  285. <</if>>
  286. <<actCLA 'Look at something else'>>
  287. <<gt 'foto_shoot' 'model'>>
  288. <</actCLA>>
  289. <<actCLA 'Look at other glamour options'>>
  290. <<gt 'foto_shoot' 'glamour_shoot'>>
  291. <</actCLA>>
  292. <<if $pc.pcs_inhib > 40>>
  293. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  294. <<else>>
  295. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  296. <</if>>
  297. <<if $will_cost <= $pc.pcs_willpwr>>
  298. Or you could just force yourself do it anyways...
  299. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  300. <<gt 'foto_shoot' 'transparent'>>
  301. <</actCLA>>
  302. <</if>>
  303. <<else>>
  304. <<actCLA 'Not for me'>>
  305. <<gt 'foto' 'studio'>>
  306. <</actCLA>>
  307. <<actCLA 'Agree (2:00)'>>
  308. <<gt 'foto_shoot' 'transparent'>>
  309. <</actCLA>>
  310. <</if>>
  311. <</actCLA>>
  312. <<actCLA 'Transparent Lingerie'>>
  313. <<setinit $modelfoto['shoot_type'] = 'trans_ling'>>
  314. <<if $modelfoto['trans_ling'] + getvar("$modelfoto['transparent']") >= 5 and getvar("$modelfoto['topless']") < 1 and getvar("$modelfoto['nude']") < 1>>
  315. <<setinit $modelfoto['shoot_type'] = 'trans_ling'>> <<gt 'foto_events' 'topless_persuasion'>>
  316. <</if>>
  317. <<if $pc.pcs_inhib < 45>>
  318. <<if getvar("$modelfoto['trans_ling']") > 0>>
  319. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more</i> of these kinds of pictures of you floating around?</p>
  320. <<else>>
  321. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  322. <</if>>
  323. <<actCLA 'Look at something else'>>
  324. <<gt 'foto_shoot' 'model'>>
  325. <</actCLA>>
  326. <<actCLA 'Look at other glamour options'>>
  327. <<gt 'foto_shoot' 'glamour_shoot'>>
  328. <</actCLA>>
  329. <<if $pc.pcs_inhib > 40>>
  330. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  331. <<else>>
  332. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  333. <</if>>
  334. <<if $will_cost <= $pc.pcs_willpwr>>
  335. Or you could just force yourself do it anyways...
  336. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  337. <<gt 'foto_shoot' 'trans_ling'>>
  338. <</actCLA>>
  339. <</if>>
  340. <<else>>
  341. <<actCLA 'Not for me'>>
  342. <<gt 'foto' 'studio'>>
  343. <</actCLA>>
  344. <<actCLA 'Agree (2:00)'>>
  345. <<gt 'foto_shoot' 'trans_ling'>>
  346. <</actCLA>>
  347. <</if>>
  348. <</actCLA>>
  349. <<actCLA 'Topless'>>
  350. <<setinit $modelfoto['shoot_type'] = 'topless'>>
  351. <<if getvar("$modelfoto['topless']") >= 5 and getvar("$modelfoto['nude']") < 1>>
  352. <<gt 'foto_events' 'nude_persuasion'>>
  353. <</if>>
  354. <<if $pc.pcs_inhib < 50>>
  355. <<if getvar("$modelfoto['topless']") > 0>>
  356. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more</i> of these kinds of pictures of you floating around?</p>
  357. <<else>>
  358. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  359. <</if>>
  360. <<actCLA 'Look at something else'>>
  361. <<gt 'foto_shoot' 'model'>>
  362. <</actCLA>>
  363. <<actCLA 'Look at other glamour options'>>
  364. <<gt 'foto_shoot' 'glamour_shoot'>>
  365. <</actCLA>>
  366. <<if $pc.pcs_inhib > 45>>
  367. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  368. <<else>>
  369. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  370. <</if>>
  371. <<if $will_cost <= $pc.pcs_willpwr>>
  372. Or you could just force yourself do it anyways...
  373. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  374. <<gt 'foto_shoot' 'topless'>>
  375. <</actCLA>>
  376. <</if>>
  377. <<else>>
  378. <<actCLA 'Look at something else'>>
  379. <<gt 'foto_shoot' 'model'>>
  380. <</actCLA>>
  381. <<actCLA 'Agree (2:00)'>>
  382. <<gt 'foto_shoot' 'topless'>>
  383. <</actCLA>>
  384. <</if>>
  385. <</actCLA>>
  386. <</if>>
  387. <!-- !! ------------------------------------------------------------------------------------------------------>
  388. <!-- !!-->
  389. <!-- !! -------------------------------------- Nude Requests ------------------------------------------------->
  390. <!-- !!-->
  391. <!-- !! ------------------------------------------------------------------------------------------------------>
  392. <<if $location_var[$here][0] == 'nude_shoot'>>
  393. <<set $menu_off = 1>>
  394. <<image "locations/city/citycenter/photo/fotograph.jpg">>
  395. <p>"Alright, we can do that. What kind of nude shoot?"</p>
  396. <<actCLA 'Tasteful nude'>>
  397. <<setinit $modelfoto['shoot_type'] = 'taste_nude'>>
  398. <<if getvar("$modelfoto['tastenude']") >= 5 and ( % $elfoto['topless'] + % $elfoto['toplessnude'] + % $elfoto['fullnude']) < 1>>
  399. <<gt 'foto_events' 'nude_persuasion'>>
  400. <</if>>
  401. <<if $pc.pcs_inhib < 40>>
  402. <<if getvar("$modelfoto['tastenude']") > 0>>
  403. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more</i> of these kinds of pictures of you floating around?</p>
  404. <<else>>
  405. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  406. <</if>>
  407. <<actCLA 'Look at something else'>>
  408. <<gt 'foto_shoot' 'model'>>
  409. <</actCLA>>
  410. <<actCLA 'Look at other nude options'>>
  411. <<gt 'foto_shoot' 'nude_shoot'>>
  412. <</actCLA>>
  413. <<if $pc.pcs_inhib > 35>>
  414. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  415. <<else>>
  416. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  417. <</if>>
  418. <<if $will_cost <= $pc.pcs_willpwr>>
  419. Or you could just force yourself do it anyways...
  420. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  421. <<gt 'foto_shoot' 'tasteful'>>
  422. <</actCLA>>
  423. <</if>>
  424. <<else>>
  425. <<actCLA 'Look at something else'>>
  426. <<gt 'foto_shoot' 'model'>>
  427. <</actCLA>>
  428. <<actCLA 'Agree (2:00)'>>
  429. <<gt 'foto_shoot' 'tasteful'>>
  430. <</actCLA>>
  431. <</if>>
  432. <</actCLA>>
  433. <<actCLA 'Topless nude'>>
  434. <<setinit $modelfoto['shoot_type'] = 'top_nude'>>
  435. <<if getvar("$modelfoto['toplessnude']") >= 3 and getvar("$modelfoto['pussy']") < 1>>
  436. <<gt 'foto_events' 'nude_persuasion'>>
  437. <</if>>
  438. <<if $pc.pcs_inhib < 55>>
  439. <<if getvar("$modelfoto['toplessnude']") > 0>>
  440. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more</i> of these kinds of pictures of you floating around?</p>
  441. <<else>>
  442. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  443. <</if>>
  444. <<actCLA 'Look at something else'>>
  445. <<gt 'foto_shoot' 'model'>>
  446. <</actCLA>>
  447. <<actCLA 'Look at other nude options'>>
  448. <<gt 'foto_shoot' 'nude_shoot'>>
  449. <</actCLA>>
  450. <<if $pc.pcs_inhib > 50>>
  451. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  452. <<else>>
  453. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  454. <</if>>
  455. <<if $will_cost <= $pc.pcs_willpwr>>
  456. Or you could just force yourself do it anyways...
  457. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  458. <<gt 'foto_shoot' 'topless_nude'>>
  459. <</actCLA>>
  460. <</if>>
  461. <<else>>
  462. <<actCLA 'Look at something else'>>
  463. <<gt 'foto_shoot' 'model'>>
  464. <</actCLA>>
  465. <<actCLA 'Agree (2:00)'>>
  466. <<gt 'foto_shoot' 'topless_nude'>>
  467. <</actCLA>>
  468. <</if>>
  469. <</actCLA>>
  470. <<actCLA 'Full nude'>>
  471. <<setinit $modelfoto['shoot_type'] = 'full_nude'>>
  472. <<if getvar("$modelfoto['fullnude']") == 0>>
  473. <<gt 'foto_nude_debut' 'nude_debut_pre'>>
  474. <<elseif getvar("$modelfoto['fullnude']") > 0 and $modelfoto['first_nude_pre'] == ''>>
  475. <<gt 'foto_nude_debut' 'nude_debut_memory'>>
  476. <</if>>
  477. <<if $pc.pcs_inhib < 60>>
  478. <<if getvar("$modelfoto['fullnude']") > 0>>
  479. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more of these kinds of pictures of you floating around?</p>
  480. <<elseif getvar("$modelfoto['pussy']") < 1>>
  481. You think about asking to do this shoot but hesitate, not sure if you're ready to put pictures of your pussy all over the internet.
  482. <<else>>
  483. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  484. <</if>>
  485. <<actCLA 'Look at something else'>>
  486. <<gt 'foto_shoot' 'model'>>
  487. <</actCLA>>
  488. <<actCLA 'Look at other nude options'>>
  489. <<gt 'foto_shoot' 'nude_shoot'>>
  490. <</actCLA>>
  491. <<if $pc.pcs_inhib > 55>>
  492. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  493. <<else>>
  494. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  495. <</if>>
  496. <<if $will_cost <= $pc.pcs_willpwr>>
  497. Or you could just force yourself do it anyways...
  498. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  499. <<gt 'foto_shoot' 'nude'>>
  500. <</actCLA>>
  501. <</if>>
  502. <<else>>
  503. <<actCLA 'Look at something else'>>
  504. <<gt 'foto_shoot' 'model'>>
  505. <</actCLA>>
  506. <<actCLA 'Agree (2:00)'>>
  507. <<gt 'foto_shoot' 'nude'>>
  508. <</actCLA>>
  509. <</if>>
  510. <</actCLA>>
  511. <<actCLA 'Erotic'>>
  512. <<setinit $modelfoto['shoot_type'] = 'erotic'>>
  513. <<if $pc.pcs_inhib < 65>>
  514. <<if getvar("$modelfoto['pussy']") < 1>>
  515. <p>You think about asking to do this shoot but hesitate, not sure if you're ready to put pictures of your pussy and asshole all over the internet, especially ones that focus on them!</p>
  516. <<elseif getvar("$modelfoto['erotic']") >= 0>>
  517. <p>You think about asking to do this shoot but hesitate. You've done it before but still... Are you really comfortable with <i>more</i> of these kinds of pictures of you floating around?</p>
  518. <<else>>
  519. You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.
  520. <</if>>
  521. <<actCLA 'Look at something else'>>
  522. <<gt 'foto_shoot' 'model'>>
  523. <</actCLA>>
  524. <<actCLA 'Look at other nude options'>>
  525. <<gt 'foto_shoot' 'nude_shoot'>>
  526. <</actCLA>>
  527. <<if $pc.pcs_inhib > 60>>
  528. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'easy'>>
  529. <<else>>
  530. <<gs 'willpower' 'skill' 'pcs_inhib' 'self' 'hard'>>
  531. <</if>>
  532. <<if $will_cost <= $pc.pcs_willpwr>>
  533. Or you could just force yourself do it anyways...
  534. <<actCLA 'Agree (2:00) (will_cost Willpower)'>>
  535. <<gt 'foto_shoot' 'erotic'>>
  536. <</actCLA>>
  537. <</if>>
  538. <<else>>
  539. <<actCLA 'Look at something else'>>
  540. <<gt 'foto_shoot' 'model'>>
  541. <</actCLA>>
  542. <<actCLA 'Agree (2:00)'>>
  543. <<gt 'foto_shoot' 'erotic'>>
  544. <</actCLA>>
  545. <</if>>
  546. <</actCLA>>
  547. <</if>>
  548. <!-- !! ------------------------------------------------------------------------------------------------------>
  549. <!-- !!-->
  550. <!-- !! ------------------------------------- Fitness Requests ----------------------------------------------->
  551. <!-- !!-->
  552. <!-- !! ------------------------------------------------------------------------------------------------------>
  553. <<if $location_var[$here][0] == 'fitness_shoot'>>
  554. <<image "locations/city/citycenter/photo/fotograph.jpg">>
  555. <p>"Alright, what kind of shoot would you like to do? Sportwear, Sport underwear, or Artistic nude?"</p>
  556. <<actCLA 'Sportwear'>>
  557. <<actCLA 'Look at something else'>>
  558. <<gt 'foto_shoot' 'model'>>
  559. <</actCLA>>
  560. <<actCLA 'Agree (2:00)'>>
  561. <<gt 'foto_shoot' 'sportswear'>>
  562. <</actCLA>>
  563. <</actCLA>>
  564. <<actCLA 'Sports underwear'>>
  565. <<if $pc.pcs_inhib < 20>>
  566. <<msg ' You think about asking to do this shoot but then blush and realize you aren""t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you""re not ready to do it for real.'>>
  567. <<else>>
  568. <<actCLA 'Look at something else'>>
  569. <<gt 'foto_shoot' 'model'>>
  570. <</actCLA>>
  571. <<actCLA 'Agree (2:00)'>>
  572. <<gt 'foto_shoot' 'sports_underwear'>>
  573. <</actCLA>>
  574. <</if>>
  575. <</actCLA>>
  576. <<actCLA 'Artistic nude'>>
  577. <<if $pc.pcs_inhib < 45>>
  578. <<msg ' You think about asking to do this shoot but then blush and realize you aren""t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you""re not ready to do it for real.'>>
  579. <<else>>
  580. <<actCLA 'Look at something else'>>
  581. <<gt 'foto_shoot' 'model'>>
  582. <</actCLA>>
  583. <<actCLA 'Agree (2:00)'>>
  584. <<gt 'foto_shoot' 'fitness_artistic_nude'>>
  585. <</actCLA>>
  586. <</if>>
  587. <</actCLA>>
  588. <</if>>
  589. <!-- !! ------------------------------------------------------------------------------------------------------>
  590. <!-- !!-->
  591. <!-- !! ------------------------------------- Modelling Shoots ----------------------------------------------->
  592. <!-- !!-->
  593. <!-- !! ------------------------------------------------------------------------------------------------------>
  594. <<if $location_var[$here][0] == 'fashion'>>
  595. <<set $time.minutes += 120>>
  596. <<set $modelpayfin = 300 + (modelpay) + (15 * rand(0,5)) + (pcs_apprnc) + (min(fame['city_modelling'], 700) / 2) + ($pc.skillLevel("modelling") / 2 * 10)>>
  597. <<setinit $modelfoto['fashion'] += 1>>
  598. <<run $pc.skillExperienceGain('modelling',rand(5,8))>>
  599. <<run $pc.fameInc('city','modelling','small')>>
  600. <<if $pc.fame('city_modelling') > 200>>
  601. <<run $pc.fameInc('city','modelling',`rand(3,10)`)>>
  602. <</if>>
  603. <<set $fashionshoot = rand(1,2)>>
  604. <<if getvar("$fashionshoot") == 1>>
  605. <<video "locations/city/citycenter/photo/fashion/#.mp4" 1 5>>
  606. <<else>>
  607. <<image `'locations/city/citycenter/photo/fashion/'+rand(1,31)+'.jpg'`>>
  608. <</if>>
  609. You dress up in the latest in fashion wear and spend the next two hours posing for the photographer.
  610. <p>After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  611. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  612. <<actCLA 'Leave'>>
  613. <<gt 'foto_events' 'commercial'>>
  614. <</actCLA>>
  615. <<else>>
  616. <<actCLA 'Leave'>>
  617. <<gt 'foto' 'end'>>
  618. <</actCLA>>
  619. <</if>>
  620. <</if>>
  621. <<if $location_var[$here][0] == 'bikini'>>
  622. <<set $time.minutes += 120>>
  623. <<set $modelpayfin = 325 + (modelpay) + (15 * rand(0,5)) + (pcs_apprnc) + (min(fame['city_modelling'], 700) / 2) + ($pc.skillLevel("modelling") / 2 * 10)>>
  624. <<setinit $modelfoto['bikini'] += 1>>
  625. <<if $pc.pcs_inhib < 20>>
  626. <<gs 'willpower' 'pay' 'self'>>
  627. <</if>>
  628. <<run $pc.fameInc('city','modelling','small')>>
  629. <<if $pc.fame('city_modelling') > 200>>
  630. <<run $pc.fameInc('city','modelling',`rand(3,10)`)>>
  631. <</if>>
  632. <<run $pc.skillExperienceGain('modelling',rand(6,10))>>
  633. <<if $pc.pcs_inhib < 50>>
  634. <<run $pc.skillExperienceGain('inhibition',rand(0,1))>>
  635. <</if>>
  636. <<video "locations/city/citycenter/photo/bikini/#.mp4" 4 5>>
  637. You spend the shoot in designer bikinis, modelling them to appear in various higher end magazines.
  638. <p>Two hours later, you're all done. The photographer thanks you for your time and pays you modelpayfin <b>₽</b> for the job.</p>
  639. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  640. <<actCLA 'Leave'>>
  641. <<gt 'foto_events' 'commercial'>>
  642. <</actCLA>>
  643. <<else>>
  644. <<actCLA 'Leave'>>
  645. <<gt 'foto' 'end'>>
  646. <</actCLA>>
  647. <</if>>
  648. <</if>>
  649. <<if $location_var[$here][0] == 'lingerie'>>
  650. <<set $time.minutes += 120>>
  651. <<set $modelpayfin = 350 + (modelpay) + (15 * rand(0,5)) + (pcs_apprnc) + (min(fame['city_modelling'], 700) / 2) + ($pc.skillLevel("modelling") / 2 * 10)>>
  652. <<setinit $modelfoto['lingerie'] += 1>>
  653. <<run $pc.skillExperienceGain('modelling',rand(6,10))>>
  654. <<if $pc.pcs_inhib < 25>>
  655. <<gs 'willpower' 'pay' 'self'>>
  656. <</if>>
  657. <<run $pc.fameInc('city','modelling','small')>>
  658. <<if $pc.fame('city_modelling') > 200>>
  659. <<run $pc.fameInc('city','modelling',`rand(3,6)`)>>
  660. <</if>>
  661. <<run $pc.skillExperienceGain('inhibition',rand(0,2))>>
  662. <<set $shoot = rand(1,2)>>
  663. <<if getvar("$shoot") == 1>>
  664. <<video "locations/city/citycenter/photo/lingerie/#.mp4" 1 5>>
  665. <<else>>
  666. <<image `'locations/city/citycenter/photo/lingerie/'+rand(1,37)+'.jpg'`>>
  667. <</if>>
  668. You put on some high end lingerie and spend the next two hours striking various poses for a photographer for use in fashion magazines.
  669. <p>After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  670. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  671. <<actCLA 'Leave'>>
  672. <<gt 'foto_events' 'commercial'>>
  673. <</actCLA>>
  674. <<else>>
  675. <<actCLA 'Leave'>>
  676. <<gt 'foto' 'end'>>
  677. <</actCLA>>
  678. <</if>>
  679. <</if>>
  680. <<if $location_var[$here][0] == 'sexy'>>
  681. <<set $time.minutes += 120>>
  682. <<set $modelpayfin = 500 + (modelpay) + (15 * rand(0,5)) + (pcs_apprnc) + (min(fame['city_modelling'], 700) / 2) + ($pc.skillLevel("modelling") / 2 * 10)>>
  683. <<setinit $modelfoto['glamour'] += 1>>
  684. <<setinit $modelfoto['sexy'] += 1>>
  685. <<run $pc.skillExperienceGain('modelling',rand(5,10))>>
  686. <<if $pc.pcs_inhib < 30>>
  687. <<gs 'willpower' 'pay' 'self'>>
  688. <</if>>
  689. <<run $pc.fameInc('city','modelling','small')>>
  690. <<if $pc.fame('city_modelling') > 200>>
  691. <<run $pc.fameInc('city','modelling',`rand(1,6)`)>>
  692. <</if>>
  693. <<run $pc.skillExperienceGain('inhibition',rand(0,1))>>
  694. <<image `'locations/city/citycenter/photo/sexy/'+rand(1,48)+'.jpg'`>>
  695. You dress up in sexy clothes and spend the next two hours posing for the photographer.
  696. <p>After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  697. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  698. <<actCLA 'Leave'>>
  699. <<gt 'foto_events' 'commercial'>>
  700. <</actCLA>>
  701. <<else>>
  702. <<actCLA 'Leave'>>
  703. <<gt 'foto' 'end'>>
  704. <</actCLA>>
  705. <</if>>
  706. <</if>>
  707. <<if $location_var[$here][0] == 'transparent'>>
  708. <<set $time.minutes += 120>>
  709. <<set $modelpayfin = 600 + (modelpay) + (pcs_apprnc) + (15*rand(0,5))>>
  710. <<setinit $modelfoto['glamour'] += 1>>
  711. <<setinit $modelfoto['sexy'] += 1>>
  712. <<setinit $modelfoto['transparent'] += 1>>
  713. <<setinit $modelfoto['nip'] += 1>>
  714. <<run $pc.skillExperienceGain('modelling',rand(6,10))>>
  715. <<if $pc.pcs_inhib < 45>>
  716. <<gs 'willpower' 'pay' 'self'>>
  717. <</if>>
  718. <<run $pc.fameInc('city','modelling','small')>>
  719. <<if $pc.fame('city_modelling') > 200>>
  720. <<run $pc.fameInc('city','modelling',`rand(3,8)`)>>
  721. <</if>>
  722. <<run $pc.skillExperienceGain('inhibition',rand(0,2))>>
  723. <<image `'locations/city/citycenter/photo/seethru/'+rand(1,26)+'.jpg'`>>
  724. You put on a transparent top and spend the next two hours in various poses for the photographer, a flash highlighting your breasts with every click of the camera.
  725. <p>After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  726. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  727. <<actCLA 'Leave'>>
  728. <<gt 'foto_events' 'commercial'>>
  729. <</actCLA>>
  730. <<else>>
  731. <<actCLA 'Leave'>>
  732. <<gt 'foto' 'end'>>
  733. <</actCLA>>
  734. <</if>>
  735. <</if>>
  736. <<if $location_var[$here][0] == 'trans_ling'>>
  737. <<set $time.minutes += 120>>
  738. <<set $modelpayfin = 650 + ($modelpay * 2) + (pcs_apprnc) + (15*rand(0,7))>>
  739. <<setinit $modelfoto['glamour'] += 1>>
  740. <<setinit $modelfoto['trans_ling'] += 1>>
  741. <<setinit $modelfoto['nip'] += 1>>
  742. <<setinit $modelfoto['lingerie'] += 1>>
  743. <<run $pc.skillExperienceGain('modelling',rand(8,10))>>
  744. <<if $pc.pcs_inhib < 45>>
  745. <<gs 'willpower' 'pay' 'self'>>
  746. <</if>>
  747. <<run $pc.fameInc('city','modelling','small')>>
  748. <<if $pc.fame('city_modelling') > 200>>
  749. <<run $pc.fameInc('city','modelling',`rand(3,8)`)>>
  750. <</if>>
  751. <<run $pc.skillExperienceGain('inhibition',rand(0,2))>>
  752. <<if rand(0,1) == 1>>
  753. <<video "locations/city/citycenter/photo/ling_trans/#.mp4" 1 3>>
  754. <<else>>
  755. <<image `'locations/city/citycenter/photo/ling_trans/'+rand(1,26)+'.jpg'`>>
  756. <</if>>
  757. You put on some very lacy, very transparent underwear and get to posing, your nipples often showing through the thin fabric.
  758. <p>After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  759. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  760. <<actCLA 'Leave'>>
  761. <<gt 'foto_events' 'commercial'>>
  762. <</actCLA>>
  763. <<else>>
  764. <<actCLA 'Leave'>>
  765. <<gt 'foto' 'end'>>
  766. <</actCLA>>
  767. <</if>>
  768. <</if>>
  769. <<if $location_var[$here][0] == 'topless'>>
  770. <<set $time.minutes += 120>>
  771. <<set $modelpayfin = 700 + (modelpay) + (pcs_apprnc) + (15*rand(0,5))>>
  772. <<setinit $modelfoto['nip'] += 1>>
  773. <<setinit $modelfoto['topless'] += 1>>
  774. <<run $pc.skillExperienceGain('modelling',rand(6,10))>>
  775. <<if $pc.pcs_inhib < 50>>
  776. <<gs 'willpower' 'pay' 'self'>>
  777. <</if>>
  778. <<run $pc.fameInc('city','modelling','small')>>
  779. <<if $pc.fame('city_modelling') > 200>>
  780. <<run $pc.fameInc('city','modelling',`rand(3,8)`)>>
  781. <</if>>
  782. <<run $pc.skillExperienceGain('inhibition',rand(0,2))>>
  783. <<image `'locations/city/citycenter/photo/topless/'+rand(1,57)+'.jpg'`>>
  784. You spend two hours striking various posing with topless breasts, listening to instruction while the photographer takes pictures of you.
  785. <p>After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  786. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  787. <<actCLA 'Leave'>>
  788. <<gt 'foto_events' 'commercial'>>
  789. <</actCLA>>
  790. <<else>>
  791. <<actCLA 'Leave'>>
  792. <<gt 'foto' 'end'>>
  793. <</actCLA>>
  794. <</if>>
  795. <</if>>
  796. <<if $location_var[$here][0] == 'tasteful'>>
  797. <<set $time.minutes += 120>>
  798. <<set $modelpay = ($pc.skillLevel("modelling") / 2 * 10) + Math.min(fame['city_modelling'], 700) + $pc.pcs_apprnc>>
  799. <<set $modelpayfin = 600 + ($modelpay * 2) + (15*rand(0,5))>>
  800. <<setinit $modelfoto['tastenude'] += 1>>
  801. <<setinit $modelfoto['nude'] += 1>>
  802. <<run $pc.skillExperienceGain('modelling',rand(9,10))>>
  803. <<if $pc.pcs_inhib < 40>>
  804. <<gs 'willpower' 'pay' 'self'>>
  805. <</if>>
  806. <<run $pc.fameInc('city','modelling','small')>>
  807. <<if $pc.fame('city_modelling') > 200>>
  808. <<run $pc.fameInc('city','modelling',`rand(3,10)`)>>
  809. <</if>>
  810. <<run $pc.skillExperienceGain('inhibition',rand(0,2))>>
  811. <<image `'locations/city/citycenter/photo/tastenude/'+rand(1,28)+'.jpg'`>>
  812. Already naked, you step onto the set and begin the shoot immediately.
  813. <p>You spend two hours posing confidently for a photographer taking pictures of you, often being asked to carefully position your hands or legs in ways that tastefully hides your pussy and nipples. These images, though incredibly provocative, are still somehow considered to be conservative enough to be allowed on the front cover of fashion, sports, and other tabloid magazines. When the shoot ends, both you and the photographers are very proud of the results and you are paid modelpayfin <b>₽</b> for your work.</p>
  814. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  815. <<actCLA 'Leave'>>
  816. <<gt 'foto_events' 'commercial'>>
  817. <</actCLA>>
  818. <<else>>
  819. <<actCLA 'Leave'>>
  820. <<gt 'foto' 'end'>>
  821. <</actCLA>>
  822. <</if>>
  823. <</if>>
  824. <<if $location_var[$here][0] == 'topless_nude'>>
  825. <<set $time.minutes += 120>>
  826. <<set $modelpay = ($pc.skillLevel("modelling") / 2 * 10) + Math.min(fame['city_modelling'], 700) + $pc.pcs_apprnc>>
  827. <<set $modelpayfin = 600 + ($modelpay * 2) + (15*rand(0,5))>>
  828. <<setinit $modelfoto['nude'] += 1>>
  829. <<setinit $modelfoto['toplessnude'] += 1>>
  830. <<run $pc.skillExperienceGain('modelling',rand(9,10))>>
  831. <<if $pc.pcs_inhib < 55>>
  832. <<gs 'willpower' 'pay' 'self'>>
  833. <</if>>
  834. <<run $pc.fameInc('city','modelling','medium')>>
  835. <<if $pc.fame('city_modelling') > 200>>
  836. <<run $pc.fameInc('city','modelling',`rand(3,10)`)>>
  837. <</if>>
  838. <<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
  839. <<image `'locations/city/citycenter/photo/topnude/'+rand(1,79)+'.jpg'`>>
  840. Already naked, you step onto the set and begin the shoot immediately.
  841. <p>You spend two hours posing confidently for a photographer taking pictures of you, often using props, hands, legs, or shadow to shield your pussy while simultaneously teasing the would-be readers of what they cannot see. When the shoot ends, both you and the photographers are very proud of the results and you are paid modelpayfin <b>₽</b> for your work.</p>
  842. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  843. <<actCLA 'Leave'>>
  844. <<gt 'foto_events' 'commercial'>>
  845. <</actCLA>>
  846. <<else>>
  847. <<actCLA 'Leave'>>
  848. <<gt 'foto' 'end'>>
  849. <</actCLA>>
  850. <</if>>
  851. <</if>>
  852. <<if $location_var[$here][0] == 'nude'>>
  853. <<set $time.minutes += 120>>
  854. <<set $modelpay = ($pc.skillLevel("modelling") / 2 * 10) + Math.min(fame['city_modelling'], 700) + $pc.pcs_apprnc>>
  855. <<set $modelpayfin = 600 + ($modelpay * 2) + (15*rand(0,5))>>
  856. <<if getvar("$modelfoto['nude']") == 0>>
  857. <<set $modelpayfin = $modelpayfin * 2>> <<set $foto_persuade = 0>>
  858. <</if>>
  859. <<setinit $modelfoto['nude'] += 1>>
  860. <<setinit $modelfoto['fullnude'] += 1>>
  861. <<setinit $modelfoto['nip'] += 1>>
  862. <<setinit $modelfoto['pussy'] += 1>>
  863. <<run $pc.skillExperienceGain('modelling',rand(9,10))>>
  864. <<if $pc.pcs_inhib < 60>>
  865. <<gs 'willpower' 'pay' 'self'>>
  866. <</if>>
  867. <<run $pc.fameInc('city','modelling','medium')>>
  868. <<if $pc.fame('city_modelling') > 200>>
  869. <<run $pc.fameInc('city','modelling',`rand(5,10)`)>>
  870. <</if>>
  871. <<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
  872. <<if $pc.pcs_pubes < 16>>
  873. <<image `'locations/city/citycenter/photo/nude/'+rand(1,17)+'.jpg'`>>
  874. Already naked, you step onto the set and begin the shoot immediately.
  875. <p>You spend two hours posing confidently for a photographer taking pictures of you that fully expose your breasts and pussy. When the shoot ends, both you and the photographers are very proud of the results and you are paid modelpayfin <b>₽</b> for your work.</p>
  876. <<else>>
  877. <<image `'locations/city/citycenter/photo/bnude/'+rand(1,20)+'.jpg'`>>
  878. Already naked, you step onto the set and begin the shoot immediately.
  879. <p>You spend two hours posing confidently for a photographer taking pictures of you, your $pc_desc['pubes'] pussy providing a nice contrast to the rest of your smooth body. When the shoot ends, both you and the photographers are very proud of the results and you are paid modelpayfin <b>₽</b> for your work.</p>
  880. <</if>>
  881. <<if getvar("$modelfoto['nude']") == 1 and getvar("$foto_persuade") != 5>>
  882. You blink at the amount but the person who gave it to you reassures you it's normal. The studio has a policy of doubling the pay for a model''s nude debut.
  883. <<elseif getvar("$modelfoto['nude']") == 1 and getvar("$foto_persuade") == 5>>
  884. <p>It even includes the bonus the manager said they'd give you for your debut!</p>
  885. <</if>>
  886. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  887. <<actCLA 'Leave'>>
  888. <<gt 'foto_events' 'commercial'>>
  889. <</actCLA>>
  890. <<else>>
  891. <<actCLA 'Leave'>>
  892. <<gt 'foto' 'end'>>
  893. <</actCLA>>
  894. <</if>>
  895. <</if>>
  896. <<if $location_var[$here][0] == 'erotic'>>
  897. <<set $time.minutes += 120>>
  898. <<set $modelpay = ($pc.skillLevel("modelling") / 2 * 10) + ($pc.pcs_apprnc * 3)>>
  899. <<set $modelpayfin = 1000 + ($modelpay * 2) + (15*rand(0,5))>>
  900. <<setinit $modelfoto['erotic'] += 1>>
  901. <<setinit $modelfoto['nude'] += 1>>
  902. <<setinit $modelfoto['nip'] += 1>>
  903. <<setinit $modelfoto['pussy'] += 1>>
  904. <<setinit $modelfoto['asshole'] += 1>>
  905. <<run $pc.skillExperienceGain('modelling',rand(1,4))>>
  906. <<if $pc.pcs_inhib < 65>>
  907. <<gs 'willpower' 'pay' 'self'>>
  908. <</if>>
  909. <<run $pc.fameInc('city','modelling','small')>>
  910. <<run $pc.fameInc('city','porn','small')>>
  911. <<if $pc.pcs_inhib < 60>>
  912. <<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
  913. <</if>>
  914. <<image `'locations/city/citycenter/photo/erotic/'+rand(1,19)+'.jpg'`>>
  915. <<if $wardrobe.pantyworntype != 'none'>>
  916. <<else>>
  917. Already naked, you step onto the set and begin the shoot immediately.
  918. <</if>>
  919. <p>You spend two hours posing while the photographer takes many photos of your nude body, but especially your breasts, pussy, and asshole. You can see the rock-hard outline of his cock the whole time and you are paid modelpayfin <b>₽</b> for your work.</p>
  920. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  921. <<actCLA 'Leave'>>
  922. <<gt 'foto_events' 'commercial'>>
  923. <</actCLA>>
  924. <<else>>
  925. <<actCLA 'Leave'>>
  926. <<gt 'foto' 'end'>>
  927. <</actCLA>>
  928. <</if>>
  929. <</if>>
  930. <<if $location_var[$here][0] == 'sportswear'>>
  931. <<set $time.minutes += 120>>
  932. <<set $modelpayfin = 300 + (modelpay) + (15 * rand(0,5)) + (pcs_apprnc) + ($pc.fame('city_modelling') / 2) + ($pc.skillLevel("modelling") / 2 * 10) + ($city_sport / 2)>>
  933. <<setinit $modelfoto['fitness'] += 1>>
  934. <<set $pc.pcs_sweat = 60>>
  935. <<run $pc.skillExperienceGain('modelling',rand(2,4))>>
  936. <<run $pc.fameInc('city','modelling','small')>>
  937. <<if $pc.bodset == 2 and $pc.salocatnow >= 2>>
  938. <<set $modelpayfin += 300>>
  939. <<image `'locations/city/citycenter/photo/fitness/FSM'+rand(1,4)+'.jpg'`>>
  940. <<else>>
  941. <<image `'locations/city/citycenter/photo/fitness/FSV'+rand(1,4)+'.jpg'`>>
  942. <</if>>
  943. <p>Modeling sportwear, is slighty different from other jobs. First, you are taken to the near-by Havanna Fitness Center, as the studio doesn't have all the necessary props to do it. Second, you must look "dynamic", and that means do some warm-ups, and add some oil, to give that "sweaty" and "sporty" look. After that, you are ready to pose the next two hours for the photographer.</p>
  944. <p>After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  945. <<if $pc.skillLevel("modelling") >= 40 and getvar("$commercial") == 0>>
  946. <<actCLA 'Leave'>>
  947. <<gt 'foto_events' 'commercial'>>
  948. <</actCLA>>
  949. <<else>>
  950. <<actCLA 'Leave'>>
  951. <<gt 'foto' 'end'>>
  952. <</actCLA>>
  953. <</if>>
  954. <</if>>
  955. <<if $location_var[$here][0] == 'sports_underwear'>>
  956. <<set $time.minutes += 120>>
  957. <<set $modelpayfin = 325 + (modelpay) + (15 * rand(0,5)) + (pcs_apprnc) + ($pc.fame('city_modelling') / 2) + ($pc.skillLevel("modelling") / 2 * 10) + ($city_sport / 2)>>
  958. <<setinit $modelfoto['fitness'] += 1>>
  959. <<set $pc.pcs_sweat = 60>>
  960. <<run $pc.fameInc('city','modelling','small')>>
  961. <<run $pc.skillExperienceGain('modelling',rand(3,6))>>
  962. <<if $pc.pcs_inhib < 50>>
  963. <<run $pc.skillExperienceGain('inhibition',1)>>
  964. <</if>>
  965. <<if $pc.bodset == 2 and $pc.salocatnow >= 2>>
  966. <<set $modelpayfin += 325>>
  967. <<image `'locations/city/citycenter/photo/fitness/FUM'+rand(1,4)+'.jpg'`>>
  968. <<else>>
  969. <<image `'locations/city/citycenter/photo/fitness/FUV'+rand(1,4)+'.jpg'`>>
  970. <</if>>
  971. <p>Modeling sport underwear, is slighty different from other jobs. First, you are taken to the Havanna Fitness Center, as the studio doesn't have all the necessary props to do it. Second, you must look "dynamic", and that means do some warm-ups, and add some oil, to give that "sweaty" and "sporty" look. After that, you are ready to pose the next two hours for the photographer.</p>
  972. <p>After having taken all his pictures, you and the crew head back to Aphrodite, counting out your modelpayfin <b>₽</b> to hand to you.</p>
  973. <<actCLA 'Leave'>>
  974. <<gt 'foto' 'end'>>
  975. <</actCLA>>
  976. <</if>>
  977. <<if $location_var[$here][0] == 'fitness_artistic_nude'>>
  978. <<set $time.minutes += 120>>
  979. <<set $modelpay = ($pc.skillLevel("modelling") / 2 * 10) + $pc.fame('city_modelling') + $pc.pcs_apprnc + $city_sport>>
  980. <<set $modelpayfin = 600 + ($modelpay * 2) + (15*rand(0,5))>>
  981. <<setinit $modelfoto['fitness'] += 1>>
  982. <<setinit $modelfoto['nude'] += 1>>
  983. <<set $pc.pcs_sweat = 60>>
  984. <<run $pc.skillExperienceGain('modelling',rand(4,5))>>
  985. <<run $pc.fameInc('city','modelling','small')>>
  986. <<run $pc.skillExperienceGain('inhibition',2)>>
  987. <<if $pc.bodset == 2 and $pc.salocatnow >= 2>>
  988. <<set $modelpayfin += 600>>
  989. <<image `'locations/city/citycenter/photo/fitness/FNM'+rand(1,4)+'.jpg'`>>
  990. <<else>>
  991. <<image `'locations/city/citycenter/photo/fitness/FNV'+rand(1,4)+'.jpg'`>>
  992. <</if>>
  993. <p>Already naked, you do some warm-ups, work up a sweat, add some body-oil and step onto the set to begin the shoot.</p>
  994. <p>You spend two hours posing confidently for a photographer taking pictures of you, often being asked to carefully position your hands or legs in ways that tastefully hides your pussy and nipples. These images, are less provocative, than artistic, as they must show your body in movement so they can appear in sports-related advertisements, articles, and magazines. When the shoot ends, both you and the photographers are very proud of the results and you are paid modelpayfin <b>₽</b> for your work.</p>
  995. <<actCLA 'Leave'>>
  996. <<gt 'foto' 'end'>>
  997. <</actCLA>>
  998. <</if>>
  999. <!-- !! act 'Variety shoot':-->
  1000. <!-- !! if pcs_inhib < 60:-->
  1001. <!-- !! msg'You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you're not ready to do it for real.'-->
  1002. <!-- !! gt 'foto', 'nude_shoot'-->
  1003. <!-- !! else-->
  1004. <!-- !! cla-->
  1005. <!-- !! act 'Look at something else':gt 'foto_shoot','model'-->
  1006. <!-- !!-->
  1007. <!-- !! act 'Agree (2:00)':-->
  1008. <!-- !! -->
  1009. <!-- !! minut += 120-->
  1010. <!-- !! modelpayfin = 825 + (modelpay * 2) + (15*rand(0,7))-->
  1011. <!-- !! gs 'exp_gain', 'mdlng', 10-->
  1012. <!-- !! fame['city_modelling'] += rand(10,20)-->
  1013. <!-- !! pav_modelling += rand(0,fame['city_modelling'])/10-->
  1014. <!-- !! inhib_exp += 3-->
  1015. <!-- !! modelfoto['glamour'] += 1-->
  1016. <!-- !! modelfoto['nip'] += 1-->
  1017. <!-- !! modelfoto['fashion'] += 1-->
  1018. <!-- !! modelfoto['lingerie'] += 1-->
  1019. <!-- !! modelfoto['topless'] += 1-->
  1020. <!-- !! modelfoto['pussy'] += 1-->
  1021. <!-- !! -->
  1022. <!-- !! '<<video "locations/city/citycenter/photo/vmodel.mp4">>'-->
  1023. <!-- !! 'You spend two hours posing for the photographer, changing in and out of various underwear, sexy clothings, and lingeries until you end the shoot fully striped down and dancing naked.'-->
  1024. <!-- !! *nl-->
  1025. <!-- !! 'After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'-->
  1026. <!-- !! if pcs_mdlng >= 40 and commercial = 0:-->
  1027. <!-- !! act 'Leave':gt'foto_events','commercial'-->
  1028. <!-- !! else-->
  1029. <!-- !! act 'Leave':gt 'foto', 'end'-->
  1030. <!-- !! end-->
  1031. <!-- !! end-->
  1032. <!-- !! end-->
  1033. <!-- !! end-->
  1034. <!-- !!end-->