Cheatmenu_din.qsrc 170 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004
  1. # Cheatmenu_din
  2. *clr & cla
  3. !All the active dynamics for the cheat menu are here
  4. $cheatmenu['empty'] = {
  5. !Yes, intentionally empty, do not remove it
  6. }
  7. $cheatmenu['work'] = {
  8. if cheatWork = 0:
  9. cheatWork = 1
  10. dynamic $cheatmenu['permanent']
  11. exit
  12. elseif cheatWork = 1:
  13. cheatWork = 0
  14. dynamic $cheatmenu['permanent']
  15. end
  16. }
  17. $cheatmenu['willpower'] = {
  18. if cheatWillpower = 0:
  19. cheatWillpower = 1
  20. dynamic $cheatmenu['permanent']
  21. exit
  22. elseif cheatWillpower = 1:
  23. cheatWillpower = 0
  24. dynamic $cheatmenu['permanent']
  25. end
  26. }
  27. $cheatmenu['hair'] = {
  28. if cheatHapri = 0:
  29. cheatHapri = 1
  30. dynamic $cheatmenu['permanent']
  31. exit
  32. elseif cheatHapri = 1:
  33. cheatHapri = 0
  34. dynamic $cheatmenu['permanent']
  35. end
  36. }
  37. $cheatmenu['enema'] = {
  38. if cheatKlisma = 1:
  39. cheatKlisma = 0
  40. dynamic $cheatmenu['setting']
  41. exit
  42. elseif cheatKlisma = 0:
  43. cheatKlisma = 1
  44. dynamic $cheatmenu['setting']
  45. end
  46. }
  47. $cheatmenu['nomakeup'] = {
  48. if cheatNomakeup = 0:
  49. cheatNomakeup = 1
  50. dynamic $cheatmenu['permanent']
  51. exit
  52. elseif cheatNomakeup = 1:
  53. cheatNomakeup = 0
  54. dynamic $cheatmenu['permanent']
  55. end
  56. }
  57. $cheatmenu['nosweat'] = {
  58. if cheatNoSweat = 0:
  59. cheatNoSweat = 1
  60. dynamic $cheatmenu['permanent']
  61. exit
  62. elseif cheatNoSweat = 1:
  63. cheatNoSweat = 0
  64. dynamic $cheatmenu['permanent']
  65. end
  66. }
  67. $cheatmenu['noEat'] = {
  68. if cheatNoEat = 0:
  69. cheatNoEat = 1
  70. dynamic $cheatmenu['permanent']
  71. exit
  72. elseif cheatNoEat = 1:
  73. cheatNoEat = 0
  74. dynamic $cheatmenu['permanent']
  75. end
  76. }
  77. $cheatmenu['noDrink'] = {
  78. if cheatNoDrink = 0:
  79. cheatNoDrink = 1
  80. dynamic $cheatmenu['permanent']
  81. exit
  82. elseif cheatNoDrink = 1:
  83. cheatNoDrink = 0
  84. dynamic $cheatmenu['permanent']
  85. end
  86. }
  87. $cheatmenu['noSleep'] = {
  88. if cheatNoSleep = 0:
  89. cheatNoSleep = 1
  90. dynamic $cheatmenu['permanent']
  91. exit
  92. elseif cheatNoSleep = 1:
  93. cheatNoSleep = 0
  94. dynamic $cheatmenu['permanent']
  95. end
  96. }
  97. $cheatmenu['noMood'] = {
  98. if cheatNoMood = 0:
  99. cheatNoMood = 1
  100. dynamic $cheatmenu['permanent']
  101. exit
  102. elseif cheatNoMood = 1:
  103. cheatNoMood = 0
  104. dynamic $cheatmenu['permanent']
  105. end
  106. }
  107. $cheatmenu['noFat'] = {
  108. if cheatNoFat = 0:
  109. cheatNoFat = 1
  110. dynamic $cheatmenu['permanent']
  111. exit
  112. elseif cheatNoFat = 1:
  113. cheatNoFat = 0
  114. dynamic $cheatmenu['permanent']
  115. end
  116. }
  117. $cheatmenu['health'] = {
  118. if cheatHealth = 0:
  119. cheatHealth = 1
  120. dynamic $cheatmenu['permanent']
  121. exit
  122. elseif cheatHealth = 1:
  123. cheatHealth = 0
  124. dynamic $cheatmenu['permanent']
  125. end
  126. }
  127. $cheatmenu['fight'] = {
  128. if fight_cheat = 0:
  129. fight_cheat = 1
  130. dynamic $cheatmenu['permanent']
  131. exit
  132. elseif fight_cheat = 1:
  133. fight_cheat = 0
  134. dynamic $cheatmenu['permanent']
  135. end
  136. }
  137. $cheatmenu['autocombat'] = {
  138. if autocombat_cheat = 0:
  139. autocombat_cheat = 1
  140. dynamic $cheatmenu['permanent']
  141. exit
  142. elseif autocombat_cheat = 1:
  143. autocombat_cheat = 0
  144. dynamic $cheatmenu['permanent']
  145. end
  146. }
  147. $cheatmenu['age'] = {
  148. :tooyoung
  149. age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
  150. if ((month * 100) + day) <= pcs_dob mod 10000: age -= 1
  151. if age < 15: pcs_dob -= 10000 & jump 'tooyoung'
  152. dynamic $cheatmenu['looks']
  153. }
  154. $cheatmenu['visualage'] = {
  155. vidage = input("For how many years you want to look?")
  156. if vidage <= 14: vidage = 14
  157. dynamic $cheatmenu['looks']
  158. }
  159. $cheatmenu['money'] = {
  160. money = input("How much money do you want to have?")
  161. if money < 0:money = 0
  162. dynamic $cheatmenu['state']
  163. }
  164. $cheatmenu['bodyMod'] = {
  165. *clr & cla
  166. act 'Return to last menu': dynamic $cheatmenu['state']
  167. '<center><h1>Cheat Menu - Body Modification</h1></center>'
  168. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  169. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  170. '<center><b><font color="red">WARNING!</font></b></center>'
  171. 'Changing body shape does not resize clothes.'
  172. 'May cause adverse interactions, use at your own risk!'
  173. ''
  174. 'You are currently <<$body>>.'
  175. ''
  176. 'You may select from the following sizes:'
  177. ''
  178. if bodset ! 3:
  179. 'starving (No, you may not select ''starving'', it''s here to show where the scale starts)'
  180. ''
  181. if salocatnow ! 1:
  182. '<a href="exec:salo = 20 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
  183. ''
  184. end
  185. if salocatnow ! 2:
  186. '<a href="exec:salo = 40 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
  187. ''
  188. end
  189. if salocatnow ! 3:
  190. '<a href="exec:salo = 60 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
  191. ''
  192. end
  193. if salocatnow ! 4:
  194. '<a href="exec:salo = 80 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
  195. ''
  196. end
  197. if salocatnow ! 5:
  198. '<a href="exec:salo = 100 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
  199. ''
  200. end
  201. if salocatnow ! 6:
  202. '<a href="exec:salo = 120 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
  203. ''
  204. end
  205. if salocatnow ! 7:
  206. '<a href="exec:salo = 140 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
  207. ''
  208. end
  209. else
  210. if (pregchem < 2688) = 0:
  211. '<a href="exec:pregchem = 100 & pregtime = 4 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10))]>></a>'
  212. ''
  213. end
  214. if (pregchem >= 2688 and pregchem < 3192) = 0:
  215. '<a href="exec:pregchem = 2688 & pregtime = 112 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
  216. ''
  217. end
  218. if (pregchem >= 3192 and pregchem < 3696) = 0:
  219. '<a href="exec:pregchem = 3192 & pregtime = 133 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
  220. ''
  221. end
  222. if (pregchem >= 3696 and pregchem < 4200) = 0:
  223. '<a href="exec:pregchem = 3696 & pregtime = 154 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
  224. ''
  225. end
  226. if (pregchem >= 4200 and pregchem < 4704) = 0:
  227. '<a href="exec:pregchem = 4200 & pregtime = 175 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
  228. ''
  229. end
  230. if (pregchem >= 4704 and pregchem < 5208) = 0:
  231. '<a href="exec:pregchem = 4704 & pregtime = 196 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
  232. ''
  233. end
  234. if (pregchem >= 5208 and pregchem < 5712) = 0:
  235. '<a href="exec:pregchem = 5208 & pregtime = 217 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
  236. ''
  237. end
  238. if (pregchem >= 5712 and pregchem < 6216) = 0:
  239. '<a href="exec:pregchem = 5712 & pregtime = 238 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
  240. ''
  241. end
  242. if (pregchem >= 6216) = 0:
  243. '<a href="exec:pregchem = 6216 & pregtime = 259 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 8)]>></a>'
  244. ''
  245. end
  246. end
  247. '</tr></table></b></center>'
  248. }
  249. $cheatmenu['addict'] = {
  250. if NarkImmune = 0:
  251. NarkImmune = 1
  252. smoker = 0
  253. smokerNeed = 0
  254. joint_count = 0
  255. alcohol_count = 0
  256. cocaine_count = 0
  257. amphetamine_count = 0
  258. SNarkTimes = 0
  259. dynamic $cheatmenu['permanent']
  260. exit
  261. elseif NarkImmune = 1:
  262. NarkImmune = 0
  263. dynamic $cheatmenu['permanent']
  264. end
  265. }
  266. $cheatmenu['cheatHorny'] = {
  267. if cheatHorny = 0:
  268. cheatHorny = 1
  269. dynamic $cheatmenu['permanent']
  270. exit
  271. elseif cheatHorny = 1:
  272. cheatHorny = 0
  273. dynamic $cheatmenu['permanent']
  274. end
  275. }
  276. $cheatmenu['slutshot'] = {
  277. if cheatSlut = 0:
  278. cheatSlut = 1
  279. cycle = 6
  280. dynamic $cheatmenu['permanent']
  281. exit
  282. elseif cheatSlut = 1:
  283. cheatSlut = 0
  284. cycle = 0
  285. dynamic $cheatmenu['permanent']
  286. end
  287. }
  288. $cheatmenu['cheat_NoPregnancy'] = {
  289. if cheat_NoPregnancy = 1:
  290. killvar 'cheat_NoPregnancy'
  291. dynamic $cheatmenu['permanent']
  292. else
  293. cheat_NoPregnancy = 1
  294. dynamic $cheatmenu['permanent']
  295. end
  296. }
  297. $cheatmenu['cheat_NoLactation'] = {
  298. if cheat_NoLactation = 1:
  299. killvar 'cheat_NoLactation'
  300. dynamic $cheatmenu['permanent']
  301. else
  302. cheat_Nolactation = 1
  303. dynamic $cheatmenu['permanent']
  304. end
  305. }
  306. $cheatmenu['Vibrator'] = {
  307. if cheatVib = 0:
  308. cheatVib = 1
  309. bedvibrator = 1
  310. dynamic $cheatmenu['permanent']
  311. elseif cheatVib = 1:
  312. cheatVib = 0
  313. bedvibrator = 0
  314. dynamic $cheatmenu['permanent']
  315. end
  316. }
  317. $cheatmenu['BimboCloth'] = {
  318. if cheatBimbo = 0:
  319. cheatBimbo = 1
  320. dynamic $cheatmenu['permanent']
  321. bimbo = 0
  322. bimbolevel = 0
  323. bimbowithdrawal = 0
  324. elseif cheatBimbo = 1:
  325. cheatBimbo = 0
  326. dynamic $cheatmenu['permanent']
  327. end
  328. }
  329. $cheatmenu['exhib_block'] = {
  330. if exhib_cheat = 0:
  331. exhib_cheat = 1
  332. dynamic $cheatmenu['permanent']
  333. pcs_exhib = 0
  334. Exhibitionist_lvl = 0
  335. elseif exhib_cheat = 1:
  336. exhib_cheat = 0
  337. dynamic $cheatmenu['permanent']
  338. end
  339. }
  340. $cheatmenu['addictive_block'] = {
  341. if addictive_cheat = 0:
  342. addictive_cheat = 1
  343. smoke_exp = 0
  344. joint_exp = 0
  345. heroin_exp = 0
  346. cocaine_exp = 0
  347. amphetamine_exp = 0
  348. alcohol_exp = 0
  349. addictive_exp = 0
  350. addictive_trait_lvl = 0
  351. dynamic $cheatmenu['permanent']
  352. elseif addictive_cheat = 1:
  353. addictive_cheat = 0
  354. dynamic $cheatmenu['permanent']
  355. end
  356. }
  357. $cheatmenu['cumtrait_block'] = {
  358. if cumeater_cheat = 0:
  359. cumeater_cheat = 1
  360. dynamic $cheatmenu['permanent']
  361. trt_cumeater = 0
  362. elseif cumeater_cheat = 1:
  363. cumeater_cheat = 0
  364. dynamic $cheatmenu['permanent']
  365. end
  366. }
  367. $cheatmenu['consolecheat'] = {
  368. if cheatConsole = 0:
  369. cheatConsole = 1
  370. dynamic $cheatmenu['permanent']
  371. exit
  372. elseif cheatConsole = 1:
  373. cheatConsole = 0
  374. dynamic $cheatmenu['permanent']
  375. end
  376. }
  377. $cheatmenu['timecheat'] = {
  378. if cheatTime = 0:
  379. cheatTime = 1
  380. dynamic $cheatmenu['permanent']
  381. exit
  382. elseif cheatTime = 1:
  383. cheatTime = 0
  384. dynamic $cheatmenu['permanent']
  385. end
  386. }
  387. $cheatmenu['random_bf_gf'] = {
  388. if random_bf_gf_cheat = 0:
  389. random_bf_gf_cheat = 1
  390. dynamic $cheatmenu['permanent']
  391. exit
  392. elseif random_bf_gf_cheat = 1:
  393. random_bf_gf_cheat = 0
  394. dynamic $cheatmenu['permanent']
  395. end
  396. }
  397. $cheatmenu['street_robbers'] = {
  398. if cheat_street_robbers = 0:
  399. cheat_street_robbers = 1
  400. dynamic $cheatmenu['permanent']
  401. elseif cheat_street_robbers = 1:
  402. cheat_street_robbers = 0
  403. dynamic $cheatmenu['permanent']
  404. end
  405. }
  406. $cheatmenu['street_rapists'] = {
  407. if cheat_street_rapists = 0:
  408. cheat_street_rapists = 1
  409. dynamic $cheatmenu['permanent']
  410. elseif cheat_street_rapists = 1:
  411. cheat_street_rapists = 0
  412. dynamic $cheatmenu['permanent']
  413. end
  414. }
  415. $cheatmenu['permanent'] = {
  416. gs'stat'
  417. *clr & cla
  418. gs 'obj_din', 'cheattabs'
  419. if cheatWork = 0:$cheatWork = 'Currently OFF'
  420. if cheatWork = 1:$cheatWork = 'Currently ON'
  421. if cheatWillpower = 0:$cheatWillpower = 'Currently OFF'
  422. if cheatWillpower = 1:$cheatWillpower = 'Currently ON'
  423. if cheatHapri = 0:$cheatHapri = 'Currently OFF'
  424. if cheatHapri = 1:$cheatHapri = 'Currently ON'
  425. if cheatKlisma = 1:$cheatKlisma = 'Currently OFF'
  426. if cheatKlisma = 0:$cheatKlisma = 'Currently ON'
  427. if cheatNomakeup = 0:$cheatNomakeup = 'Currently OFF'
  428. if cheatNomakeup = 1:$cheatNomakeup = 'Currently ON'
  429. if cheatNoSweat = 0:$cheatNoSweat = 'Currently OFF'
  430. if cheatNoSweat = 1:$cheatNoSweat = 'Currently ON'
  431. if cheatNoEat = 0:$cheatNoEat = 'Currently OFF'
  432. if cheatNoEat = 1:$cheatNoEat = 'Currently ON'
  433. if cheatNoDrink = 0:$cheatNoDrink = 'Currently OFF'
  434. if cheatNoDrink = 1:$cheatNoDrink = 'Currently ON'
  435. if cheatNoSleep = 0:$cheatNoSleep = 'Currently OFF'
  436. if cheatNoSleep = 1:$cheatNoSleep = 'Currently ON'
  437. if cheatNoMood = 0:$cheatNoMood = 'Currently OFF'
  438. if cheatNoMood = 1:$cheatNoMood = 'Currently ON'
  439. if cheatNoFat = 0:$cheatNoFat = 'Currently OFF'
  440. if cheatNoFat = 1:$cheatNoFat = 'Currently ON'
  441. if cheatHealth = 0:$cheatHealth = 'Enabled'
  442. if cheatHealth = 1:$cheatHealth = 'Disabled'
  443. if NarkImmune = 0:$NarkImmune = 'Currently OFF'
  444. if NarkImmune = 1:$NarkImmune = 'Currently ON'
  445. if cheatSlut = 0:$cheatSlut = 'Enabled'
  446. if cheatSlut = 1:$cheatSlut = 'Disabled'
  447. if cheatHorny = 0:$cheatHorny = 'Currently OFF'
  448. if cheatHorny = 1:$cheatHorny = 'Currently ON'
  449. if bedvibrator = 0:$cheatVib = 'Currently OFF'
  450. if bedvibrator = 1:$cheatVib = 'Currently ON'
  451. if fight_cheat = 0:$fight_cheat = 'Currently OFF'
  452. if fight_cheat = 1:$fight_cheat = 'Currently ON'
  453. if autocombat_cheat = 0:$autocombat_cheat = 'Currently OFF'
  454. if autocombat_cheat = 1:$autocombat_cheat = 'Currently ON'
  455. if cheat_NoPregnancy = 0:$cheat_NoPregnancy = 'Enabled'
  456. if cheat_NoPregnancy = 1:$cheat_NoPregnancy = 'Disabled'
  457. if cheat_NoLactation = 0:$cheat_NoLactation = 'Enabled'
  458. if cheat_NoLactation = 1:$cheat_NoLactation = 'Disabled'
  459. if cheatBimbo = 0:$cheatBimbo = 'Enabled'
  460. if cheatBimbo = 1:$cheatBimbo = 'Disabled'
  461. if cumeater_cheat = 0:$cheatcumtrait = 'Enabled'
  462. if cumeater_cheat = 1:$cheatcumtrait = 'Disabled'
  463. if exhib_cheat = 0:$cheatexhib = 'Enabled'
  464. if exhib_cheat = 1:$cheatexhib = 'Disabled'
  465. if addictive_cheat = 0: $cheataddictive = 'Enabled'
  466. if addictive_cheat = 1: $cheataddictive = 'Disabled'
  467. if cheatConsole = 0:$cheatConsole = 'Visible'
  468. if cheatConsole = 1:$cheatConsole = 'Hidden'
  469. if cheatTime = 0:$cheatTime = 'Disabled'
  470. if cheatTime = 1:$cheatTime = 'Enabled'
  471. if random_bf_gf_cheat = 0: $random_bf_gf_cheat = 'Enabled'
  472. if random_bf_gf_cheat = 1: $random_bf_gf_cheat = 'Disabled'
  473. if cheat_street_robbers = 0: $cheat_street_robbers = 'Enabled'
  474. if cheat_street_robbers = 1: $cheat_street_robbers = 'Disabled'
  475. if cheat_street_rapists = 0: $cheat_street_rapists = 'Enabled'
  476. if cheat_street_rapists = 1: $cheat_street_rapists = 'Disabled'
  477. '<center><h1>Cheat Menu - Recurrent Cheats</h1></center>'
  478. '<center><font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!</center>'
  479. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  480. '<td width="450" cellspacing="0" cellpadding="20" valign="top">'
  481. 'More than one job is possible: <a href="exec:dynamic $cheatmenu[''work'']"><<$cheatWork>></a>'
  482. 'Willpower cost always zero: <a href="exec:dynamic $cheatmenu[''willpower'']"><<$cheatWillpower>></a>'
  483. 'Always combed: <a href="exec:dynamic $cheatmenu[''hair'']"><<$cheatHapri>></a>'
  484. 'Cosmetics never smeared: <a href="exec:dynamic $cheatmenu[''nomakeup'']"><<$cheatNomakeup>></a>'
  485. 'Never sweat: <a href="exec:dynamic $cheatmenu[''nosweat'']"><<$cheatNoSweat>></a>'
  486. 'Never eat: <a href="exec:dynamic $cheatmenu[''noEat'']"><<$cheatNoEat>></a>'
  487. 'Never drink: <a href="exec:dynamic $cheatmenu[''noDrink'']"><<$cheatNoDrink>></a>'
  488. 'Never sleep: <a href="exec:dynamic $cheatmenu[''noSleep'']"><<$cheatNoSleep>></a>'
  489. 'Never unhappy: <a href="exec:dynamic $cheatmenu[''noMood'']"><<$cheatNoMood>></a>'
  490. 'Never lose or gain weight: <a href="exec:dynamic $cheatmenu[''noFat'']"><<$cheatNoFat>></a>'
  491. 'Never get addicted: <a href="exec:dynamic $cheatmenu[''addict'']"><<$NarkImmune>></a>'
  492. if Enable_sforma = 1:
  493. 'Allow any clothing for school: <a href="exec:Enable_sforma = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
  494. else
  495. 'Allow any clothing for school: <a href="exec:Enable_sforma = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
  496. end
  497. *nl
  498. 'Random boyfriend/girlfriend events: <a href="exec:dynamic $cheatmenu[''random_bf_gf'']"><<$random_bf_gf_cheat>></a>'
  499. 'Random robbers in the streets: <a href="exec:dynamic $cheatmenu[''street_robbers'']"><<$cheat_street_robbers>></a>'
  500. 'Random rapists in the streets: <a href="exec:dynamic $cheatmenu[''street_rapists'']"><<$cheat_street_rapists>></a>'
  501. *nl
  502. 'Enable sleeping with vibrator inserted: <a href="exec:dynamic $cheatmenu[''Vibrator'']"><<$cheatVib>></a>'
  503. *nl
  504. 'Automatically win every fight: <a href="exec:dynamic $cheatmenu[''fight'']"><<$fight_cheat>></a>'
  505. 'Automatically resolve non-magical fights: <a href="exec:dynamic $cheatmenu[''autocombat'']"><<$autocombat_cheat>></a>'
  506. *nl
  507. 'Bimbo trait and the effects of wearing bimbo clothes: <a href="exec:dynamic $cheatmenu[''BimboCloth'']"><<$cheatBimbo>></a>'
  508. 'Exhibitionist trait: <a href="exec:dynamic $cheatmenu[''exhib_block'']"><<$cheatexhib>></a>'
  509. 'Addictive personality trait: <a href="exec:dynamic $cheatmenu[''addictive_block'']"><<$cheataddictive>></a>'
  510. 'Cumeater trait: <a href="exec:dynamic $cheatmenu[''cumtrait_block'']"><<$cheatcumtrait>></a>'
  511. *nl
  512. 'Set arousal to always be at 50 or more: <a href="exec:dynamic $cheatmenu[''cheatHorny'']"><<$cheatHorny>></a>'
  513. 'Periods (and pregnancies): <a href="exec:dynamic $cheatmenu[''slutshot'']"><<$cheatSlut>></a>'
  514. 'Impregnation: <a href="exec:dynamic $cheatmenu[''cheat_NoPregnancy'']"><<$cheat_nopregnancy>></a>'
  515. 'Lactation: <a href="exec:dynamic $cheatmenu[''cheat_NoLactation'']"><<$cheat_nolactation>></a>'
  516. 'STDs: <a href="exec:dynamic $cheatmenu[''health'']"><<$cheatHealth>></a>'
  517. *nl
  518. if Enable_autotampon = 1:
  519. 'Automatic cheat on Tampon: <a href="exec:Enable_autotampon = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
  520. else
  521. 'Automatic cheat on Tampon: <a href="exec:Enable_autotampon = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
  522. end
  523. *nl
  524. if Enable_nodream > 0:
  525. 'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']"><<Enable_nodream>>%</a>, <a href="exec:Enable_nodream=0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
  526. else
  527. 'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
  528. end & !1.2.3 new function
  529. *nl
  530. 'Hide Console input in objects window: <a href="exec:dynamic $cheatmenu[''consolecheat'']"><<$cheatConsole>></a>'
  531. 'Time Cheat in Objects window: <a href="exec:dynamic $cheatmenu[''timecheat'']"><<$cheatTime>></a>'
  532. *nl
  533. '<font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!'
  534. '</tr></table></b></center>'
  535. }
  536. $cheatmenu['state'] = {
  537. gs'stat'
  538. *clr & cla
  539. gs 'obj_din', 'cheattabs'
  540. '<center><h1>Cheat Menu - Character State Changes</h1></center>'
  541. '<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save. Cheats manipulating pregnancy or the menstrual cycle are'
  542. 'especially dangerous unless you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
  543. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  544. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  545. 'Set alcohol levels:'
  546. '<a href="exec:alko = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Sober</a> <a href="exec:alko = 2 & dynamic $cheatmenu[''state''] & gs ''stat''">Tipsy</a> <a href="exec:alko = 4 & dynamic $cheatmenu[''state''] & gs ''stat''">Drunk</a> <a href="exec:alko = 7 & dynamic $cheatmenu[''state''] & gs ''stat''">Wasted</a> <a href="exec:alko = 11 & dynamic $cheatmenu[''state''] & gs ''stat''">Barely coherent</a>'
  547. *nl
  548. '<a href="exec:pcs_horny = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Max arousal</a>'
  549. '<a href="exec:pcs_horny = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Min arousal</a>'
  550. '<a href="exec:dynamic $cheatmenu[''bodyMod'']">Body Modification</a>'
  551. *nl
  552. '<a href="exec:pcs_health = pcs_vital*10 + pcs_stren*5+1000 & pcs_willpwr = pcs_intel*5 + will*5+1000 & pcs_mana = (pcs_intel*pcs_magik) + pcs_magik*100 + pcs_vital*10 + rikudo & vgape = 0 & agape = 0 & nippain = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Health, Mana, Reason.</a>'
  553. '<a href="exec:pcs_sleep = 100 & pcs_stam = stammax & pcs_mood = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Sleep, Stamina, Mood.</a>'
  554. '<a href="exec:pcs_energy = 200 & pcs_hydra = 200 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Hunger and Water.</a>'
  555. '<a href="exec:dynamic $cheatmenu[''money''] & gs ''stat''">Change money</a>'
  556. '<a href="exec:money = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Zero money</a>'
  557. '<a href="exec:dynamic $cheatmenu[''std_cure''] & gs ''stat''">Cure all stds</a>'
  558. '<a href="exec:vgape = 0 & agape = 0 & nippain = 0 & painpub = 0 & pirs_pain_ton = 0 & mesec = 0 & spanked = 0 & SLomka = 0 & Narkoman = 0 & strongnark = 0 & SNarkTimes = 0 & nark = 0 & fingal = 0 & mosol = 0 & frost = 0 & sick = 0 & hypnoAddict = 0 & hypnoWithdrawal = 0 & dynamic $cheatmenu[''std_cure''] & dynamic $cheatmenu[''pain_killer''] & gs ''stat''">Cure all ailments.</a>'
  559. *nl
  560. '<a href="exec:dynamic $cheatmenu[''force_preg''] & gs ''stat''">Force random pregnancy</a>'
  561. '<a href="exec:dynamic $cheatmenu[''remove_preg''] & gs ''stat''">Remove pregnancy</a>'
  562. '<a href="exec:gs''cum_cleanup'',''reset'' & dynamic $cheatmenu[''state''] & gs ''stat''">Remove all cum</a>'
  563. '<a href="exec:dynamic $cheatmenu[''cycle''] & gs ''stat''">Set stage of menstrual cycle</a>'
  564. if lactation['active'] <= 0:
  565. 'You are not lactating'
  566. 'Your current prolactinlvl is <<lactation[''prolactinlvl'']>>ng/ml.'
  567. '<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch ON</a>'
  568. else
  569. 'You are lactating'
  570. '<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch OFF</a>'
  571. if lactation['milkprod_type'] = 1:
  572. 'The milk production is <a href="exec: lactation[''milkprod_type''] = 0 & dynamic $cheatmenu[''state'']">realistic</a>. <<$pcs_firstname>> will produce breast milk based on her body resources.'
  573. elseif lactation['milkprod_type'] = 0:
  574. 'The milk production is <a href="exec: lactation[''milkprod_type''] = 1 & dynamic $cheatmenu[''state'']">permanent</a>. <<$pcs_firstname>> will produce breast milk disregarding her condition.'
  575. else
  576. lactation['milkprod_type'] = 1
  577. end
  578. if lactation['lactaterate'] <= 0:
  579. 'Lactate Rate: <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
  580. elseif lactation['lactaterate'] >= 600000:
  581. 'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h'
  582. else
  583. 'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
  584. if lactation['caplactaterate'] <= 0:
  585. 'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] = 24 & dynamic $cheatmenu[''state'']">Switch ON</a>'
  586. elseif lactation['caplactaterate'] >= 72:
  587. 'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] -= 24 & dynamic $cheatmenu[''state'']">-24h</a> <<lactation[''caplactaterate'']>>h'
  588. else
  589. 'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] -= 24 & dynamic $cheatmenu[''state'']">-24h</a> <<lactation[''caplactaterate'']>>h <a href="exec:lactation[''caplactaterate''] += 24 & dynamic $cheatmenu[''state'']">+24h</a>'
  590. end
  591. '<font color="grey">Cap lactate rate makes lactate rate stop growing if <<$pcs_firstname>> needs milking more often.</font>'
  592. end
  593. 'Milk in Breasts: <<lactation[''breastmv'']/1000>>ml'
  594. 'Max Milk Storage: <<lactation[''breastmm'']/1000>>ml'
  595. '<font color="grey">Maximum milk storage changes with breast size, and if <<$pcs_firstname>> went through pregnancy</font>'
  596. if lactation['induced'] <= 0:
  597. 'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 1 & dynamic $cheatmenu[''state'']">no</a>'
  598. else
  599. 'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 0 & dynamic $cheatmenu[''state'']">yes</a>'
  600. end
  601. '<font color="grey">Does <<$pcs_firstname>> know she induced lactation herself, or not? (This is only used for some events.)</font>'
  602. end
  603. '</tr></table></b></center>'
  604. }
  605. $cheatmenu['avatar_hair_set'] = {
  606. $av_hair = input("Input your custom hair:")
  607. if $av_hair='':exit
  608. avatar_hair = 1
  609. dynamic $cheatmenu['looks']
  610. }
  611. $cheatmenu['rename'] = {
  612. !! player name is set in preSYS.qsrc
  613. $temp_firstname = '<<$pcs_firstname>>'
  614. $pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
  615. if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
  616. killvar '$temp_firstname'
  617. $temp_lastname = '<<$pcs_lastname>>'
  618. $pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
  619. if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
  620. killvar '$temp_lastname'
  621. $temp_nickname = '<<$pcs_nickname>>'
  622. $pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
  623. if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
  624. killvar '$temp_nickname'
  625. }
  626. $cheatmenu['looks'] = {
  627. *clr & cla
  628. if pcs_hgt < 100:
  629. pcs_hgt = 100
  630. elseif pcs_hgt > 200:
  631. pcs_hgt = 200
  632. end
  633. gs 'obj_din', 'cheattabs'
  634. gs'stat'
  635. '<center><h1>Cheat Menu - Character Appearance</h1></center>'
  636. '<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save, use them with care. When reporting bugs, please mention any cheats you used.</center>'
  637. *nl
  638. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  639. '<tr><td width="33%" cellpadding="20" valign="top">'
  640. '<<$pcs_firstname>> <<$pcs_lastname>> (<<$pcs_nickname>>). <a href="exec:dynamic $cheatmenu[''rename'']">Rename</a>'
  641. if player_avatar = 1:
  642. 'Custom Avatar: <a href="exec:player_avatar = 0 & dynamic $cheatmenu[''looks'']">ON</a>'
  643. else
  644. 'Custom Avatar: <a href="exec:player_avatar = 1 & dynamic $cheatmenu[''looks'']">OFF</a>'
  645. end
  646. if avatar_hair = 1:
  647. '<a href="exec:avatar_hair = 0 & dynamic $cheatmenu[''looks'']">Custom Hair: ON</a>'
  648. '<<$av_hair>>'
  649. else
  650. '<a href="exec:dynamic $cheatmenu[''avatar_hair_set'']">Custom Hair: OFF</a>'
  651. end
  652. *nl
  653. '<a href="exec:dynamic $cheatmenu[''parameters'']">Show design parameters of body</a>'
  654. '<a href="exec:dynamic $cheatmenu[''vneshpara'']">Show beauty parameters</a>'
  655. *nl
  656. 'You are <a href="exec: pcs_dob += 10000 & dynamic $cheatmenu[''age'']">(-1)</a> <<age>> <a href="exec: pcs_dob -= 10000 & dynamic $cheatmenu[''age'']">(+1)</a> years old'
  657. *nl
  658. '<a href=>You look <<vidage>> years old</a>'
  659. '<a href="exec:dynamic $cheatmenu[''visualage'']">Change apparent age</a>'
  660. *nl
  661. '<a href=>You are <<pcs_hgt>> centimetres tall</a>'
  662. '<a href="exec:pcs_hgt = input(''Enter <<$pcs_nickname>>s height in centimetres<br><br>(default 170, min 100, max 200, values below 160 and above 180 will cause problems in the calculation of BMI/weight the more you deviate from the default 170)'') & dynamic $cheatmenu[''looks'']">Change <<$pcs_nickname>>''s height</a>'
  663. *nl
  664. 'You have <<$titsize>> breasts'
  665. if tits => 0 and tits < 11:'<a href="exec:silicone += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(silicone)</a>'
  666. if silicone => 1:'<a href="exec:silicone -= 5 & dynamic $cheatmenu[''looks'']">Shrink breasts(silicone)</a>'
  667. if tits => 0 and tits < 11:'<a href="exec:nbsize += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(natural)</a>'
  668. if nbsize => 1:'<a href="exec:nbsize -= 5 & titreduc = 1 & dynamic $cheatmenu[''looks'']">Shrink breasts(natural)</a>'
  669. *nl
  670. if pcs_butt <= 4:
  671. $pcs_butt[1] = 'flat'
  672. elseif pcs_butt <= 8:
  673. $pcs_butt[1] = 'average'
  674. elseif pcs_butt <= 12:
  675. $pcs_butt[1] = 'pert'
  676. else
  677. $pcs_butt[1] = 'bubble'
  678. end
  679. 'You have <<$pcs_butt[1]>> butt'
  680. if pcs_butt < 20:'<a href="exec:butt_cheat += 2 & dynamic $cheatmenu[''looks'']">Enlarge butt</a>'
  681. if pcs_butt > 1:'<a href="exec:butt_cheat -= 2 & dynamic $cheatmenu[''looks'']">Shrink butt</a>'
  682. if butt_cheat ! 0:'<a href="exec:butt_cheat = 0 & dynamic $cheatmenu[''looks'']">Reset butt shape to default</a>'
  683. if silicone_butt => 1:'<a href="exec:silicone_butt = 0 & dynamic $cheatmenu[''looks'']">Remove butt implants</a>'
  684. if silicone_butt = 0:'<a href="exec:silicone_butt += 16 & dynamic $cheatmenu[''looks'']">Add butt implants</a>'
  685. *nl
  686. '<<$lip>>'
  687. if pcs_lip < 4:'<a href="exec:pcs_lip += 1 & dynamic $cheatmenu[''looks'']">Enlarge lips</a>'
  688. if pcs_lip > 0:'<a href="exec:pcs_lip -= 1 & dynamic $cheatmenu[''looks'']">Shrink lips</a>'
  689. *nl
  690. '<<$skin>>'
  691. if pcs_skin < 100: '<a href="exec:pcs_skin += 20 & gs ''body_shape'', ''basebeautycalc'', 1 & dynamic $cheatmenu[''looks'']">Improve skin</a>'
  692. if pcs_skin > 0: '<a href="exec:pcs_skin -= 20 & gs ''body_shape'', ''basebeautycalc'', 1 & dynamic $cheatmenu[''looks'']">Worsen skin</a>'
  693. if pcs_tan >= 0:'<a href="exec:pcs_tan += 10 & dynamic $cheatmenu[''looks'']">Become tanned</a>'
  694. if pcs_tan > 0:'<a href="exec:pcs_tan = 0 & dynamic $cheatmenu[''looks'']">Remove tan</a>'
  695. *nl
  696. '<<$pcs_throat>>'
  697. if pcs_throat <= 31:'<a href="exec:pcs_throat += 5 & dynamic $cheatmenu[''looks'']">Increase throat capacity</a>'
  698. if pcs_throat >= 5:'<a href="exec:pcs_throat -= 5 & dynamic $cheatmenu[''looks'']">Decrease throat capacity</a>'
  699. if dounspell = 1:
  700. *nl
  701. '<a href="exec:dounsplkil = 2 & gs ''body_shape'', ''hardreset''">Hard Reset body shape</a>'
  702. end
  703. '</td><td width="33%" cellpadding="20" valign="top">'
  704. '<<$pcs_vag>>'
  705. if pcs_vag > 0:'<a href="exec:pcs_vag = 0 & dynamic $cheatmenu[''looks'']">Reinstate virginity</a>'
  706. if pcs_vag <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''vagenlarge''">Enlarge comfortable vaginal capacity</a>'
  707. if pcs_vag >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''vagreduce''">Reduce comfortable vaginal capacity</a>'
  708. 'Your comfortable vaginal capacity will reduce by <<vshrink>> every <<vshrinkdays>> days.'
  709. if vshrink < 10:'<a href="exec:vshrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
  710. if vshrink > 0:'<a href="exec:vshrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
  711. if vshrinkdays < 10:'<a href="exec:vshrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
  712. if vshrinkdays > 1:'<a href="exec:vshrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
  713. 'When gaped your vagina will reduce each stage (up to 4 for maximum gape) every <<vgape[4]>> minutes.'
  714. if vgape[4] < 60:'<a href="exec:vgape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
  715. if vgape[4] > 5:'<a href="exec:vgape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
  716. *nl
  717. '<<$pcs_ass>>'
  718. if pcs_ass <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''assenlarge''">Enlarge comfortable anal capacity</a>'
  719. if pcs_ass >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''assreduce''">Reduce comfortable anal capacity</a>'
  720. 'Your comfortable anal capacity will reduce by <<ashrink>> every <<ashrinkdays>> days.'
  721. if ashrink < 10:'<a href="exec:ashrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
  722. if ashrink > 0:'<a href="exec:ashrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
  723. if ashrinkdays < 10:'<a href="exec:ashrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
  724. if ashrinkdays > 1:'<a href="exec:ashrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
  725. 'When gaped your anus will reduce each stage (up to 4 for maximum gape) every <<agape[4]>> minutes.'
  726. if agape[4] < 60:'<a href="exec:agape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
  727. if agape[4] > 5:'<a href="exec:agape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
  728. *nl
  729. if dounspell = 0:
  730. if fat ! 0: '<a href="exec:fat = 0 & dynamic $cheatmenu[''looks'']">Zero fat</a>'
  731. 'Body Fat = (<<salo>>): <a href="exec:salo -= 10 & gs ''body_shape'', ''softreset'' & dynamic $cheatmenu[''looks'']">-10</a> <a href="exec:salo -= 5 & gs ''body_shape'', ''softreset'' & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:salo -= 1 & gs ''body_shape'', ''softreset'' & dynamic $cheatmenu[''looks'']">-1</a> <a href="exec:salo += 1 & gs ''body_shape'', ''softreset'' & dynamic $cheatmenu[''looks'']">+1</a> <a href="exec:salo += 5 & gs ''body_shape'', ''softreset'' & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:salo += 10 & gs ''body_shape'', ''softreset'' & dynamic $cheatmenu[''looks'']">+10</a>'
  732. 'Note: You need some Body Fat to survive, any value under 11 is clasified as "starving" and a value of 0 can lead to a Game Over.'
  733. end
  734. *nl
  735. '<a href="exec:dynamic $cheatmenu[''tatoo'']">Tattoo removal</a>'
  736. '</td><td width="33%" cellpadding="20" valign="top">'
  737. '<<$hair>>'
  738. if pcs_haircol = 0:
  739. 'Your hair is now (prev) <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks''] & nathcol = pcs_haircol">(next)</a>'
  740. elseif pcs_haircol > 0 and pcs_haircol < 3:
  741. 'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks'']" & nathcol = pcs_haircol>(prev)</a> <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks'']" & pcs_haircol = nathcol>(next)</a>'
  742. elseif pcs_haircol = 3:
  743. 'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks'']" & nathcol = pcs_haircol>(prev)</a> <<$pcs_haircol>> (next)'
  744. else
  745. 'To change your natural hair color, you have to <a href="exec:pcs_haircol = nathcol & dynamic $cheatmenu[''looks'']">restore your natural hair color</a> first.'
  746. end
  747. if pcs_hairlng > 975:
  748. 'Hair length (<<pcs_hairlng>>) <a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a>'
  749. elseif pcs_hairlng > 900:
  750. 'Hair length (<<pcs_hairlng>>) <a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a>'
  751. elseif pcs_hairlng >= 100:
  752. 'Hair length (<<pcs_hairlng>>) <a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
  753. elseif pcs_hairlng >= 25:
  754. 'Hair length (<<pcs_hairlng>>) <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
  755. elseif pcs_hairlng >= 5:
  756. 'Hair length (<<pcs_hairlng>>) <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
  757. else
  758. 'Hair length (<<pcs_hairlng>>) <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
  759. end
  760. if hairgrowcht = 0:'<a href="exec:hairgrowcht = 1 & dynamic $cheatmenu[''looks'']">Stop hair growth</a>'
  761. if hairgrowcht = 1:'<a href="exec:hairgrowcht = 0 & dynamic $cheatmenu[''looks'']">Allow hair growth</a>'
  762. *nl
  763. '<<$glaza>>'
  764. if pcs_naturallashes < 2:'<a href="exec:pcs_naturallashes += 1 & dynamic $cheatmenu[''looks'']">Enlarge lashes</a>'
  765. if pcs_naturallashes > 0:'<a href="exec:pcs_naturallashes -= 1 & dynamic $cheatmenu[''looks'']">Shrink lashes</a>'
  766. if pcs_eyesize < 3:'<a href="exec:pcs_eyesize += 1 & dynamic $cheatmenu[''looks'']">Increase the size of the eye</a>'
  767. if pcs_eyesize > 0:'<a href="exec:pcs_eyesize -= 1 & dynamic $cheatmenu[''looks'']">Reduce the size of the eye</a>'
  768. if pcs_eyecol <= 0:
  769. 'Your eyes are now (prev) <<$pcs_eyecol>> <a href="exec:pcs_eyecol +=1 & dynamic $cheatmenu[''looks'']">(next)</a>'
  770. elseif pcs_eyecol > 0 and pcs_eyecol < 3:
  771. 'Your eyes are now <a href="exec:pcs_eyecol -=1 & dynamic $cheatmenu[''looks'']">(prev)</a> <<$pcs_eyecol>> <a href="exec:pcs_eyecol +=1 & dynamic $cheatmenu[''looks'']">(next)</a>'
  772. elseif pcs_eyecol >= 3:
  773. 'Your eyes are now <a href="exec:pcs_eyecol -=1 & dynamic $cheatmenu[''looks'']">(prev)</a> <<$pcs_eyecol>> (next)'
  774. end
  775. '</td></tr></table></center>'
  776. }
  777. if $ARGS[0] = 'vagenlarge':
  778. if pcs_vag = 0:
  779. pcs_vag = 5
  780. elseif pcs_vag <= 5:
  781. pcs_vag = 10
  782. elseif pcs_vag <= 10:
  783. pcs_vag = 15
  784. elseif pcs_vag <= 15:
  785. pcs_vag = 25
  786. elseif pcs_vag <= 25:
  787. pcs_vag = 35
  788. end
  789. dynamic $cheatmenu['looks']
  790. end
  791. if $ARGS[0] = 'vagreduce':
  792. if pcs_vag > 25:
  793. pcs_vag = 25
  794. elseif pcs_vag > 15:
  795. pcs_vag = 15
  796. elseif pcs_vag > 10:
  797. pcs_vag = 10
  798. elseif pcs_vag > 5:
  799. pcs_vag = 1
  800. end
  801. dynamic $cheatmenu['looks']
  802. end
  803. if $ARGS[0] = 'assenlarge':
  804. if pcs_ass = 0:
  805. pcs_ass = 5
  806. elseif pcs_ass <= 5:
  807. pcs_ass = 10
  808. elseif pcs_ass <= 10:
  809. pcs_ass = 15
  810. elseif pcs_ass <= 15:
  811. pcs_ass = 25
  812. elseif pcs_ass <= 25:
  813. pcs_ass = 35
  814. end
  815. dynamic $cheatmenu['looks']
  816. end
  817. if $ARGS[0] = 'assreduce':
  818. if pcs_ass > 25:
  819. pcs_ass = 25
  820. elseif pcs_ass > 15:
  821. pcs_ass = 15
  822. elseif pcs_ass > 10:
  823. pcs_ass = 10
  824. elseif pcs_ass > 5:
  825. pcs_ass = 1
  826. end
  827. dynamic $cheatmenu['looks']
  828. end
  829. $cheatmenu['parameters'] = {
  830. *clr & cla
  831. '<center><h1>Cheat Menu - Appearance Stats</h1></center>'
  832. act 'Return to appearance menu':dynamic $cheatmenu['looks']
  833. *nl
  834. 'Body Shape Parameters'
  835. '<<pcs_bust>> - <<pcs_waist>> - <<pcs_hips>>, <<$titsize>> breasts, the difference between the hips and waist <<pcs_hips-pcs_waist>> cm'
  836. 'Muscularity: musle = <<musle>>, salo = <<salo>>, fat = <<fat>>'
  837. 'Variable List:'
  838. 'agilbuf = <<agilbuf>>'
  839. 'strenbuf = <<strenbuf>>'
  840. 'vitalbuf = <<vitalbuf>>'
  841. 'BMI (bmi_calc) = <<bmi_calc>>'
  842. 'weight (pcs_weight) = <<pcs_weight>> kg'
  843. 'bust (pcs_bust) = <<pcs_bust>>'
  844. 'band (pcs_band) = <<pcs_band>>'
  845. 'waist (pcs_waist) = <<pcs_waist>>'
  846. 'hips (pcs_hips) = <<pcs_hips>>'
  847. 'bust - band (pcs_cupsize) = <<pcs_cupsize>>'
  848. 'silicone = <<silicone>>'
  849. 'nbsize = <<nbsize>>'
  850. 'magicf2b = <<magicf2b>>'
  851. 'genbsize = <<genbsize>>'
  852. 'vhips = <<vhips>>'
  853. 'vhtmp = <<vhtmp>>'
  854. 'wratio = <<wratio>>'
  855. 'bratio = <<bratio>>'
  856. 'hratio = <<hratio>>'
  857. 'vofat = <<vofat>>'
  858. 'salocatnow = <<salocatnow>>'
  859. 'salocatlast = <<salocatlast>>'
  860. 'magf2bdo = <<magf2bdo>>'
  861. 'mgf2bnocnt = <<mgf2bnocnt>>'
  862. 'magtarcup = <<magtarcup>>'
  863. 'normbuffpick = <<normbuffpick>>'
  864. 'nrmbfpckct = <<nrmbfpckct>>'
  865. 'btwarn = <<btwarn>>'
  866. 'salolast = <<salolast>>'
  867. }
  868. $cheatmenu['vneshpara'] = {
  869. *clr & cla
  870. '<center><h1>Cheat Menu - ?</h1></center>'
  871. act 'Return to appearance menu':dynamic $cheatmenu['looks']
  872. *nl
  873. 'Appearance Parameters'
  874. 'vidage = <<vidage>>'
  875. 'pcs_naturallashes = <<pcs_naturallashes>>'
  876. 'pcs_eyesize = <<pcs_eyesize>>'
  877. 'pcs_lip = <<pcs_lip>>'
  878. 'pcs_apprncbase = <<pcs_apprncbase>>'
  879. 'PXCloThinness = <<PXCloThinness>>'
  880. 'PXCloTopCut = <<PXCloTopCut>>'
  881. 'PXCloBottomShortness = <<PXCloBottomShortness>>'
  882. 'CloTotalBeauty = <<CloTotalBeauty>>'
  883. 'mopkoef = <<mopkoef>>'
  884. 'pcs_hairbsh = <<pcs_hairbsh>>'
  885. 'lipbalmKoef = <<lipbalmKoef>>'
  886. 'pcs_breath = <<pcs_breath>>'
  887. 'sweatKoef = <<sweatKoef>>'
  888. 'glassvnesh = <<glassvnesh>>'
  889. 'dyevmod = <<dyevmod>>'
  890. 'hairkoef = <<hairkoef>>'
  891. 'legkoef = <<legkoef>>'
  892. }
  893. $cheatmenu['tatoo'] = {
  894. gs'stat'
  895. *clr & cla
  896. '<center><h1>Cheat Menu - Tattoos</h1></center>'
  897. act 'Return to appearance menu':dynamic $cheatmenu['looks']
  898. *nl
  899. if tatarm = 0:'You do not have a tattoo on your arm</a>'
  900. if tatarm >= 1:'<a href="exec:tattCount-=1 & tatarm = 0 & dynamic $cheatmenu[''tatoo'']">Remove your arm tattoo</a>'
  901. if tatass = 0:'You do not have a tattoo on your ass</a>'
  902. if tatass >= 1:'<a href="exec:tattCount-=1 & tatass = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ass tattoo</a>'
  903. if tatback = 0:'You do not have a tattoo on your back</a>'
  904. if tatback >= 1:'<a href="exec:tattCount-=1 & tatback = 0 & dynamic $cheatmenu[''tatoo'']">Remove your back tattoo</a>'
  905. if tatblly = 0:'You do not have a tattoo on your belly</a>'
  906. if tatblly >= 1:'<a href="exec:tattCount-=1 & tatblly = 0 & dynamic $cheatmenu[''tatoo'']">Remove your belly tattoo</a>'
  907. if tatbrst = 0:'You do not have a tattoo on your breast</a>'
  908. if tatbrst >= 1:'<a href="exec:tattCount-=1 & tatbrst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your breast tattoo</a>'
  909. if tatchst = 0:'You do not have a tattoo on your chest</a>'
  910. if tatchst >= 1:'<a href="exec:tattCount-=1 & tatchst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your chest tattoo</a>'
  911. if tatfce = 0:'You do not have a tattoo on your face</a>'
  912. if tatfce >= 1:'<a href="exec:tattCount-=1 & tatfce = 0 & dynamic $cheatmenu[''tatoo'']">Remove your face tattoo</a>'
  913. if tatankle = 0:'You do not have a tattoo on your ankle</a>'
  914. if tatankle >= 1:'<a href="exec:tattCount-=1 & tatankle = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ankle tattoo</a>'
  915. if tatleg = 0:'You do not have a tattoo on your leg</a>'
  916. if tatleg >= 1:'<a href="exec:tattCount-=1 & tatleg = 0 & dynamic $cheatmenu[''tatoo'']">Remove your leg tattoo</a>'
  917. if tatlip = 0:'You do not have a tattoo on your lip</a>'
  918. if tatlip >= 1:'<a href="exec:tattCount-=1 & tatlip = 0 & dynamic $cheatmenu[''tatoo'']">Remove your lip tattoo</a>'
  919. if tatneck = 0:'You do not have a tattoo on your neck</a>'
  920. if tatneck >= 1:'<a href="exec:tattCount-=1 & tatneck = 0 & dynamic $cheatmenu[''tatoo'']">Remove your neck tattoo</a>'
  921. if tatvag = 0:'You do not have a public tattoo</a>'
  922. if tatvag >= 1:'<a href="exec:tattCount-=1 & tatvag = 0 & dynamic $cheatmenu[''tatoo'']">Remove your pubic tattoo</a>'
  923. if tatlech = 0:'You do not have a tattoo on your shoulder</a>'
  924. if tatlech >= 1:'<a href="exec:tattCount-=1 & tatlech = 0 & dynamic $cheatmenu[''tatoo'']">Remove your shoulder tattoo</a>'
  925. if tatside = 0:'You do not have a tattoo on your side</a>'
  926. if tatside >= 1:'<a href="exec:tattCount-=1 & tatside = 0 & dynamic $cheatmenu[''tatoo'']">Remove your the tattoo on your side</a>'
  927. if tatupb = 0:'You do not have a tramp stamp</a>'
  928. if tatupb >= 1:'<a href="exec:tattCount-=1 & tatupb = 0 & dynamic $cheatmenu[''tatoo'']">Remove your tramp stamp</a>'
  929. if tatunder = 0:'You do not have an under breast tattoo</a>'
  930. if tatunder >= 1:'<a href="exec:tattCount-=1 & tatunder = 0 & dynamic $cheatmenu[''tatoo'']">Remove your under breast tattoo</a>'
  931. if tatwrist = 0:'You do not have a tattoo on your wrist</a>'
  932. if tatwrist >= 1:'<a href="exec:tattCount-=1 & tatwrist = 0 & dynamic $cheatmenu[''tatoo'']">Remove your wrist tattoo</a>'
  933. if tathand = 0:'You do not have a tattoo on your hand</a>'
  934. if tathand >= 1:'<a href="exec:tattCount-=1 & tathand = 0 & dynamic $cheatmenu[''tatoo'']">Remove your hand tattoo</a>'
  935. }
  936. $cheatmenu['setStat'] = {
  937. temp_input = input("Set your <<$ARGS[1]>> level:")
  938. dynamic "
  939. <<$ARGS[0]>>_lvl = temp_input
  940. <<$ARGS[0]>>_lvlst = temp_input
  941. "
  942. killvar 'temp_input'
  943. dynamic $cheatmenu['stats']
  944. }
  945. $cheatmenu['setStat1'] = {
  946. temp_input = input("Set your <<$ARGS[1]>> level:")
  947. dynamic "
  948. <<$ARGS[0]>>_lvl = 100 - temp_input
  949. <<$ARGS[0]>>_lvlst = 100 - temp_input
  950. "
  951. killvar 'temp_input'
  952. dynamic $cheatmenu['stats']
  953. }
  954. $cheatmenu['setAttrs'] = {
  955. loop_index = 0
  956. :set_attrs_loop
  957. dynamic "
  958. <<$att_name[loop_index]>>_lvl = <<ARGS[0]>>
  959. <<$att_name[loop_index]>>_lvlst = <<ARGS[0]>>
  960. "
  961. loop_index += 1
  962. ! Magic is the last attribute, so if it's a non-magic game we'll end the loop one iteration early
  963. if MagikDostup = 0 and loop_index < arrsize('$att_name'):
  964. jump 'set_attrs_loop'
  965. elseif loop_index < arrsize('$att_name') - 1:
  966. jump 'set_attrs_loop'
  967. end
  968. killvar 'loop_index'
  969. dynamic $cheatmenu['stats']
  970. }
  971. $cheatmenu['setSkills'] = {
  972. loop_index = 0
  973. :set_skills_loop
  974. !! Inhibition (number 33) isn''t a skill so we''ll skip it
  975. if loop_index ! 33:
  976. dynamic "
  977. <<$skl_name[loop_index]>>_lvl = <<ARGS[0]>>
  978. <<$skl_name[loop_index]>>_lvlst = <<ARGS[0]>>
  979. "
  980. loop_index += 1
  981. else
  982. loop_index += 1
  983. dynamic "
  984. <<$skl_name[loop_index]>>_lvl = <<ARGS[0]>>
  985. <<$skl_name[loop_index]>>_lvlst = <<ARGS[0]>>
  986. "
  987. end
  988. !! The size of the array is reduced by 1 because we skipped inhibition
  989. if loop_index < arrsize('$skl_name') - 1: jump 'set_skills_loop'
  990. killvar 'loop_index'
  991. dynamic $cheatmenu['stats']
  992. }
  993. $cheatmenu['printStatLinks'] = {
  994. *p '<a href="exec:<<$ARGS[0]>>_lvl = 100 & <<$ARGS[0]>>_lvlst = 100 & dynamic $cheatmenu[''stats'']" >Max</a> '
  995. *p '<a href="exec:<<$ARGS[0]>>_lvl += 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >+1</a> '
  996. *p '<a href="exec:<<$ARGS[0]>>_lvl += 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >+10</a> '
  997. *p '<a href="exec:<<$ARGS[0]>>_lvl -= 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >-1</a> '
  998. *p '<a href="exec:<<$ARGS[0]>>_lvl -= 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >-10</a> '
  999. *p '<a href="exec:<<$ARGS[0]>>_lvl = 0 & <<$ARGS[0]>>_lvlst = 0 & dynamic $cheatmenu[''stats'']" >Min</a> '
  1000. *pl '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''" >Set</a>'
  1001. }
  1002. $cheatmenu['printStatLinks1'] = {
  1003. *p '<a href="exec:<<$ARGS[0]>>_lvl = 0 & <<$ARGS[0]>>_lvlst = 0 & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >Max</a> '
  1004. *p '<a href="exec:<<$ARGS[0]>>_lvl -= 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >+1</a> '
  1005. *p '<a href="exec:<<$ARGS[0]>>_lvl -= 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >+10</a> '
  1006. *p '<a href="exec:<<$ARGS[0]>>_lvl += 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >-1</a> '
  1007. *p '<a href="exec:<<$ARGS[0]>>_lvl += 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >-10</a> '
  1008. *p '<a href="exec:<<$ARGS[0]>>_lvl = 100 & <<$ARGS[0]>>_lvlst = 100 & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >Min</a> '
  1009. *pl '<a href="exec:dynamic $cheatmenu[''setStat1''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''" >Set</a>'
  1010. }
  1011. $cheatmenu['stats'] = {
  1012. gs 'stat'
  1013. *clr & cla
  1014. gs 'obj_din', 'cheattabs'
  1015. !Set a floor and ceiling for all attributes and skills
  1016. loop_index = 0
  1017. :attr_trim_loop
  1018. dynamic "
  1019. if <<$att_name[loop_index]>>_lvl < 0: <<$att_name[loop_index]>>_lvl = 0
  1020. if <<$att_name[loop_index]>>_lvlst < 0: <<$att_name[loop_index]>>_lvlst = 0
  1021. if <<$att_name[loop_index]>>_lvl > 100: <<$att_name[loop_index]>>_lvl = 100
  1022. if <<$att_name[loop_index]>>_lvlst > 100: <<$att_name[loop_index]>>_lvlst = 100
  1023. "
  1024. loop_index += 1
  1025. if loop_index < arrsize('$att_name'): jump 'attr_trim_loop'
  1026. loop_index = 0
  1027. :skill_trim_loop
  1028. dynamic "
  1029. if <<$skl_name[loop_index]>>_lvl < 0: <<$skl_name[loop_index]>>_lvl = 0
  1030. if <<$skl_name[loop_index]>>_lvlst < 0: <<$skl_name[loop_index]>>_lvlst = 0
  1031. if <<$skl_name[loop_index]>>_lvl > 100: <<$skl_name[loop_index]>>_lvl = 100
  1032. if <<$skl_name[loop_index]>>_lvlst > 100: <<$skl_name[loop_index]>>_lvlst = 100
  1033. "
  1034. loop_index += 1
  1035. if loop_index < arrsize('$skl_name'): jump 'skill_trim_loop'
  1036. killvar 'loop_index'
  1037. '<center><h1>Cheat Menu - Attributes and Skills</h1></center>'
  1038. '<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save, use them with care. When reporting bugs, please mention any cheats you used.</center>'
  1039. *nl
  1040. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  1041. '<tr><td width="50%" cellpadding="10" valign="top">'
  1042. *pl'<b>Attributes</b> (values 0 - 100):'
  1043. *pl '<a href="exec:dynamic $cheatmenu[''setAttrs''], 100" >Max Attributes</a> <a href="exec:dynamic $cheatmenu[''setAttrs''], 0" >Min Attributes</a>'
  1044. *p 'Strength (<<stren_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'stren', 'Strength'
  1045. *p 'Agility (<<agil_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'agil', 'Agility'
  1046. *p 'Endurance (<<vital_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'vital', 'Endurance'
  1047. *p 'Intelligence (<<intel_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'intel', 'Intelligence'
  1048. *p 'Reaction (<<react_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'react', 'Reaction'
  1049. *p 'Spirit (<<sprt_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'sprt', 'Spirit'
  1050. *p 'Charisma (<<chrsm_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'chrsm', 'Charisma'
  1051. *p 'Perception (<<prcptn_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'prcptn', 'Perception'
  1052. if MagikDostup = 0: *p 'Magic (<<magik_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'magik', 'Magic'
  1053. *nl
  1054. *pl'<b>Sexual:</b>'
  1055. *pl 'Inhibition level (<<100 - inhib_lvl>>): ' & dynamic $cheatmenu['printStatLinks1'], 'inhib', 'Inhibition'
  1056. if willpowermax > 200: willpowermax = 200
  1057. if willpowermax < 50: willpowermax = 50
  1058. *pl 'Willpower Maximum (<<willpowermax>>): <a href="exec:willpowermax = 200 & dynamic $cheatmenu[''stats'']" >Max</a> <a href="exec:willpowermax += 1 & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:willpowermax += 10 & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:willpowermax -= 1 & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:willpowermax -= 10 & dynamic $cheatmenu[''stats'']" >-10</a> <a href="exec:willpowermax = 50 & dynamic $cheatmenu[''stats'']" >Min</a>'
  1059. if workPTU > 1:*pl'<a href="exec:teachlevel += 10 & dynamic $cheatmenu[''stats'']">Reputation teacher+10: <<teachlevel>></a>'
  1060. if workPTU > 1:*pl'<a href="exec:teachlevel -= 10 & dynamic $cheatmenu[''stats'']">Reputation teacher-10: <<teachlevel>></a>'
  1061. *nl
  1062. if StoryLine = 1 and SchoolAtestat = 0:
  1063. *pl'<b>School:</b>'
  1064. if class['school_math_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', 10 & dynamic $cheatmenu[''stats'']">Improve your Math grade: <<class[''school_math_grade'']>></a>'
  1065. if class['school_rus_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', 10 & dynamic $cheatmenu[''stats'']">Improve your Russian grade: <<class[''school_rus_grade'']>></a>'
  1066. if class['school_lit_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''lit'', 10 & dynamic $cheatmenu[''stats'']">Improve your Literature grade: <<class[''school_lit_grade'']>></a>'
  1067. if class['school_art_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''art'', 10 & dynamic $cheatmenu[''stats'']">Improve your Art grade: <<class[''school_art_grade'']>></a>'
  1068. if class['school_bio_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''bio'', 10 & dynamic $cheatmenu[''stats'']">Improve your Biology grade: <<class[''school_bio_grade'']>></a>'
  1069. if class['school_eng_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''eng'', 10 & dynamic $cheatmenu[''stats'']">Improve your English grade: <<class[''school_eng_grade'']>></a>'
  1070. if class['school_geo_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''geo'', 10 & dynamic $cheatmenu[''stats'']">Improve your Geography grade: <<class[''school_geo_grade'']>></a>'
  1071. if class['school_sci_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''sci'', 10 & dynamic $cheatmenu[''stats'']">Improve your Science grade: <<class[''school_sci_grade'']>></a>'
  1072. if class['school_his_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''his'', 10 & dynamic $cheatmenu[''stats'']">Improve your History grade: <<class[''school_his_grade'']>></a>'
  1073. if class['school_shop_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''shop'', 10 & dynamic $cheatmenu[''stats'']">Improve your Shop grade: <<class[''school_shop_grade'']>></a>'
  1074. if class['school_comp_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''comp'', 10 & dynamic $cheatmenu[''stats'']">Improve your Computer grade: <<class[''school_comp_grade'']>></a>'
  1075. if class['school_mus_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''mus'', 10 & dynamic $cheatmenu[''stats'']">Improve your Music grade: <<class[''school_mus_grade'']>></a>'
  1076. if class['school_pe_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''pe'', 10 & dynamic $cheatmenu[''stats'']">Improve your P.E. grade: <<class[''school_pe_grade'']>></a>'
  1077. if schoolprogul >= 0:*pl'<a href="exec:schoolprogul = 0 & dynamic $cheatmenu[''stats'']">Zero Absenteeism (School): <<schoolprogul>></a>'
  1078. *nl
  1079. end
  1080. *pl'<b>Skills</b> (values 0 - 100, and adjusted total by attributes):'
  1081. *pl '<a href="exec:dynamic $cheatmenu[''setSkills''], 100" >Max Skills</a> <a href="exec:dynamic $cheatmenu[''setSkills''], 0" >Min Skills</a>'
  1082. *nl
  1083. *pl'<b>Others:</b>'
  1084. *p 'Chess (<<chess_lvl>>) - Total (<<pcs_chess>>): ' & dynamic $cheatmenu['printStatLinks'], 'chess', 'Chess'
  1085. *p 'Gaming (<<gaming_lvl>>) - Total (<<pcs_gaming>>): ' & dynamic $cheatmenu['printStatLinks'], 'gaming', 'Gaming'
  1086. *p 'Social (<<humint_lvl>>) - Total (<<pcs_humint>>): ' & dynamic $cheatmenu['printStatLinks'], 'humint', 'People Skills'
  1087. *p 'Persuasion (<<persuas_lvl>>) - Total (<<pcs_persuas>>): ' & dynamic $cheatmenu['printStatLinks'], 'persuas', 'Persuasion'
  1088. *p 'Observation (<<observ_lvl>>) - Total (<<pcs_observ>>): ' & dynamic $cheatmenu['printStatLinks'], 'observ', 'Observation'
  1089. *p 'Makeup (<<makupskl_lvl>>) - Total (<<pcs_makupskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'makupskl', 'Makeup'
  1090. *p 'Computers (<<compskl_lvl>>) - Total (<<pcs_compskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'compskl', 'Computer Skill'
  1091. *p 'Hacking (<<comphckng_lvl>>) - Total (<<pcs_comphckng>>): ' & dynamic $cheatmenu['printStatLinks'], 'comphckng', 'Hacking'
  1092. *p 'Handy-work (<<hndiwrk_lvl>>) - Total (<<pcs_hndiwrk>>): ' & dynamic $cheatmenu['printStatLinks'], 'hndiwrk', 'Handy-work'
  1093. *p 'Pool (<<pool_lvl>>) - Total (<<pcs_pool>>): ' & dynamic $cheatmenu['printStatLinks'], 'pool', 'Pool'
  1094. *p 'Heels (<<pcs_heels>>) - Total (<<pcs_heels>>): ' & dynamic $cheatmenu['printStatLinks'], 'heels', 'Heels'
  1095. if MagikDostup = 0: *p 'Spell Casting (<<splcstng_lvl>>) - Total (<<pcs_splcstng>>): ' & dynamic $cheatmenu['printStatLinks'], 'splcstng', 'Spellcasting'
  1096. '</td><td width="50%" cellpadding="10" valign="top">'
  1097. *pl'<b>Combat:</b>'
  1098. *p 'Jabs (<<jab_lvl>>)- Total (<<pcs_jab>>): ' & dynamic $cheatmenu['printStatLinks'], 'jab', 'Jabs'
  1099. *p 'Power Strikes (<<punch_lvl>>) - Total (<<pcs_punch>>): ' & dynamic $cheatmenu['printStatLinks'], 'punch', 'Power Strikes'
  1100. *p 'Kicks (<<kick_lvl>>) - Total (<<pcs_kick>>): ' & dynamic $cheatmenu['printStatLinks'], 'kick', 'Kicks'
  1101. *p 'Defence (<<def_lvl>>) - Total (<<pcs_def>>): ' & dynamic $cheatmenu['printStatLinks'], 'def', 'Defence'
  1102. *p 'Marksmanship (<<shoot_lvl>>) - Total (<<pcs_shoot>>): ' & dynamic $cheatmenu['printStatLinks'], 'shoot', 'Marksmanship'
  1103. *p 'Bushcraft (<<bushcraft_lvl>>) - Total (<<pcs_bushcraft>>): ' & dynamic $cheatmenu['printStatLinks'], 'bushcraft', 'Bushcraft'
  1104. *nl
  1105. *pl'<b>Craft:</b>'
  1106. *p 'Singing (<<vokal_lvl>>) - Total (<<pcs_vokal>>): ' & dynamic $cheatmenu['printStatLinks'], 'vokal', 'Singing'
  1107. *p 'Tailoring (<<sewng_lvl>>) - Total (<<pcs_sewng>>): ' & dynamic $cheatmenu['printStatLinks'], 'sewng', 'Tailoring'
  1108. *p 'Instruments (<<instrmusic_lvl>>) - Total (<<pcs_instrmusic>>): ' & dynamic $cheatmenu['printStatLinks'], 'instrmusic', 'Instrumental Music'
  1109. *p 'Photography (<<photoskl_lvl>>) - Total (<<pcs_photoskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'photoskl', 'Photography'
  1110. *p 'Artistic (<<artskls_lvl>>) - Total (<<pcs_artskls>>): ' & dynamic $cheatmenu['printStatLinks'], 'artskls', 'Artistic Skills'
  1111. *p 'Performing (<<perform_lvl>>) - Total (<<pcs_perform>>): ' & dynamic $cheatmenu['printStatLinks'], 'perform', 'Performance'
  1112. *p 'Music Production (<<musicprod_lvl>>) - Total (<<pcs_musicprod>>): ' & dynamic $cheatmenu['printStatLinks'], 'musicprod', 'Music Production'
  1113. *nl
  1114. *pl'<b>Dance:</b>'
  1115. *p 'Modern Dance (<<danc_lvl>>) - Total (<<pcs_danc>>): ' & dynamic $cheatmenu['printStatLinks'], 'danc', 'Modern Dancing'
  1116. *p 'Erotic Dance (<<dancero_lvl>>) - Total (<<pcs_dancero>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancero', 'Erotic Dancing'
  1117. *p 'Pole Dance (<<dancpol_lvl>>) - Total (<<pcs_dancpol>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancpol', 'Pole Dancing'
  1118. *p 'Cheerleading (<<cheer_lvl>>) - Total (<<pcs_cheer>>): ' & dynamic $cheatmenu['printStatLinks'], 'cheer', 'Cheerleading'
  1119. *nl
  1120. *pl'<b>Sport:</b>'
  1121. *p 'Running (<<run_lvl>>) - Total (<<pcs_run>>): ' & dynamic $cheatmenu['printStatLinks'], 'run', 'Running'
  1122. *p 'Volleyball (<<vball_lvl>>) - Total (<<pcs_vball>>): ' & dynamic $cheatmenu['printStatLinks'], 'vball', 'Volleyball'
  1123. *p 'Ice Skating (<<icesktng_lvl>>) - Total (<<pcs_icesktng>>): ' & dynamic $cheatmenu['printStatLinks'], 'icesktng', 'Ice Skating'
  1124. *p 'Wrestling (<<wrstlng_lvl>>) - Total (<<pcs_wrstlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'wrstlng', 'Wrestling'
  1125. *p 'Football (<<ftbll_lvl>>) - Total (<<pcs_ftbll>>): ' & dynamic $cheatmenu['printStatLinks'], 'ftbll', 'Football'
  1126. *nl
  1127. *pl'<b>Work:</b>'
  1128. *p 'Serving (<<servng_lvl>>) - Total (<<pcs_servng>>): ' & dynamic $cheatmenu['printStatLinks'], 'servng', 'Serving'
  1129. *p 'Modeling (<<mdlng_lvl>>) - Total (<<pcs_mdlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'mdlng', 'Modeling'
  1130. *p 'Medicine (<<medcn_lvl>>) - Total (<<pcs_medcn>>): ' & dynamic $cheatmenu['printStatLinks'], 'medcn', 'Medicine'
  1131. *p 'Cleaning (<<cleaning_lvl>>) - Total (<<pcs_cleaning>>): ' & dynamic $cheatmenu['printStatLinks'], 'cleaning', 'Cleaning'
  1132. '</tr></table></b></center>'
  1133. }
  1134. $cheatmenu['reputation'] = {
  1135. gs'stat'
  1136. *clr & cla
  1137. gs 'obj_din', 'cheattabs'
  1138. '<center><h1>Cheat Menu - Relationships and Renown</h1></center>'
  1139. '<center>Relationship values are from 0 - 100.</center>'
  1140. '<center>If they exceed this limit they will be reset overnight.</center>'
  1141. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  1142. '<tr><td width="50%" cellpadding="10" valign="top">'
  1143. if storyline = 1:
  1144. *nl
  1145. 'Relationships in Pavlovsk'
  1146. *nl
  1147. '<font color="blue"><b>Family</b></font>'
  1148. if Enable_reputation_family = 0:
  1149. '<a href="exec:Enable_reputation_family = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1150. end
  1151. if Enable_reputation_family = 1:
  1152. '<a href="exec:Enable_reputation_family = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1153. 'Stepfather: <<npc_rel[''A28'']>> <a href="exec:npc_rel[''A28''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A28''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1154. 'Mother: <<npc_rel[''A29'']>> <a href="exec:npc_rel[''A29''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A29''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1155. 'Sister: <<npc_rel[''A33'']>> <a href="exec:npc_rel[''A33''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A33''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1156. 'Brother: <<npc_rel[''A34'']>> <a href="exec:npc_rel[''A34''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A34''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1157. end
  1158. 'Your dog: '+iif($status['dog'] = 'active', '<b>Active</b>', '<a href="exec: $status[''dog''] = ''active'' & gt $cheatmenu[''reputation'']">Active</a>')+'|'+iif($status['dog'] = 'blocked', '<b>Blocked</b>', '<a href="exec: $status[''dog''] = ''blocked'' & gt $cheatmenu[''reputation'']">Blocked</a>')
  1159. if $status['dog'] ! 'blocked':
  1160. 'Set the relationship and love of your dog to always be at maximum: '+iif(cheat['dog_rel'] = 0, '<a href="exec: cheat[''dog_rel''] = 1 & gt $cheatmenu[''reputation'']">Off</a>', '<a href="exec: cheat[''dog_rel''] = 0 & gt $cheatmenu[''reputation'']">Currently On</a>')
  1161. 'You need to feed your dog <<rex[''count_feed_base'']>> per day: '+iif(rex['count_feed_base'] > 1, '<a href="exec: rex[''count_feed_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_feed_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
  1162. 'You need to walk your dog <<rex[''count_walk_base'']>> per day: '+iif(rex['count_walk_base'] > 1, '<a href="exec: rex[''count_walk_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_walk_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
  1163. 'You need to bath your dog <<rex[''count_bath_base'']>> per week: '+iif(rex['count_bath_base'] > 1, '<a href="exec: rex[''count_bath_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_bath_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
  1164. end
  1165. *nl
  1166. '<font color="blue"><b>School</b></font>'
  1167. '<i>Popular Kids</i>'
  1168. if Enable_reputation_popular = 0:
  1169. '<a href="exec:Enable_reputation_popular = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1170. end
  1171. if Enable_reputation_popular = 1:
  1172. '<a href="exec:Enable_reputation_popular = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1173. '<<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>>: <<npc_rel[''A1'']>> <a href="exec:npc_rel[''A1''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A1''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1174. '<<$npc_firstname[''A4'']>> <<$npc_lastname[''A4'']>>: <<npc_rel[''A4'']>> <a href="exec:npc_rel[''A4''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A4''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1175. '<<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>>: <<npc_rel[''A14'']>> <a href="exec:npc_rel[''A14''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A14''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1176. '<<$npc_firstname[''A15'']>> <<$npc_lastname[''A15'']>>: <<npc_rel[''A15'']>> <a href="exec:npc_rel[''A15''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A15''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1177. '<<$npc_firstname[''A17'']>> <<$npc_lastname[''A17'']>>: <<npc_rel[''A17'']>> <a href="exec:npc_rel[''A17''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A17''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1178. '<<$npc_firstname[''A22'']>> <<$npc_lastname[''A22'']>>: <<npc_rel[''A22'']>> <a href="exec:npc_rel[''A22''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A22''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1179. '<<$npc_firstname[''A146'']>> <<$npc_lastname[''A146'']>>: <<npc_rel[''A146'']>> <a href="exec:npc_rel[''A146''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A146''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1180. '<<$npc_firstname[''A147'']>> <<$npc_lastname[''A147'']>>: <<npc_rel[''A147'']>> <a href="exec:npc_rel[''A147''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A147''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1181. '<<$npc_firstname[''A148'']>> <<$npc_lastname[''A148'']>>: <<npc_rel[''A148'']>> <a href="exec:npc_rel[''A148''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A148''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1182. if soniaPS = 0: '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>> <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1183. '<<$npc_firstname[''A139'']>> <<$npc_lastname[''A139'']>>: <<npc_rel[''A139'']>> <a href="exec:npc_rel[''A139''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A139''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1184. '<<$npc_firstname[''A140'']>> <<$npc_lastname[''A140'']>>: <<npc_rel[''A140'']>> <a href="exec:npc_rel[''A140''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A140''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1185. end
  1186. *nl
  1187. '<i>Athletes</i>'
  1188. if Enable_reputation_athletes = 0:
  1189. '<a href="exec:Enable_reputation_athletes = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1190. end
  1191. if Enable_reputation_athletes = 1:
  1192. '<a href="exec:Enable_reputation_athletes = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1193. '<<$npc_firstname[''A3'']>> <<$npc_lastname[''A3'']>>: <<npc_rel[''A3'']>> <a href="exec:npc_rel[''A3''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A3''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1194. if fedormasha = 0: '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>> <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1195. '<<$npc_firstname[''A8'']>> <<$npc_lastname[''A8'']>>: <<npc_rel[''A8'']>> <a href="exec:npc_rel[''A8''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A8''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1196. '<<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>>: <<npc_rel[''A13'']>> <a href="exec:npc_rel[''A13''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A13''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1197. if christinaQW['dompath'] <= 5: '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>> <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1198. '<<$npc_firstname[''A19'']>> <<$npc_lastname[''A19'']>>: <<npc_rel[''A19'']>> <a href="exec:npc_rel[''A19''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A19''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1199. '<<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>>: <<npc_rel[''A23'']>> <a href="exec:npc_rel[''A23''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A23''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1200. '<<$npc_firstname[''A149'']>> <<$npc_lastname[''A149'']>>: <<npc_rel[''A149'']>> <a href="exec:npc_rel[''A149''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A149''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1201. '<<$npc_firstname[''A150'']>> <<$npc_lastname[''A150'']>>: <<npc_rel[''A150'']>> <a href="exec:npc_rel[''A150''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A150''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1202. '<<$npc_firstname[''A141'']>> <<$npc_lastname[''A141'']>>: <<npc_rel[''A141'']>> <a href="exec:npc_rel[''A141''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A141''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1203. '<<$npc_firstname[''A165'']>> <<$npc_lastname[''A165'']>>: <<npc_rel[''A165'']>> <a href="exec:npc_rel[''A165''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A165''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1204. end
  1205. *nl
  1206. '<i>Nerds</i>'
  1207. if Enable_reputation_nerds = 0:
  1208. '<a href="exec:Enable_reputation_nerds = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1209. end
  1210. if Enable_reputation_nerds = 1:
  1211. '<a href="exec:Enable_reputation_nerds = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1212. '<<$npc_firstname[''A2'']>> <<$npc_lastname[''A2'']>>: <<npc_rel[''A2'']>> <a href="exec:npc_rel[''A2''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A2''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1213. '<<$npc_firstname[''A6'']>> <<$npc_lastname[''A6'']>>: <<npc_rel[''A6'']>> <a href="exec:npc_rel[''A6''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A6''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1214. '<<$npc_firstname[''A12'']>> <<$npc_lastname[''A12'']>>: <<npc_rel[''A12'']>> <a href="exec:npc_rel[''A12''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A12''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1215. '<<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>>: <<npc_rel[''A16'']>> <a href="exec:npc_rel[''A16''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A16''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1216. '<<$npc_firstname[''A151'']>> <<$npc_lastname[''A151'']>>: <<npc_rel[''A151'']>> <a href="exec:npc_rel[''A151''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A151''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1217. '<<$npc_firstname[''A152'']>> <<$npc_lastname[''A152'']>>: <<npc_rel[''A152'']>> <a href="exec:npc_rel[''A152''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A152''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1218. '<<$npc_firstname[''A153'']>> <<$npc_lastname[''A153'']>>: <<npc_rel[''A153'']>> <a href="exec:npc_rel[''A153''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A153''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1219. '<<$npc_firstname[''A142'']>> <<$npc_lastname[''A142'']>>: <<npc_rel[''A142'']>> <a href="exec:npc_rel[''A142''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A142''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1220. '<<$npc_firstname[''A240'']>> <<$npc_lastname[''A240'']>>: <<npc_rel[''A240'']>> <a href="exec:npc_rel[''A240''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A240''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1221. end
  1222. *nl
  1223. '<i>Gopniks</i>'
  1224. if Enable_reputation_gopniks = 0:
  1225. '<a href="exec:Enable_reputation_gopniks = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1226. end
  1227. if Enable_reputation_gopniks = 1:
  1228. '<a href="exec:Enable_reputation_gopniks = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1229. '<<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>>: <<npc_rel[''A9'']>> <a href="exec:npc_rel[''A9''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A9''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1230. '<<$npc_firstname[''A10'']>> <<$npc_lastname[''A10'']>>: <<npc_rel[''A10'']>> <a href="exec:npc_rel[''A10''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A10''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1231. '<<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>: <<npc_rel[''A11'']>> <a href="exec:npc_rel[''A11''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A11''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1232. '<<$npc_firstname[''A20'']>> <<$npc_lastname[''A20'']>>: <<npc_rel[''A20'']>> <a href="exec:npc_rel[''A20''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A20''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1233. '<<$npc_firstname[''A21'']>> <<$npc_lastname[''A21'']>>: <<npc_rel[''A21'']>> <a href="exec:npc_rel[''A21''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A21''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1234. '<<$npc_firstname[''A24'']>> <<$npc_lastname[''A24'']>>: <<npc_rel[''A24'']>> <a href="exec:npc_rel[''A24''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A24''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1235. '<<$npc_firstname[''A154'']>> <<$npc_lastname[''A154'']>>: <<npc_rel[''A154'']>> <a href="exec:npc_rel[''A154''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A154''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1236. '<<$npc_firstname[''A155'']>> <<$npc_lastname[''A155'']>>: <<npc_rel[''A155'']>> <a href="exec:npc_rel[''A155''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A155''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1237. '<<$npc_firstname[''A156'']>> <<$npc_lastname[''A156'']>>: <<npc_rel[''A156'']>> <a href="exec:npc_rel[''A156''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A156''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1238. '<<$npc_firstname[''A157'']>> <<$npc_lastname[''A157'']>>: <<npc_rel[''A157'']>> <a href="exec:npc_rel[''A157''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A157''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1239. '<<$npc_firstname[''A158'']>> <<$npc_lastname[''A158'']>>: <<npc_rel[''A158'']>> <a href="exec:npc_rel[''A158''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A158''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1240. '<<$npc_firstname[''A143'']>> <<$npc_lastname[''A143'']>>: <<npc_rel[''A143'']>> <a href="exec:npc_rel[''A143''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A143''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1241. '<<$npc_firstname[''A144'']>> <<$npc_lastname[''A144'']>>: <<npc_rel[''A144'']>> <a href="exec:npc_rel[''A144''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A144''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1242. '<<$npc_firstname[''A145'']>> <<$npc_lastname[''A145'']>>: <<npc_rel[''A145'']>> <a href="exec:npc_rel[''A145''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A145''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1243. '<<$npc_firstname[''A189'']>> <<$npc_lastname[''A189'']>>: <<npc_rel[''A189'']>> <a href="exec:npc_rel[''A189''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A189''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1244. end
  1245. *nl
  1246. '<i>Outcasts/Loners</i>'
  1247. if Enable_reputation_outcasts = 0:
  1248. '<a href="exec:Enable_reputation_outcasts = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1249. end
  1250. if Enable_reputation_outcasts = 1:
  1251. '<a href="exec:Enable_reputation_outcasts = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1252. '<<$npc_firstname[''A7'']>> <<$npc_lastname[''A7'']>>: <<npc_rel[''A7'']>> <a href="exec:npc_rel[''A7''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A7''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1253. if soniaPS > 0: '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>> <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1254. if christinaQW['dompath'] >= 6: '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>> <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1255. if fedormasha = 1: '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>> <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1256. '<<$npc_firstname[''A159'']>> <<$npc_lastname[''A159'']>>: <<npc_rel[''A159'']>> <a href="exec:npc_rel[''A159''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A159''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1257. end
  1258. *nl
  1259. '<i>Teachers/Coaches</i>'
  1260. if Enable_reputation_teachers = 0:
  1261. '<a href="exec:Enable_reputation_teachers = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1262. end
  1263. if Enable_reputation_teachers = 1:
  1264. '<a href="exec:Enable_reputation_teachers = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1265. '<<$npc_firstname[''A26'']>> <<$npc_lastname[''A26'']>>: <<npc_rel[''A26'']>> <a href="exec:npc_rel[''A26''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A26''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1266. 'Mikhail Nikolayevich: <<npc_rel[''A69'']>> <a href="exec:npc_rel[''A69''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A69''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1267. '<<$npc_firstname[''A128'']>> <<$npc_lastname[''A128'']>>: <<npc_rel[''A128'']>> <a href="exec:npc_rel[''A128''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A128''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1268. '<<$npc_firstname[''A129'']>> <<$npc_lastname[''A129'']>>: <<npc_rel[''A129'']>> <a href="exec:npc_rel[''A129''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A129''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1269. '<<$npc_firstname[''A130'']>> <<$npc_lastname[''A130'']>>: <<npc_rel[''A130'']>> <a href="exec:npc_rel[''A130''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A130''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1270. '<<$npc_firstname[''A131'']>> <<$npc_lastname[''A131'']>>: <<npc_rel[''A131'']>> <a href="exec:npc_rel[''A131''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A131''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1271. '<<$npc_firstname[''A132'']>> <<$npc_lastname[''A132'']>>: <<npc_rel[''A132'']>> <a href="exec:npc_rel[''A132''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A132''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1272. '<<$npc_firstname[''A133'']>> <<$npc_lastname[''A133'']>>: <<npc_rel[''A133'']>> <a href="exec:npc_rel[''A133''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A133''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1273. '<<$npc_firstname[''A134'']>> <<$npc_lastname[''A134'']>>: <<npc_rel[''A134'']>> <a href="exec:npc_rel[''A134''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A134''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1274. '<<$npc_firstname[''A135'']>> <<$npc_lastname[''A135'']>>: <<npc_rel[''A135'']>> <a href="exec:npc_rel[''A135''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A135''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1275. '<<$npc_firstname[''A136'']>> <<$npc_lastname[''A136'']>>: <<npc_rel[''A136'']>> <a href="exec:npc_rel[''A136''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A136''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1276. '<<$npc_firstname[''A137'']>> <<$npc_lastname[''A137'']>>: <<npc_rel[''A137'']>> <a href="exec:npc_rel[''A137''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A137''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1277. '<<$npc_firstname[''A138'']>> <<$npc_lastname[''A138'']>>: <<npc_rel[''A138'']>> <a href="exec:npc_rel[''A138''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A138''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1278. end
  1279. end
  1280. *nl
  1281. '<font color="blue"><b>Nicholas'' Family</b></font>'
  1282. '<a href="exec:gt ''nichUtil'', ''debug''">Storyline Debug Menu</a>'
  1283. '</td><td width="50%" cellpadding="10" valign="top">'
  1284. *nl
  1285. 'Miscellaneous relationships'
  1286. *nl
  1287. '<font color="blue"><b>Others</b></font>'
  1288. *nl
  1289. if Enable_reputation_others = 0:
  1290. '<a href="exec:Enable_reputation_others = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1291. end
  1292. if Enable_reputation_others = 1:
  1293. '<a href="exec:Enable_reputation_others = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1294. if npc_rel['A112'] >= 0:
  1295. 'Sergei Shulgin: <<npc_rel[''A112'']>> <a href="exec:npc_rel[''A112''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A112''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1296. end
  1297. if npc_rel['A219'] >= 0:
  1298. 'Kat: <<npc_rel[''A219'']>> <a href="exec:npc_rel[''A219''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A219''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1299. end
  1300. if npc_rel['A220'] >= 0:
  1301. 'Vika: <<npc_rel[''A220'']>> <a href="exec:npc_rel[''A220''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A220''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1302. end
  1303. if npc_rel['A93'] >= 0:
  1304. 'Irina: <<npc_rel[''A93'']>> <a href="exec:npc_rel[''A93''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A93''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1305. end
  1306. if npc_rel['A43'] >= 0:
  1307. 'Tamara: <<npc_rel[''A43'']>> <a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A43''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1308. end
  1309. if alla >= 0:
  1310. 'Alla: <<alla>> <a href="exec:alla += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:alla -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1311. end
  1312. if masha >= 0:
  1313. 'Masha: <<masha>> <a href="exec:masha += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:masha -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1314. end
  1315. if npc_rel['A41'] >= 0:
  1316. 'Givi: <<npc_rel[''A41'']>> <a href="exec:npc_rel[''A41''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A41''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1317. end
  1318. if npc_rel['A42'] >= 0:
  1319. 'Ashot: <<npc_rel[''A42'']>> <a href="exec:npc_rel[''A42''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A42''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1320. end
  1321. if afra >= 0:
  1322. 'Black Guys: <<afra>> <a href="exec:afra += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:afra -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1323. end
  1324. if npc_rel['A89'] >= 0:
  1325. 'Eugene: <<npc_rel[''A89'']>> <a href="exec:npc_rel[''A89''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A89''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1326. end
  1327. if npc_rel['A217'] >= 0:
  1328. 'Pavlin: <<npc_rel[''A217'']>> <a href="exec:npc_rel[''A217''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A217''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1329. end
  1330. if huntersAndreiQw >= 0:
  1331. 'Hunter Andrew: <<huntersAndreiQw>> <a href="exec:huntersAndreiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersAndreiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1332. end
  1333. if huntersSergeiQw >= 0:
  1334. 'Hunter Sergei: <<huntersSergeiQw>> <a href="exec:huntersSergeiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersSergeiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1335. end
  1336. if huntersIgorQw >= 0:
  1337. 'Hunter Igor: <<huntersIgorQw>> <a href="exec:huntersIgorQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersIgorQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1338. end
  1339. if npc_rel['A217'] >= 0:
  1340. 'Martin: <<npc_rel[''A216'']>> <a href="exec:npc_rel[''A216''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A216''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1341. end
  1342. end
  1343. if pcs_lovers[0] = 1:
  1344. *nl
  1345. 'You are dating <<$loverdesc[0]>>.'
  1346. if loverrelation[0] < 0: loverrelation[0] = 0
  1347. if loverdays[0] < 0: loverdays[0] = 0
  1348. if haraklover[0] > 2: haraklover[0] = 0
  1349. if loverizvrat[0] > 1: loverizvrat[0] = 0
  1350. 'Change lover''s personality: <a href="exec:haraklover[0] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[0]>></a>'
  1351. 'Change lover''s perversion: <a href="exec:loverizvrat[0] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[0]>></a>'
  1352. 'Relationship: <<loverrelation[0]>> <a href="exec:loverrelation[0] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[0] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1353. 'You''ve been dating for <<loverdays[0]>> days. <a href="exec:loverdays[0] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[0] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
  1354. end
  1355. if pcs_lovers[1] = 1:
  1356. *nl
  1357. 'You are dating <<$loverdesc[1]>>.'
  1358. if loverrelation[1] < 0: loverrelation[1] = 0
  1359. if loverdays[1] < 0: loverdays[1] = 0
  1360. if haraklover[1] > 2: haraklover[1] = 0
  1361. if loverizvrat[1] > 1: loverizvrat[1] = 0
  1362. 'Change lover''s personality: <a href="exec:haraklover[1] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[1]>></a>'
  1363. 'Change lover''s perversion: <a href="exec:loverizvrat[1] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[1]>></a>'
  1364. 'Relationship: <<loverrelation[1]>> <a href="exec:loverrelation[1] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[1] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1365. 'You''ve been dating for <<loverdays[1]>> days. <a href="exec:loverdays[1] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[1] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
  1366. end
  1367. if pcs_lovers[2] = 1:
  1368. *nl
  1369. 'You are dating <<$loverdesc[2]>>.'
  1370. if loverrelation[2] < 0: loverrelation[2] = 0
  1371. if loverdays[2] < 0: loverdays[2] = 0
  1372. if haraklover[2] > 2: haraklover[2] = 0
  1373. if loverizvrat[2] > 1: loverizvrat[2] = 0
  1374. 'Change lover''s personality: <a href="exec:haraklover[2] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[2]>></a>'
  1375. 'Change lover''s perversion: <a href="exec:loverizvrat[2] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[2]>></a>'
  1376. 'Relationship: <<loverrelation[2]>> <a href="exec:loverrelation[2] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[2] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1377. 'You''ve been dating for <<loverdays[2]>> days. <a href="exec:loverdays[2] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[2] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
  1378. end
  1379. *nl
  1380. if fame['pav_slut'] >= 50:
  1381. gs 'fame'
  1382. 'In Pavlovsk you are known as a <font color="red"><<$gnikname>></font> <a href="exec:fame[''pav_sex''] = 0 & fame[''pav_prostitute''] = 0 & gs ''fame'', ''calculateSlut'' & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1383. end
  1384. *nl
  1385. if opusk > 0 or gnewQW > 0 or sipovka > 0:'<a href="exec:opusk = 0 & gnewQW = 0 & sipovka = 0 & dynamic $cheatmenu[''reputation'']">Clear reputation with Gopniks</a>'
  1386. if StoryLine = 1:
  1387. *nl
  1388. '<font color="red"><b>WARNING</b></font>: Clearing reputation flags with your family may cause bugs. Use at your own risk!'
  1389. *nl
  1390. if motherKnowWhore > 0:
  1391. 'Your mother knows, that you are sexually active and considers you are a whore. <a href="exec:motherKnowWhore = 0 & motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear both reputations</a> <a href="exec:motherKnowWhore = 0 & dynamic $cheatmenu[''reputation'']">Clear only whore reputation</a>'
  1392. elseif motherKnowSpravka > 0:
  1393. 'Your mother knows that you are sexually active. <a href="exec:motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1394. else
  1395. 'Your mother thinks that you are a virgin.'
  1396. end
  1397. *nl
  1398. if evgenQW >= 4 and fame['pav_slut'] >= 250:
  1399. 'Your brother thinks you are a total whore. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1400. elseif evgenQW >= 3:
  1401. 'Your brother thinks you are a slut. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1402. elseif brotherknowslut = 1:
  1403. 'Your brother saw semen on your body and thinks you fuck around. <a href="exec:brotherknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1404. elseif brotherknowslut >= 2:
  1405. 'Your brother saw you in the park fucking the Gopniks. <a href="exec:brotherknowslut = 1 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1406. else
  1407. 'Your brother has a good opinion of you.'
  1408. end
  1409. *nl
  1410. if sisterknowslut > 1 and sisboypartyQW > 1:
  1411. 'Your sister thinks you are a slut <a href="exec:sisboypartyQW = 0 & sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1412. elseif sisterknowslut > 0:
  1413. 'Your sister knows that you sleep around. <a href="exec:sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1414. else
  1415. 'Your sister has a good opinion of you.'
  1416. end
  1417. *nl
  1418. if home_owned[2] = 0:
  1419. '<a href="exec:home_owned[2] = 1 & dynamic $cheatmenu[''reputation'']">Restore</a> access to your parent''s apartment.'
  1420. end
  1421. if momKnowsKolka = 1:
  1422. 'Your mother knows Kolka is the father. <a href="momKnowsKolka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
  1423. end
  1424. if momKnowsVladimir = 1:
  1425. 'Your mother knows Vladimir is the father. <a href="exec:momKnowsVladimir = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
  1426. end
  1427. if SchoolBlock = 1:
  1428. 'You''ve been expelled from school. <a href="exec:SchoolBlock = 0 & schoolPredupr = 0 & schoolprogul = 0 & pcs_grades = 50 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
  1429. end
  1430. end
  1431. '</td></tr></table></center>'
  1432. }
  1433. $cheatmenu['documents'] = {
  1434. gs'stat'
  1435. *clr & cla
  1436. gs 'obj_din', 'cheattabs'
  1437. '<center><h1>Cheat Menu - Diplomas, Licences, and Certificates</h1></center>'
  1438. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1439. '<td width="300" cellspacing="0" cellpadding="20" valign="top">'
  1440. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  1441. if SchoolAtestat = 0: '<a href="exec:SchoolAtestat = 1 & dynamic $cheatmenu[''documents'']">Get School Certificate</a>'
  1442. if storyline = 1 and SchoolAtestat = 0: '<font color="red"><b>WARNING!</b></font>: This will end your school year!' & *nl
  1443. if SchoolAtestat = 1:'Already have a School Certificate'
  1444. if university['diploma'] > 0:
  1445. 'You already have a Diploma'
  1446. else
  1447. '<a href="exec:gs ''uniutil'', ''diploma'', ''set_obtained'' & dynamic $cheatmenu[''documents'']">Get Diploma</a>'
  1448. end
  1449. if secrdiplom = 0:'<a href="exec:secrdiplom = 1 & dynamic $cheatmenu[''documents'']">Get Secretarial Diploma</a>'
  1450. if secrdiplom = 1:'You already have a Secretarial Diploma'
  1451. if masseuse['certification'] < 10:'<a href="exec:masseuse[''certification''] = 10 & dynamic $cheatmenu[''documents'']">Get Masseuse Certificate</a>'
  1452. if masseuse['certification'] >= 10:'You already have a Masseuse Certificate'
  1453. if prava = 0:'<a href="exec:prava = 1 & dynamic $cheatmenu[''documents'']">Get Driving Licence</a>'
  1454. if prava = 1:'You already have Driving Licence'
  1455. '</td></tr></table></center>'
  1456. }
  1457. $cheatmenu['input_time'] = {
  1458. inputtmp = input("Enter time with 4-digit (input 0102 for 1:02)")
  1459. if inputtmp/100 >= 0 and inputtmp/100 <= 23:hour = inputtmp/100
  1460. inputtmp = inputtmp mod 100
  1461. if inputtmp >= 0 and inputtmp <= 59:minut = inputtmp
  1462. killvar 'inputtmp'
  1463. dynamic $cheatmenu['time']
  1464. }
  1465. $cheatmenu['time'] = {
  1466. gs 'daystart'
  1467. gs 'outdoors', 'temp_set'
  1468. gs 'stat'
  1469. temp_daystart = (year - 2016) * 365
  1470. !!2016 is a leapyear so no adjustment before division
  1471. temp_daystart += (year - 2016) / 4
  1472. i=1
  1473. :temp_daystart
  1474. if temp_month > i:
  1475. temp_daystart += monthsend[i]
  1476. i += 1
  1477. jump 'temp_daystart'
  1478. end
  1479. temp_daystart += temp_day
  1480. temp_daystart -= daystart_start
  1481. temp_daystart += 1
  1482. if currtimecheck = 1:
  1483. killvar 'currtimecheck'
  1484. if currday ! daystart:
  1485. if currday < daystart:
  1486. week = (week + daystart - currday) mod 7
  1487. else
  1488. temp = week - ((currday - daystart) mod 7)
  1489. if temp <= 0: week = 7 - temp else week = temp
  1490. end
  1491. currday = daystart
  1492. end
  1493. if currhour < (daystart-1) * 24 + hour:femcycloop = (daystart-1) * 24 + hour - currhour
  1494. :femcycloop
  1495. if femcycloop > 0:gs 'femcyc' & femcycloop -= 1 & jump 'femcycloop'
  1496. end
  1497. *clr & cla
  1498. gs 'obj_din', 'cheattabs'
  1499. '<center><h1>Cheat Menu - Manipulate Time and Weather</h1></center>'
  1500. '<center><font color="red"><b>WARNING!</b></font>: Using cheats to manipulate time can <b>easily</b> break quests and cause bugs. Do not use them unless'
  1501. 'you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
  1502. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1503. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  1504. if temp_minut > 9:
  1505. if temp_hour > 9: $temptime = '<b><<temp_hour>>:<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:<<temp_minut>></b>'
  1506. else
  1507. if temp_hour > 9: $temptime = '<b><<temp_hour>>:0<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:0<<temp_minut>></b>'
  1508. end
  1509. if minut > 9:
  1510. if hour > 9: $tempcurtime = '<b><<hour>>:<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:<<minut>></b>'
  1511. else
  1512. if hour > 9: $tempcurtime = '<b><<hour>>:0<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:0<<minut>></b>'
  1513. end
  1514. if temp_daystart > daystart:
  1515. temp = (temp_daystart - daystart) mod 7
  1516. if (temp + week) mod 7 = 0:temp_week = 7 else temp_week = (temp + week) mod 7
  1517. elseif temp_daystart < daystart:
  1518. temp = (daystart - temp_daystart) mod 7
  1519. if (week - temp) mod 7 = 0:
  1520. temp_week = 7
  1521. elseif (week - temp) mod 7 < 0:
  1522. temp_week = ((week - temp) mod 7) + 7
  1523. else
  1524. temp_week = week - temp
  1525. end
  1526. else
  1527. temp_week = week
  1528. end
  1529. killvar 'temp'
  1530. 'Current time: <b><<$week[week]>></b>, <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
  1531. 'Target time: <b><<$week[temp_week]>></b>, <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
  1532. 'Daychange: <<temp_daystart - daystart>>'
  1533. *nl
  1534. 'Year: <a href="exec:temp_year += 1 & dynamic $cheatmenu[''time'']">+1 Year</a> <a href="exec:temp_year -= 1 & dynamic $cheatmenu[''time'']">-1 Year</a>'
  1535. 'Select <a href="exec:dynamic $cheatmenu[''month'']">Month</a>'
  1536. $daychange = ' <a href="exec:temp_day += 7 & dynamic $cheatmenu[''time'']">+7 Day</a>'
  1537. $daychange += ' <a href="exec:temp_day += 1 & dynamic $cheatmenu[''time'']">+1 Day</a>'
  1538. $daychange += ' <a href="exec:temp_day -= 1 & dynamic $cheatmenu[''time'']">-1 Day</a>'
  1539. $daychange += ' <a href="exec:temp_day -= 7 & dynamic $cheatmenu[''time'']">-7 Day</a>'
  1540. 'Day:' +$daychange
  1541. killvar 'daychange'
  1542. $SS = 'Hour: '
  1543. if temp_hour > 0:$SS += '<a href="exec:temp_hour -= 1 & dynamic $cheatmenu[''time'']">-1</a> ' else $SS += ' '
  1544. if temp_hour > 3:$SS += '<a href="exec:temp_hour -= 4 & dynamic $cheatmenu[''time'']">-4</a> ' else $SS += ' '
  1545. if temp_hour ! 0:$SS += '<a href="exec:temp_hour = 0 & dynamic $cheatmenu[''time'']">0</a> ' else $SS += ' '
  1546. if temp_hour < 23:$SS += '<a href="exec:temp_hour += 1 & dynamic $cheatmenu[''time'']">+1</a> ' else $SS += ' '
  1547. if temp_hour < 20:$SS += '<a href="exec:temp_hour += 4 & dynamic $cheatmenu[''time'']">+4</a>'
  1548. $SS
  1549. $SS = 'Minute: '
  1550. if temp_minut > 14:$SS += '<a href="exec:temp_minut -= 15 & dynamic $cheatmenu[''time'']">-15</a> ' else $SS += ' '
  1551. if temp_minut > 0:$SS += '<a href="exec:temp_minut -= 1 & dynamic $cheatmenu[''time'']">-1</a> ' else $SS += ' '
  1552. if temp_minut ! 0:$SS += '<a href="exec:temp_minut = 0 & dynamic $cheatmenu[''time'']">0</a> ' else $SS += ' '
  1553. if temp_minut < 59:$SS += '<a href="exec:temp_minut += 1 & dynamic $cheatmenu[''time'']">+1</a> '
  1554. if temp_minut < 46:$SS += '<a href="exec:temp_minut += 15 & dynamic $cheatmenu[''time'']">+15</a>'
  1555. $SS
  1556. killvar 'SS'
  1557. *nl
  1558. 'Weather: <a href="exec:sunWeather=iif(sunWeather=0,1,0) & chWeather = 1 & gs ''outdoors'', ''weather'' & dynamic $cheatmenu[''time'']">'+iif(sunWeather=0,'Rain','Sunny')+'</a>'
  1559. *nl
  1560. 'Temperature = <<$temperature>> - <a href="exec:temper += 1 & dynamic $cheatmenu[''time'']">+1 degree</a> - <a href="exec:temper += 5 & dynamic $cheatmenu[''time'']">+5 degrees</a> - <a href="exec:temper -= 1 & dynamic $cheatmenu[''time'']">-1 degree</a> - <a href="exec:temper -= 5 & dynamic $cheatmenu[''time'']">-5 degrees</a>'
  1561. *nl
  1562. 'Switch to the <a href="exec:TempUnit = '+iif(TempUnit = 0,'1 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''time'']">Fahrenheit','0 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''time'']">Celsius')+'</a> scale'
  1563. *nl
  1564. '<a href="exec:dynamic $cheatmenu[''input_time'']">Direct input time</a>'
  1565. *nl
  1566. '<a href="exec:day = temp_day & $month = $temp_month & month = temp_month & year = temp_year & hour = temp_hour & minut = temp_minut & currtimecheck = 1 & dynamic $cheatmenu[''time'']">Accept target date & time</a>'
  1567. '<a href="exec:temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut & dynamic $cheatmenu[''time'']">Reset target date & time</a>'
  1568. '</td></tr></table></center>'
  1569. }
  1570. $cheatmenu['week'] = {
  1571. gs'stat'
  1572. *clr & cla
  1573. '<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
  1574. *nl
  1575. 'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
  1576. 'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
  1577. *nl
  1578. '<a href="exec:week = 1 & dynamic $cheatmenu[''time'']">Monday</a>'
  1579. '<a href="exec:week = 2 & dynamic $cheatmenu[''time'']">Tuesday</a>'
  1580. '<a href="exec:week = 3 & dynamic $cheatmenu[''time'']">Wednesday</a>'
  1581. '<a href="exec:week = 4 & dynamic $cheatmenu[''time'']">Thursday</a>'
  1582. '<a href="exec:week = 5 & dynamic $cheatmenu[''time'']">Friday</a>'
  1583. '<a href="exec:week = 6 & dynamic $cheatmenu[''time'']">Saturday</a>'
  1584. '<a href="exec:week = 7 & dynamic $cheatmenu[''time'']">Sunday</a>'
  1585. }
  1586. $cheatmenu['month'] = {
  1587. gs'stat'
  1588. *clr & cla
  1589. '<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
  1590. *nl
  1591. 'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
  1592. 'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
  1593. *nl
  1594. '<a href="exec:temp_month = 1 & $temp_month = ''January'' & dynamic $cheatmenu[''time'']">January</a>'
  1595. '<a href="exec:temp_month = 2 & $temp_month = ''February'' & dynamic $cheatmenu[''time'']">February</a>'
  1596. '<a href="exec:temp_month = 3 & $temp_month = ''March'' & dynamic $cheatmenu[''time'']">March</a>'
  1597. '<a href="exec:temp_month = 4 & $temp_month = ''April'' & dynamic $cheatmenu[''time'']">April</a>'
  1598. '<a href="exec:temp_month = 5 & $temp_month = ''May'' & dynamic $cheatmenu[''time'']">May</a>'
  1599. '<a href="exec:temp_month = 6 & $temp_month = ''June'' & dynamic $cheatmenu[''time'']">June</a>'
  1600. '<a href="exec:temp_month = 7 & $temp_month = ''July'' & dynamic $cheatmenu[''time'']">July</a>'
  1601. '<a href="exec:temp_month = 8 & $temp_month = ''August'' & dynamic $cheatmenu[''time'']">August</a>'
  1602. '<a href="exec:temp_month = 9 & $temp_month = ''September'' & dynamic $cheatmenu[''time'']">September</a>'
  1603. '<a href="exec:temp_month = 10 & $temp_month = ''October'' & dynamic $cheatmenu[''time'']">October</a>'
  1604. '<a href="exec:temp_month = 11 & $temp_month = ''November'' & dynamic $cheatmenu[''time'']">November</a>'
  1605. '<a href="exec:temp_month = 12 & $temp_month = ''December'' & dynamic $cheatmenu[''time'']">December</a>'
  1606. }
  1607. $cheatmenu['magicTable'] = {
  1608. !Build a cheat table for spells with a given Array of spell names.
  1609. ! ARGS[0] = Friendly name for table
  1610. ! ARGS[1] = the name of the arraay to use
  1611. $SpellTabName = $ARGS[0]
  1612. $ThisArrName = $ARGS[1]
  1613. maxArrSizeC = dyneval("result=arrsize('<<$ThisArrName>>')")
  1614. ! make the header for the table
  1615. $SpellListStr = "<center>
  1616. <table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
  1617. <tr><th colspan='4'><b><<$SpellTabName>></b></th></tr>
  1618. <tr>
  1619. <th></th>
  1620. <th>Spell</th>
  1621. <th>Mana</th>
  1622. <th>Description</th>
  1623. </tr>"
  1624. i = 0
  1625. :CheatDinSpell1
  1626. $ThisSpellName = dyneval("$result=<<$ThisArrName>>[<<i>>]")
  1627. if i < maxArrSizeC:
  1628. if spellKnown[$ThisSpellName] = 1:
  1629. $spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
  1630. else
  1631. $spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
  1632. end
  1633. $SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$spellName[$ThisSpellName]>></td><td><<spellMana[$ThisSpellName]>></td><td><<$spellDesc[$ThisSpellName]>></td></tr>"
  1634. i += 1
  1635. jump 'CheatDinSpell1'
  1636. end
  1637. $SpellListStr = $SpellListStr + "
  1638. </table>
  1639. </center>"
  1640. *pl func('cleanHTML',$SpellListStr)
  1641. killvar 'i'
  1642. killvar '$ThisSpellName'
  1643. killvar '$ThisArrName'
  1644. killvar 'maxArrSizeC'
  1645. killvar '$SpellTabName'
  1646. killvar '$spellFlipper'
  1647. killvar '$SpellListStr'
  1648. }
  1649. $cheatmenu['magic'] = {
  1650. gs'stat'
  1651. *clr & cla
  1652. gs 'obj_din', 'cheattabs'
  1653. '<center><h1>Cheat Menu - Magic</h1></center>'
  1654. '<center>Is magical: <a href="exec:pcs_magik += 1 & dynamic $cheatmenu[''magic'']">+1<<pcs_magik>></a></center>'
  1655. if succubusflag = 1:
  1656. '<center><a href="exec:dynamic $cheatmenu[''succubreset'']"><b>Remove & Reset Succubus status</b></a></center>'
  1657. '<center><font color="red"><b>WARNING!</b></font>: Removing succubus status will not restart your menstrual cycle, it will remain permanently disabled!</center>'
  1658. *nl
  1659. end
  1660. !Make sure spell list is initialized
  1661. if spellMana['fog'] = 0:gs 'spellList'
  1662. dynamic $cheatmenu['magicTable'], 'Combat Spells', '$combatSpells'
  1663. dynamic $cheatmenu['magicTable'], 'Non-Combat Spells', '$nonComSpells'
  1664. ! Add in Teleport Location toggles.
  1665. ! make the header for the table
  1666. $SpellListStr = "<center>
  1667. <table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
  1668. <tr><th colspan='2'><b>Known Tree Circle Locations</b></th></tr>
  1669. <tr><td><a href=""EXEC: spellKnown['teleport']=<<iif(spellKnown['teleport']=1,'0','1')>> & dynamic $cheatmenu['magic']""><<iif(spellKnown['teleport']=1,'[Unlearn]','[Learn]')>></a></td><td>Teleport Spell</td></tr>"
  1670. i = 0
  1671. :CheatDinTP1
  1672. $ThisLocation = $tpLocations[i]
  1673. if i < arrsize('$tpLocations'):
  1674. if tpKnown[$ThisLocation] = 1:
  1675. $spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
  1676. else
  1677. $spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
  1678. end
  1679. $SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$treeCircName[$ThisLocation]>></td></tr>"
  1680. i += 1
  1681. jump 'CheatDinTP1'
  1682. end
  1683. $SpellListStr = $SpellListStr + "
  1684. </table>
  1685. </center>"
  1686. *pl func('cleanHTML',$SpellListStr)
  1687. killvar 'i'
  1688. killvar '$ThisLocation'
  1689. killvar '$spellFlipper'
  1690. killvar '$SpellListStr'
  1691. }
  1692. $cheatmenu['dynamic'] = {
  1693. $dynamicCommand = input("Enter command to execute.")
  1694. if $dynamicCommand = '':exit
  1695. dynamic $dynamicCommand
  1696. }
  1697. $cheatmenu['std_cure'] = {
  1698. venera = 0
  1699. GerpesOnce = 0
  1700. Gerpes = 0
  1701. SifacOnce = 0
  1702. Sifilis = 0
  1703. TriperOnce = 0
  1704. Triper = 0
  1705. TriperOral = 0
  1706. KandidozOnce = 0
  1707. Kandidoz = 0
  1708. }
  1709. $cheatmenu['auto_period'] = {
  1710. if cyccustom = 0:
  1711. cyccustom = 1
  1712. else
  1713. cyccustom = 0
  1714. end
  1715. dynamic $cheatmenu['setting']
  1716. }
  1717. $cheatmenu['force_preg'] = {
  1718. if mesec ! 0: mesec = 0
  1719. if FocH ! 0: FocH = 0
  1720. if EggRH ! 0: EggRH = 0
  1721. if Ovulate ! 0: Ovulate = 0
  1722. if UnfertEgg ! 0: UnfertEgg = 0
  1723. if LutH ! 0: LutH = 0
  1724. if RecovH ! 0: RecovH = 0
  1725. preg = 1
  1726. cycle = 5
  1727. !!Setting implantation date for the due date calculation
  1728. lastovulation = daystart - 5
  1729. PregChem = 150
  1730. $wombthfath = 'A sperm donor'
  1731. babyembryo += 1
  1732. if fertegg = 0:
  1733. Nextbaby = arrsize('$ChildFath')
  1734. Temppolkid = rand(0,1)
  1735. polkid[nextbaby] = Temppolkid
  1736. $kidname[nextbaby] = 'unborn'
  1737. kidage[nextbaby] = 0
  1738. daykid[nextbaby] = 0
  1739. monthkid[nextbaby] = 0
  1740. yearkid[nextbaby] = 0
  1741. Babyptype[nextbaby] = 0
  1742. $ChildFath[nextbaby] = 'A sperm donor'
  1743. $ChildThFath[nextbaby] = 'A sperm donor'
  1744. hairkid[nextbaby] = rand(0, 3)
  1745. eyeskid[nextbaby] = rand(0, 3)
  1746. ChildConType[nextbaby] = 0
  1747. Babyptype[nextbaby] = 1
  1748. else
  1749. fertegg -= 1
  1750. end
  1751. }
  1752. $cheatmenu['remove_preg'] = {
  1753. gs 'medical_din', 'remove_preg'
  1754. knowpregloss = 2
  1755. if FertEgg > 0: FertEgg = 0
  1756. }
  1757. $cheatmenu['cycle'] = {
  1758. *clr
  1759. if cycle ! 5:
  1760. EggRH = 0
  1761. LutH = 0
  1762. Ovulate = 0
  1763. UnfertEgg = 0
  1764. FertEgg = 0
  1765. RecovH = 0
  1766. mesec = 0
  1767. '<a href="exec:daylastperiod = daystart & Cycle = 0 & mesec = 96 & gs ''stat'' & dynamic $cheatmenu[''state'']">Menstration</a>'
  1768. '<a href="exec:Cycle = 1 & gs ''stat'' & dynamic $cheatmenu[''state'']">Follicular</a>'
  1769. '<a href="exec:Cycle = 2 & Ovulate = 24+rand(0,20) & EggRH = 160 + 160+rand(0, 5) & gs ''stat'' & dynamic $cheatmenu[''state'']">Ovulation</a>'
  1770. '<a href="exec:Cycle = 3 & gs ''stat'' & dynamic $cheatmenu[''state'']">Luteal</a>'
  1771. end
  1772. }
  1773. $cheatmenu['setting'] = {
  1774. *clr & cla
  1775. gs 'obj_din', 'settingtabs'
  1776. '<center><h1>Gameplay Settings</h1></center>'
  1777. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1778. '<td cellspacing="0" cellpadding="20" valign="top">'
  1779. if Enable_nogameover = 1:
  1780. 'Prevent Non-Drama GAMEOVER: Currently ON - <a href="exec:Enable_nogameover = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1781. else
  1782. 'Prevent Non-Drama GAMEOVER: Currently OFF - <a href="exec:Enable_nogameover = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1783. end
  1784. if music_on = 0:
  1785. 'Music: Currently OFF - <a href="exec:music_on = 1 & music_loop = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1786. else
  1787. 'Music: Currently ON - <a href="exec:music_on = 0 & music_loop = 0 & close all & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1788. end
  1789. *nl
  1790. if disable_autosave = 1:
  1791. 'AutoSave: Currently OFF - <a href="exec:disable_autosave = 0 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1792. else
  1793. 'AutoSave: Currently ON - <a href="exec:disable_autosave = 1 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1794. end
  1795. if autohairbrush = 1:
  1796. 'Auto brush hair on mirror visit: Currently ON - <a href="exec:autohairbrush = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1797. else
  1798. 'Auto brush hair on mirror visit: Currently OFF - <a href="exec:autohairbrush = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1799. end
  1800. if enfullmorrout = 1:
  1801. 'Full morning routine enabled: Currently ON - <a href="exec:enfullmorrout = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1802. else
  1803. 'Full morning routine enabled: Currently OFF - <a href="exec:enfullmorrout = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1804. end
  1805. *nl
  1806. if cyccustom = 1:
  1807. 'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn OFF</a>'
  1808. else
  1809. 'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn ON</a>'
  1810. end
  1811. if cheatKlisma = 1:
  1812. 'Enema realism: Currently ON - <a href="exec:cheatKlisma = 1 & dynamic $cheatmenu[''enema'']">Turn OFF</a>'
  1813. else
  1814. 'Enema realism: Currently OFF - <a href="exec:cheatKlisma = 0 & dynamic $cheatmenu[''enema'']">Turn ON</a>'
  1815. end
  1816. if editpornname = 1:
  1817. 'Editing of the names of the porn movies you stared enabled: Currently ON - <a href="exec:editpornname = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1818. else
  1819. 'Renaming porn movies you star in: Currently OFF - <a href="exec:editpornname = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1820. end
  1821. *nl
  1822. '<B>Difficulty Setting</B>'
  1823. 'At the moment it only improves rate of skill gain'
  1824. 'Difficulty: Currently at <<func(''_difficulty'',''getdifficulty'')>>'
  1825. '<ul><li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''easy peasy'') & dynamic $cheatmenu[''setting'']">easy peasy</a></li>'
  1826. '<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''relaxed'') & dynamic $cheatmenu[''setting'']">relaxed</a></li>'
  1827. '<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''realistic'') & dynamic $cheatmenu[''setting'']">realistic</a></li>'
  1828. '<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''hardcore'') & dynamic $cheatmenu[''setting'']">hardcore</a></li></ul>'
  1829. '</tr></table></b></center>'
  1830. }
  1831. $cheatmenu['display'] = {
  1832. *clr & cla
  1833. gs 'obj_din', 'settingtabs'
  1834. '<center><h1>Display Setting</h1></center>'
  1835. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1836. '<td cellspacing="0" cellpadding="20" valign="top">'
  1837. if usePopUps = 1:
  1838. 'Allow Popup Pictures: Currently ON - <a href="exec:usePopUps = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  1839. else
  1840. 'Allow Popup Pictures: Currently OFF - <a href="exec:usePopUps = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  1841. end
  1842. if set_imgh > 0: set_imgw = 0
  1843. if set_imgw > 0: set_imgh = 0
  1844. if set_imgh <= 0 and set_imgw <= 0: $set_imgh = ''
  1845. if set_imgh > 0:
  1846. 'Force Image Height: <a href="exec:set_imgw = 0 & set_imgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''display'']"><<set_imgh>></a>: Currently ON - <a href="exec:set_imgh = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  1847. $set_imgh = 'Height = <<set_imgh>>'
  1848. else
  1849. 'Force Image Height: Currently OFF - <a href="exec:set_imgw = 0 & set_imgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''display'']">Turn ON</a>'
  1850. end
  1851. if set_imgw > 0:
  1852. 'Force Image Width: <a href="exec:set_imgh = 0 & set_imgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''display'']"><<set_imgw>></a>, Currently ON - <a href="exec:set_imgw=0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  1853. $set_imgh = 'Width = <<set_imgw>>'
  1854. else
  1855. 'Force Image Width: Currently OFF - <a href="exec:set_imgh = 0 &set_imgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''display'']">Turn ON</a>'
  1856. end
  1857. *nl
  1858. !night_mode 0: dynamic
  1859. !night_mode 1: black
  1860. !night_mode 2: grey
  1861. !night_mode 99: no theme
  1862. if night_mode = 0:'Girl Life Theme Selection: Dynamic | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
  1863. if night_mode = 1:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | Pitch Black | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
  1864. if night_mode = 2:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | Modern Grey | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
  1865. if night_mode = 3:'Girl Life Theme Selection: Dynamic | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | White | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
  1866. if night_mode = 99:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | No Theme'
  1867. '<font color="grey">Dynamic theme (default) will change colour based on the game hour. No theme will remove table backgrounds.</font>'
  1868. *nl
  1869. if Enable_tablemap = 1:
  1870. 'List friends in table: Currently ON - <a href="exec:Enable_tablemap = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  1871. else
  1872. 'List friends in table: Currently OFF - <a href="exec:Enable_tablemap = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  1873. end
  1874. *nl
  1875. if Enable_faceturn = 1:
  1876. 'Always show face: Currently ON - <a href="exec:Enable_faceturn = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  1877. else
  1878. 'Always show face: Currently OFF - <a href="exec:Enable_faceturn = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  1879. end
  1880. *nl
  1881. if Enable_Android = 1:
  1882. 'Set Fontsize for Status: Unsupported'
  1883. 'Android Mode:Currently ON - <a href="exec:Enable_Android = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  1884. ! 'click <a href="exec:*clr & cla & FUNC (''$menu_obnovit'')">refresh</a> to refresh status window.'
  1885. 'click <B>refresh</B> on top of status window to renew.'
  1886. else
  1887. 'Android Mode: Currently OFF - <a href="exec:Enable_Android = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  1888. end
  1889. '</tr></table></b></center>'
  1890. }
  1891. $cheatmenu['status'] = {
  1892. *clr & cla
  1893. gs 'obj_din', 'settingtabs'
  1894. gs 'stat'
  1895. '<center><h1>Status Window Settings</h1></center>'
  1896. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1897. '<td cellspacing="0" cellpadding="20" valign="top">'
  1898. if disable_LoadSave = 0:
  1899. 'Save/Load Buttons: Currently Image - <a href="exec:disable_LoadSave = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
  1900. elseif disable_LoadSave = 1:
  1901. 'Save/Load Buttons: Currently OFF - <a href="exec:disable_LoadSave = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Image</a>'
  1902. elseif disable_LoadSave = 2:
  1903. 'Save/Load Buttons: Currently Text - <a href="exec:disable_LoadSave = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  1904. end
  1905. *nl
  1906. !disabled inner thought font selection during char creation, as it breaks menu.
  1907. if settingmode = 0:
  1908. '<a href="exec:gs ''shortgs'',''fonts'', ''$cheatmenu[''''display'''']'',''$OpenInnerThought'',''$CloseInnerThought'' ">Set</a> the font style of inner thoughts'
  1909. $OpenInnerThought+'Oh my god, what will the neighbours think of us?'+$CloseInnerThought
  1910. end
  1911. *nl
  1912. 'Switch to the <a href="exec:TempUnit = '+iif(TempUnit = 0,'1 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''status'']">Fahrenheit','0 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''status'']">Celsius')+'</a> scale'
  1913. *nl
  1914. 'Scale Weather Banner: <a href="exec:default_wbanner = 1 & set_weatherht=input(''Weather Banner Height (Default: 72 Min: 50 Max: 100)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_weatherht>></a>, Reset to default <a href="exec:default_wbanner = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(72)</a>'
  1915. if set_weatherht < 50:
  1916. set_weatherht = 50
  1917. elseif set_weatherht > 100:
  1918. set_weatherht = 100
  1919. end
  1920. 'Scale Menu Icons: <a href="exec:default_menu_icons = 1 & set_miconht=input(''Weather Banner Height (Default: 54 Min: 10 Max: 75)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_miconht>></a>, Reset to default <a href="exec:default_menu_icons = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(54)</a>'
  1921. if set_miconht < 10:
  1922. set_miconht = 10
  1923. elseif set_miconht > 75:
  1924. set_miconht = 75
  1925. end
  1926. if cheatStatusIcons = 0:
  1927. 'Status icons: Click to <a href="exec:cheatStatusIcons = 1 & disable_show_icons = 1 & gs ''stat'' & dynamic $cheatmenu[''status'']">hide</a> them.'
  1928. 'Status Icon Height: <a href="exec:default_status_icons = 1 & set_siconht=input(''Input Status Icon Height (Default: 54 Min: 10 Max: 75)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_siconht>></a>, Reset to default <a href="exec:default_status_icons = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(54)</a>'
  1929. elseif cheatStatusIcons = 1:
  1930. 'Status icons: Click to <a href="exec: cheatStatusIcons = 0 & disable_show_icons = 0 & gs ''stat'' & dynamic $cheatmenu[''status'']">show</a> them.'
  1931. end
  1932. if set_siconht < 10:
  1933. set_siconht = 10
  1934. elseif set_siconht > 75:
  1935. set_siconht = 75
  1936. end
  1937. if ETOmenu = 1:
  1938. 'Status Display mode: Currently Text - <a href="exec:ETOmenu = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Scale Bar</a>'
  1939. else
  1940. 'Status Display mode: Currently Scale Bar - <a href="exec:ETOmenu = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
  1941. end
  1942. if Enable_scalepic = 1:
  1943. 'Scalebar is now as <b>Image</b>, you can switch to <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Character</a> or <a href="exec:Enable_scalepic = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
  1944. if Enable_scalewidth > 0:
  1945. 'Scalebar Width: <a href="exec:input(''Input Scalebar Width (default to 120)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_scalewidth-1>></a>, Set is currently <a href="exec:Enable_scalewidth = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">ON</a>'
  1946. else
  1947. 'Scalebar Width: Lock is currently <a href="exec:Enable_scalewidth=1+input(''InputS calebar Width (default to 120)'') & dynamic $cheatmenu[''status''] & gs ''stat''">OFF</a>'
  1948. end
  1949. if Enable_scaleheight > 0:
  1950. 'Scalebar Height: <a href="exec:input(''Input Scalebar Height (default to 15)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_scaleheight-1>></a>, Set is currently <a href="exec:Enable_scaleheight = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">ON</a>'
  1951. else
  1952. 'Scalebar Height: Lock is currently <a href="exec:Enable_scaleheight=1+input(''InputS calebar Height (default to 15)'') & dynamic $cheatmenu[''status''] & gs ''stat''">OFF</a>'
  1953. end
  1954. elseif Enable_scalepic = 0:
  1955. 'Scalebar is now as <b>Character</b>, you can switch to <a href="exec:Enable_scalepic = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Image</a> or <a href="exec:Enable_scalepic = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
  1956. if cheatStatusBars = 1:
  1957. 'Set status bar size: Currently Small - <a href="exec:cheatStatusBars = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Set large</a>'
  1958. else
  1959. 'Set status bar size: Currently Large - <a href="exec:cheatStatusBars = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Set small</a>'
  1960. end
  1961. elseif Enable_scalepic = 2:
  1962. 'Scalebar is now as <b>Table</b>, you can switch to <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Image</a> or <a href="exec:Enable_scalepic = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Character</a>'
  1963. end
  1964. if Enable_statfsize<0:Enable_statfsize=0
  1965. if Enable_statfsize > 0:
  1966. 'Set Fontsize for Status: Currently ON - <a href="exec:Enable_statfsize=input(''Enter Fontsize'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_statfsize>></a>, <a href="exec:Enable_statfsize=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  1967. else
  1968. 'Set Fontsize for Status: Currently OFF - <a href="exec:Enable_statfsize=input(''Enter fontsize'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  1969. end
  1970. *nl
  1971. '<center><B>Status Window toolbar</B></center>'
  1972. if Enable_showattr = 1:
  1973. 'Show More attribute: Currently ON - <a href="exec:Enable_showattr = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  1974. else
  1975. 'Show More attribute: Currently OFF - <a href="exec:Enable_showattr = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  1976. end
  1977. if Enable_showskill = 1:
  1978. 'Show skill: Currently ON - <a href="exec:Enable_showskill = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  1979. else
  1980. 'Show skill: Currently OFF - <a href="exec:Enable_showskill = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  1981. end
  1982. if Enable_showrelation = 1:
  1983. 'Show relations: Currently ON - <a href="exec:Enable_showrelation = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  1984. else
  1985. 'Show relations: Currently OFF - <a href="exec:Enable_showrelation = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  1986. end
  1987. if Enable_showstatimg = 1:
  1988. 'Show image toolbar: Currently ON - <a href="exec:Enable_showstatimg = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  1989. else
  1990. 'Show image toolbar: Currently OFF - <a href="exec:Enable_showstatimg = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  1991. end
  1992. *nl
  1993. if Enable_showstatimg = 1:
  1994. !control image toolbar position
  1995. '<center><B>Image Toolbar Settings</B></center>'
  1996. $stat_temp_text = '<br>Image toolbar position: <B>'
  1997. if Enable_statimg_loc = 0:
  1998. $stat_temp_text += 'Middle'
  1999. elseif Enable_statimg_loc = 1:
  2000. $stat_temp_text += 'Top'
  2001. elseif Enable_statimg_loc = 2:
  2002. $stat_temp_text += 'Bottom'
  2003. else
  2004. $stat_temp_text += 'ERROR! please reset it'
  2005. end
  2006. $stat_temp_text += '</B>. You can move it to '
  2007. if Enable_statimg_loc ! 0:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Middle</a>'
  2008. if Enable_statimg_loc ! 1:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=1 & dynamic $cheatmenu[''status''] & gs ''stat''">Top</a>'
  2009. if Enable_statimg_loc ! 2:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=2 & dynamic $cheatmenu[''status''] & gs ''stat''">Bottom</a>'
  2010. $stat_temp_text
  2011. killvar 'stat_temp_text'
  2012. !End control image toolbar position
  2013. if set_statimgh > 0: set_statimgw = 0
  2014. if set_statimgw > 0: set_statimgh = 0
  2015. if set_statimgh <= 0 and set_statimgw <= 0: $set_statimgh = ''
  2016. if set_statimgh > 0:
  2017. 'Force Image toobar height: <a href="exec:set_statimgw=0 & set_statimgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_statimgh>></a>: Currently ON - <a href="exec:set_statimgh=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  2018. $set_statimgh = 'height = <<set_statimgh>>'
  2019. else
  2020. 'Force Image toobar height: Currently OFF - <a href="exec:set_statimgw=0 & set_statimgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  2021. end
  2022. if set_statimgw > 0:
  2023. 'Force Image toobar width: <a href="exec:set_statimgh=0 & set_statimgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_statimgw>></a>: Currently ON - <a href="exec:set_statimgw=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  2024. $set_statimgh = 'width = <<set_statimgw>>'
  2025. else
  2026. 'Force Image toobar width: Currently OFF - <a href="exec:set_statimgh=0 & set_statimgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  2027. end
  2028. end
  2029. !<a href="exec:gs ''Cheatmenu_din'' & dynamic $cheatmenu[''status''] & gs ''stat''"><img src="<<FUNC(''$phone_theme'')>>icon_settings.png"></a>
  2030. '</tr></table></b></center>'
  2031. }
  2032. $cheatmenu['theme'] = {
  2033. *clr & cla
  2034. gs 'obj_din', 'settingtabs'
  2035. '<center><h1>Phone Theme Menu</h1></center>'
  2036. '<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
  2037. *nl
  2038. if pcs_phonetheme = 0: $phoneNameTemp = 'Standard'
  2039. if pcs_phonetheme = 1: $phoneNameTemp = 'Bimbo'
  2040. if pcs_phonetheme = 2: $phoneNameTemp = 'Aluminus'
  2041. if pcs_phonetheme = 3: $phoneNameTemp = 'Bottlecapped'
  2042. if pcs_phonetheme = 4: $phoneNameTemp = 'Galactic'
  2043. if pcs_phonetheme = 5: $phoneNameTemp = 'Vectored'
  2044. if pcs_phonetheme = 6: $phoneNameTemp = 'Veneer'
  2045. if pcs_phonetheme = 7: $phoneNameTemp = 'Voidwalker'
  2046. if pcs_phonetheme = 8: $phoneNameTemp = 'Voidwalker Red'
  2047. if pcs_phonetheme = 9: $phoneNameTemp = 'Voidwalker Toxic'
  2048. if pcs_phonetheme = 10: $phoneNameTemp = 'Gopnik'
  2049. if pcs_phonetheme = 11: $phoneNameTemp = 'Sports'
  2050. if pcs_phonetheme = 12: $phoneNameTemp = 'Succubus'
  2051. if pcs_phonetheme = 13: $phoneNameTemp = 'Woodshop'
  2052. 'Current theme: <b><<$phoneNameTemp>></b>'
  2053. *nl
  2054. 'Choose from the available themes'
  2055. *nl
  2056. i = 0
  2057. :phonethemeloop
  2058. if phonetheme[i] = 1:'<td align="center" valign="top"><a href="exec: pcs_phonetheme = <<i>> & gs ''telefon'',''Phone_menu'' & dynamic $cheatmenu[''theme'']"><img height="100" width="100" src="images/system/phone/theme/' + $phonetheme_name[i] + '/icon_call.png"></a></td>'
  2059. i += 1
  2060. if i <= ARRSIZE('phonetheme') and i <= 3:
  2061. jump 'phonethemeloop'
  2062. elseif i <= ARRSIZE('phonetheme') and i = 4:
  2063. '</tr><tr>'
  2064. jump 'phonethemeloop'
  2065. elseif i <= ARRSIZE('phonetheme') and i > 4 and i <= 7:
  2066. jump 'phonethemeloop'
  2067. elseif i <= ARRSIZE('phonetheme') and i = 8:
  2068. '</tr><tr>'
  2069. jump 'phonethemeloop'
  2070. elseif i <= ARRSIZE('phonetheme') and i > 8 and i <= 11:
  2071. jump 'phonethemeloop'
  2072. elseif i <= ARRSIZE('phonetheme') and i = 12:
  2073. '</tr><tr>'
  2074. jump 'phonethemeloop'
  2075. elseif i <= ARRSIZE('phonetheme') and i > 12 and i <= 15:
  2076. jump 'phonethemeloop'
  2077. end
  2078. '</tr></table></b></center>'
  2079. }
  2080. $cheatmenu['pain'] = {
  2081. if pain['head'] < 0:pain['head'] = 0
  2082. if pain['hair'] < 0:pain['hair'] = 0
  2083. if pain['ears'] < 0:pain['ears'] = 0
  2084. if pain['eyebrows'] < 0:pain['eyebrows'] = 0
  2085. if pain['eyes'] < 0:pain['eyes'] = 0
  2086. if pain['cheeks'] < 0:pain['cheeks'] = 0
  2087. if pain['nose'] < 0:pain['nose'] = 0
  2088. if pain['mouth'] < 0:pain['mouth'] = 0
  2089. if pain['lips'] < 0:pain['lips'] = 0
  2090. if pain['tongue'] < 0:pain['tongue'] = 0
  2091. if pain['throat'] < 0:pain['throat'] = 0
  2092. if pain['neck'] < 0:pain['neck'] = 0
  2093. if pain['back'] < 0:pain['back'] = 0
  2094. if pain['asscheeks'] < 0:pain['asscheeks'] = 0
  2095. if pain['asshole'] < 0:pain['asshole'] = 0
  2096. if pain['hips'] < 0:pain['hips'] = 0
  2097. if pain['thighs'] < 0:pain['thighs'] = 0
  2098. if pain['legL'] < 0:pain['legL'] = 0
  2099. if pain['legR'] < 0:pain['legR'] = 0
  2100. if pain['feet'] < 0:pain['feet'] = 0
  2101. if pain['toes'] < 0:pain['toes'] = 0
  2102. if pain['shoulders'] < 0:pain['shoulders'] = 0
  2103. if pain['armL'] < 0:pain['armL'] = 0
  2104. if pain['armR'] < 0:pain['armR'] = 0
  2105. if pain['hands'] < 0:pain['hands'] = 0
  2106. if pain['fingers'] < 0:pain['fingers'] = 0
  2107. if pain['chest'] < 0:pain['chest'] = 0
  2108. if pain['breasts'] < 0:pain['breasts'] = 0
  2109. if pain['nipples'] < 0:pain['nipples'] = 0
  2110. if pain['ribs'] < 0:pain['ribs'] = 0
  2111. if pain['tummy'] < 0:pain['tummy'] = 0
  2112. if pain['pubic'] < 0:pain['pubic'] = 0
  2113. if pain['vaginal'] < 0:pain['vaginal'] = 0
  2114. if pain['clitoris'] < 0:pain['clitoris'] = 0
  2115. if pain['urethra'] < 0:pain['urethra'] = 0
  2116. if pain['cervix'] < 0:pain['cervix'] = 0
  2117. *clr & cla
  2118. gs 'obj_din', 'cheattabs'
  2119. '<center><h1>Cheat Menu - Pain Management</h1></center>'
  2120. '<center><a href="exec:killvar ''pain'' & dynamic $cheatmenu[''pain'']">No pain</a></center>'
  2121. *nl
  2122. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  2123. '<tr><td width="50%" cellpadding="10" valign="top">'
  2124. 'pain[head] = <<pain[''head'']>> <a href="exec:pain[''head''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''head''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2125. 'pain[hair] = <<pain[''hair'']>> <a href="exec:pain[''hair''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hair''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2126. 'pain[ears] = <<pain[''ears'']>> <a href="exec:pain[''ears''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ears''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2127. 'pain[eyebrows] = <<pain[''ears'']>> <a href="exec:pain[''eyebrows''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyebrows''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2128. 'pain[eyes] = <<pain[''eyes'']>> <a href="exec:pain[''eyes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2129. 'pain[cheeks] = <<pain[''cheeks'']>> <a href="exec:pain[''cheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2130. 'pain[nose] = <<pain[''nose'']>> <a href="exec:pain[''nose''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nose''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2131. 'pain[mouth] = <<pain[''mouth'']>> <a href="exec:pain[''mouth''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''mouth''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2132. 'pain[lips] = <<pain[''lips'']>> <a href="exec:pain[''lips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''lips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2133. 'pain[tongue] = <<pain[''tongue'']>> <a href="exec:pain[''tongue''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tongue''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2134. 'pain[throat] = <<pain[''throat'']>> <a href="exec:pain[''throat''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''throat''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2135. 'pain[neck] = <<pain[''neck'']>> <a href="exec:pain[''neck''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''neck''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2136. 'pain[back] = <<pain[''back'']>> <a href="exec:pain[''back''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''back''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2137. 'pain[asscheeks] = <<pain[''asscheeks'']>> <a href="exec:pain[''asscheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asscheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2138. 'pain[asshole] = <<pain[''asshole'']>> <a href="exec:pain[''asshole''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asshole''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2139. 'pain[hips] = <<pain[''hips'']>> <a href="exec:pain[''hips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2140. 'pain[thighs] = <<pain[''thighs'']>> <a href="exec:pain[''thighs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''thighs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2141. 'pain[left leg] = <<pain[''legL'']>> <a href="exec:pain[''legL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2142. 'pain[right leg] = <<pain[''legR'']>> <a href="exec:pain[''legR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2143. '</td><td width="50%" cellpadding="10" valign="top">'
  2144. 'pain[feet] = <<pain[''feet'']>> <a href="exec:pain[''feet''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''feet''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2145. 'pain[toes] = <<pain[''toes'']>> <a href="exec:pain[''toes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''toes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2146. 'pain[shoulders] = <<pain[''shoulders'']>> <a href="exec:pain[''shoulders''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''shoulders''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2147. 'pain[left arm] = <<pain[''armL'']>> <a href="exec:pain[''armL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2148. 'pain[right arm] = <<pain[''armR'']>> <a href="exec:pain[''armR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2149. 'pain[hands] = <<pain[''hands'']>> <a href="exec:pain[''hands''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hands''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2150. 'pain[fingers] = <<pain[''fingers'']>> <a href="exec:pain[''fingers''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''fingers''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2151. 'pain[chest] = <<pain[''chest'']>> <a href="exec:pain[''chest''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''chest''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2152. 'pain[breasts] = <<pain[''breasts'']>> <a href="exec:pain[''breasts''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''breasts''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2153. 'pain[nipples] = <<pain[''nipples'']>> <a href="exec:pain[''nipples''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nipples''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2154. 'pain[ribs] = <<pain[''ribs'']>> <a href="exec:pain[''ribs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ribs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2155. 'pain[tummy] = <<pain[''tummy'']>> <a href="exec:pain[''tummy''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tummy''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2156. 'pain[pubic] = <<pain[''pubic'']>> <a href="exec:pain[''pubic''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''pubic''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2157. 'pain[vaginal] = <<pain[''vaginal'']>> <a href="exec:pain[''vaginal''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''vaginal''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2158. 'pain[labia] = <<pain[''labia'']>> <a href="exec:pain[''labia''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''labia''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2159. 'pain[clitoris] = <<pain[''clitoris'']>> <a href="exec:pain[''clitoris''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''clitoris''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2160. 'pain[urethra] = <<pain[''urethra'']>> <a href="exec:pain[''urethra''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''urethra''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2161. 'pain[cervix] = <<pain[''cervix'']>> <a href="exec:pain[''cervix''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cervix''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2162. '</td></tr></table></center>'
  2163. }
  2164. $cheatmenu['DNA'] = {
  2165. *clr & cla
  2166. gs 'obj_din', 'cheattabs'
  2167. '<center><h1>Cheat Menu - DNA Generation</h1></center>'
  2168. '<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
  2169. '<td cellspacing="0" cellpadding="20" valign="top">'
  2170. '<center>DNA string generation<br>If parents are not in game, leave the respective IDs empty</center>'
  2171. *nl
  2172. if $cheatDNAC ! '':
  2173. '<b>Child: <<$npc_firstname[''<<$cheatDNAC>>'']>> <<$npc_lastname[''<<$cheatDNAC>>'']>></b> (<<$cheatDNAC>>)<br><<$npc_dna[$cheatDNAC]>><br><a href="exec:killvar ''cheatDNAC'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
  2174. npctemp = 0
  2175. killvar 'cheatDNAM'
  2176. killvar 'cheatDNAF'
  2177. :npcparentfind
  2178. if $npc_dna['A<<npctemp>>'] ! '':
  2179. if mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
  2180. $cheatDNAM = 'A<<npctemp>>'
  2181. elseif mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
  2182. $cheatDNAF = 'A<<npctemp>>'
  2183. end
  2184. end
  2185. if $npc_dna['B<<npctemp>>'] ! '':
  2186. if mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
  2187. $cheatDNAM = 'B<<npctemp>>'
  2188. elseif mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
  2189. $cheatDNAF = 'B<<npctemp>>'
  2190. end
  2191. end
  2192. if $npc_dna['C<<npctemp>>'] ! '':
  2193. if mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
  2194. $cheatDNAM = 'C<<npctemp>>'
  2195. elseif mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
  2196. $cheatDNAF = 'C<<npctemp>>'
  2197. end
  2198. end
  2199. if ($npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '') and ($cheatDNAM = '' or $cheatDNAF = ''):npctemp += 1 & jump 'npcparentfind'
  2200. killvar 'npctemp'
  2201. else
  2202. '<a href="exec:killvar ''tempDNAC'' & dynamic $cheatmenu[''DNAC'']"><b>ID of child (if it is known)</b></a>'
  2203. end
  2204. if $cheatDNAM ! '':
  2205. '<br><b>Mother: <<$npc_firstname[''<<$cheatDNAM>>'']>> <<$npc_lastname[''<<$cheatDNAM>>'']>></b> (<<$cheatDNAM>>)<br><<$npc_dna[$cheatDNAM]>><br><a href="exec:killvar ''cheatDNAM'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
  2206. else
  2207. '<br><a href="exec:killvar ''tempDNAM'' & dynamic $cheatmenu[''DNAM'']"><b>ID of mother (if it is known)</b></a>'
  2208. end
  2209. if $cheatDNAF ! '':
  2210. '<br><b>Father: <<$npc_firstname[''<<$cheatDNAF>>'']>> <<$npc_lastname[''<<$cheatDNAF>>'']>></b> (<<$cheatDNAF>>)<br><<$npc_dna[$cheatDNAF]>><br><a href="exec:killvar ''cheatDNAF'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
  2211. else
  2212. '<br><a href="exec:killvar ''tempDNAF'' & dynamic $cheatmenu[''DNAF'']"><b>ID of father (if it is known)</b></a>'
  2213. end
  2214. *nl
  2215. if $cheatDNAM ! '' and $cheatDNAF ! '':
  2216. $cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$npc_dna[$cheatDNAF])
  2217. elseif $cheatDNAM ! '':
  2218. if $cheatDNAC ! '':
  2219. $tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
  2220. else
  2221. $tempDNAF = func('DNA','create')
  2222. $cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$tempDNAF)
  2223. end
  2224. elseif $cheatDNAF ! '':
  2225. if $cheatDNAC ! '':
  2226. $tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
  2227. else
  2228. $tempDNAM = func('DNA','create')
  2229. $cheatDNAgenerated = func('DNA','generate',$tempDNAM,$npc_dna[$cheatDNAF])
  2230. end
  2231. else
  2232. if $cheatDNAC = '':
  2233. $tempDNAM = func('DNA','create')
  2234. $tempDNAF = func('DNA','create')
  2235. $cheatDNAgenerated = func('DNA','generate',$tempDNAM,$tempDNAF)
  2236. else
  2237. $tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
  2238. $tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
  2239. end
  2240. end
  2241. if $cheatDNAM = '': '<br><b>Random mother DNA:</b> <<$tempDNAM>>'
  2242. if $cheatDNAF = '': '<br><b>Random father DNA:</b> <<$tempDNAF>>'
  2243. if $cheatDNAC = '': '<br><b>Random child DNA:</b> <<$cheatDNAgenerated>>'
  2244. '<br><a href="exec:dynamic $cheatmenu[''DNA'']">Generate again</a>'
  2245. if $cheatDNAC ! '':
  2246. npctemp = 0
  2247. :npcgparfind
  2248. if $npc_dna['A<<npctemp>>'] ! '':
  2249. if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['A<<npctemp>>'],1,10):
  2250. '<br><b>Grandmother: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2251. elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<<npctemp>>'],1,10):
  2252. '<br><b>Grandfather: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2253. end
  2254. end
  2255. if $npc_dna['B<<npctemp>>'] ! '':
  2256. if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['B<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['B<<npctemp>>'],1,10):
  2257. '<br><b>Grandmother: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2258. elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['B<<npctemp>>'],1,10):
  2259. '<br><b>Grandfather: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2260. end
  2261. end
  2262. if $npc_dna['C<<npctemp>>'] ! '':
  2263. if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['C<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['C<<npctemp>>'],1,10):
  2264. '<br><b>Grandmother: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2265. elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['C<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<<npctemp>>'],1,10):
  2266. '<br><b>Grandfather: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2267. end
  2268. end
  2269. if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgparfind'
  2270. end
  2271. if $cheatDNAM ! '' or $cheatDNAF ! '':
  2272. npctemp = 0
  2273. :npcchildfind
  2274. if $npc_dna['A<<npctemp>>'] ! '':
  2275. if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
  2276. '<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2277. elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2278. '<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2279. elseif mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2280. '<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2281. end
  2282. end
  2283. if $npc_dna['B<<npctemp>>'] ! '':
  2284. if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
  2285. '<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2286. elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2287. '<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2288. elseif mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2289. '<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2290. end
  2291. end
  2292. if $npc_dna['C<<npctemp>>'] ! '':
  2293. if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
  2294. '<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2295. elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2296. '<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2297. elseif mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2298. '<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2299. end
  2300. end
  2301. if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcchildfind'
  2302. npctemp = 0
  2303. :npcgchildfind
  2304. if $npc_dna['A<<npctemp>>'] ! '':
  2305. if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
  2306. '<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2307. elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
  2308. '<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2309. elseif ((mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
  2310. '<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2311. end
  2312. end
  2313. if $npc_dna['B<<npctemp>>'] ! '':
  2314. if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
  2315. '<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2316. elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
  2317. '<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2318. elseif ((mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
  2319. '<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2320. end
  2321. end
  2322. if $npc_dna['C<<npctemp>>'] ! '':
  2323. if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
  2324. '<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2325. elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
  2326. '<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2327. elseif ((mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
  2328. '<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2329. end
  2330. end
  2331. if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgchildfind'
  2332. killvar 'npctemp'
  2333. end
  2334. killvar '$tempDNAF'
  2335. killvar '$tempDNAM'
  2336. killvar '$tempDNAC'
  2337. killvar 'cheatDNAgenerated'
  2338. '</td></tr></table></center>'
  2339. }
  2340. $cheatmenu['DNAM'] = {
  2341. $cheatDNAM = input("Enter genetic mother ID (like A33, without apostrophe)")
  2342. if $cheatDNAM = '':exit
  2343. dynamic $cheatDNAM
  2344. dynamic $cheatmenu['DNA']
  2345. }
  2346. $cheatmenu['DNAF'] = {
  2347. $cheatDNAF = input("Enter genetic father ID (like A34, without apostrophe)")
  2348. if $cheatDNAF = '':exit
  2349. dynamic $cheatDNAF
  2350. dynamic $cheatmenu['DNA']
  2351. }
  2352. $cheatmenu['DNAC'] = {
  2353. $cheatDNAC = input("Enter genetic Child ID (like A34, without apostrophe)")
  2354. if $cheatDNAC = '':exit
  2355. dynamic $cheatDNAC
  2356. dynamic $cheatmenu['DNA']
  2357. }
  2358. $cheatmenu['quicktime'] = {
  2359. minut += ARGS[0]
  2360. *clr
  2361. gs 'daystart'
  2362. gs 'outdoors', 'weather'
  2363. gs 'stat'
  2364. gs 'fertility', 'cum_arrcheat'
  2365. }
  2366. $cheatmenu = {
  2367. gs'stat'
  2368. currhour = (daystart-1) * 24 + hour
  2369. currday = daystart
  2370. temp_week = week & temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut
  2371. *clr & cla
  2372. gs 'obj_din', 'cheattabs'
  2373. '<center><h1>Cheat Menu - Index</h1></center>'
  2374. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  2375. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  2376. '<a href="exec:dynamic $cheatmenu[''dynamic'']">Dynamic Input Command</a>'
  2377. '<a href="exec:gs ''fertility'',''cum_arrcheat''">OOX Debug</a>'
  2378. 'Right now <<$week[week]>> <<$month>> <<day>> <<year>> <<hour>>:<<minut>>'
  2379. 'Jump forward <a href="exec:dynamic $cheatmenu[''quicktime''], 15 & dynamic $cheatmenu">+15</a> minutes'
  2380. *nl
  2381. *nl
  2382. '<a href="exec:gt''pav_residential''">Teleport to Pavlovsk</a>'
  2383. '<a href="exec:gt''liam''">Teleport to Pushkin</a>'
  2384. '<a href="exec:gt''city_residential''">Teleport to City</a>'
  2385. '<a href="exec:gt''gadukino''">Teleport to Gadukino</a>'
  2386. '<a href="exec:gt''dachi''">Teleport to Suburban Cooperative</a>'
  2387. *nl
  2388. '<font color="red"><b>WARNING!</b></font>: Teleporting while in an event may break your game. Use at your own risk!'
  2389. *nl
  2390. 'Pregnancy speed multiplier: <a href="exec:if pregspeedcheat < 3:pregspeedcheat += 1 & dynamic $cheatmenu else pregspeedcheat = 0 & dynamic $cheatmenu"><b><<pregspeedcheat+1>></b></a>'
  2391. *nl
  2392. '<a href="exec:dynamic $cheatmenu[''vartracker'']"><b>Variable tracker</b></a>'
  2393. '</tr></table></b></center>'
  2394. }
  2395. $cheatmenu['vartracker'] = {
  2396. gs'stat'
  2397. *clr & cla
  2398. act 'Return to cheat index': dynamic $cheatmenu
  2399. '<center><h1>Cheat menu</h1></center>'
  2400. '<center>For testing purposes.<br>If reporting a bug only the lines in red are neccessary.</center>'
  2401. *nl
  2402. '$loc: <<$loc>>'
  2403. '$locM: <<$locM>>'
  2404. '<font color = red>$CURLOC: <<$CURLOC>></font>'
  2405. '$location_type: <<$location_type>>'
  2406. 'curr_home: <<curr_home>>'
  2407. '$home_town: <<$home_town>>'
  2408. '$home_name: <<$home_name>>'
  2409. 'daystart: <<daystart>>'
  2410. 'daystart_start: <<daystart_start>>'
  2411. 'month: <<month>>'
  2412. 'week: <<week>>'
  2413. '$temperature: <<$temperature>>'
  2414. 'pffilmday: <<pffilmday>>'
  2415. '$pfname: <<$pfname>>'
  2416. 'modelmon: <<modelmon>>'
  2417. 'min_arousal: <<min_arousal>>'
  2418. 'pcs_nips: <<pcs_nips>>'
  2419. 'clit_size: <<clit_size>>'
  2420. 'steroid_have: <<steroid_have>>'
  2421. 'steroid_counter: <<steroid_counter>>'
  2422. 'steroid_dose: <<steroid_dose>>'
  2423. 'aphrodisiac_have: <<aphrodisiac_have>>'
  2424. 'aphrodisiac_counter: <<aphrodisiac_counter>>'
  2425. 'aphrodisiac_timer: <<aphrodisiac_timer>>'
  2426. 'aphrodisiac_addiction: <<aphrodisiac_addiction>>'
  2427. 'bcream_have: <<bcream_have>>'
  2428. 'motherQW: <<npc_QW[''A29'']>>'
  2429. 'Anastasia quest level: <<npc_QW[''A192'']>>'
  2430. 'sex: <<stat[''vaginal'']>>'
  2431. '$clothingworntype: <<$clothingworntype>>'
  2432. 'PCloQuality: <<PCloQuality>>'
  2433. 'Mira''s Father Quest (npc_QW[''A64'']): <<npc_QW[''A64'']>>'
  2434. 'Mira''s Quest (npc_QW[''A60'']): <<npc_QW[''A60'']>>'
  2435. 'mirasextimes: <<mirasextimes>>'
  2436. 'Mira''s Relationship (npc_rel[''A60'']): <<npc_rel[''A60'']>>'
  2437. 'Mitka''s Quest (npc_QW[''A63'']): <<npc_QW[''A63'']>>'
  2438. 'mirabrosextime: <<mirabrosextime>>'
  2439. 'momslut: <<momslut>>'
  2440. 'Kirill''s Relationship (Kirill): <<Kirill>>'
  2441. 'Kirill''s Corruption (Kirill_Crpt): <<Kirill_Crpt>>'
  2442. 'children: <<kid>>'
  2443. !! BabyEmbryo is for how many unborn babies inside PC.
  2444. 'fetus number: <<BabyEmbryo>>'
  2445. !! preg is your pregnancy state. 0 is not pregnant, 1 is pregnant in general, 2 is in labor.
  2446. 'pregnancy state: <<preg>>'
  2447. !! thinkpreg is if svetka thinks she is pregnant
  2448. 'thinkpreg: <<thinkpreg>>'
  2449. !! knowpreg is for solid proof svetlana is pregnant, like a pregnancy test.
  2450. 'knowpreg: <<knowpreg>>'
  2451. !! knowpregrecover is for Svetlanas knowledge that she just gave birth.
  2452. 'knowpregrecover: <<knowpregrecover>>'
  2453. !! knowpregloss is for Svetlanas knowledge that she lost a baby. 1 is for an abortion, 2 is for a miscarrage.
  2454. 'knowpregloss: <<knowpregloss>>'
  2455. !! cycle is Svetlanas current fertility cycle. 5 is pregnant, 4 is recovering, 3 is luteal, 2 is ovulation, 1 is foccular, 0 is menstration.
  2456. 'cycle: <<cycle>>'
  2457. !! menoage is the age Svetlana will be when she goes through menopause.
  2458. 'menoage: <<menoage>>'
  2459. !! age is how old Svetlana is in years.
  2460. 'age: <<age>>'
  2461. !! mesec is for how many hours of bleeding Svetlana has left in her current fertility cycle
  2462. 'mesec: <<mesec>>'
  2463. !! FocH is for how many hours of Foccular cycle Svetlana has gone through in her current fertility cycle. Focular starts at the end of her Luteal and contains the bleeding period in Svetkas cycle.
  2464. 'FocH: <<FocH>>'
  2465. !! EggRH is for the level of egg release that Svetlana has for her ovulation event. 150 generates a single egg, higher amounts might release more.
  2466. 'EggRH: <<EggRH>>'
  2467. !! Ovulate is the amount of hours remaining in Svetlanas ovulation period of her current fertility cycle.
  2468. 'Ovulate: <<Ovulate>>'
  2469. !! UnfertEgg is how many unfertilized eggs Svetlana has in her for fertilization during her Ovulation period. Unfertilized eggs are removed at the end of her Ovulation period.
  2470. 'UnfertEgg: <<UnfertEgg>>'
  2471. !! FertEgg is how many unimplanted eggs Svetlana has in her. These are possible babies, but they die 330 hours after ovulation if they do not implant.
  2472. 'FertEgg: <<FertEgg>>'
  2473. !! babyptype is the pregnancy type of unborn babies. they might be unimplanted 0, healthy 1, or Ectopic 2. Future pregnancy complications should use this variable
  2474. if FertEgg > 0:
  2475. i = arrpos('$kidname','unborn')
  2476. imax = arrsize('$kidname')-1
  2477. :chlp
  2478. ' <<i+1>>. baby''s pregnancy type: <<babyptype[i]>>'
  2479. if i < imax: i += 1 & jump 'chlp'
  2480. killvar 'i'
  2481. killvar 'imax'
  2482. end
  2483. !! BabyEmbryo is for implanted babies. These are solid pregnancies.
  2484. 'Implanted Embryos: <<BabyEmbryo>>'
  2485. !! ferteggage is for the time since the ovulation event. They last 330 hours before they die if not implanted.
  2486. 'ferteggage: <<ferteggage>>'
  2487. !! PregChem is the level of pregnancy, measured in hour parts.
  2488. 'PregChem: <<PregChem>>'
  2489. !! pillcon is the level of birth control to prevent svetlana from getting pregnant. Higher concentrations increase effectivity until it reaches it''s ideal level.
  2490. 'pillcon: <<pillcon>>'
  2491. !! believed pillcon is the level of birth control svetlana thinks she has. This may be different from the actual level due to sabotage or a bad habit of not taking your pill.
  2492. 'Believed pillcon: <<pillcon2>>'
  2493. !! RecovH is the amount of recover hours before Svetlanas fertility cycle resets after having a baby.
  2494. 'RecovH: <<RecovH>>'
  2495. !! daylastperiod is for Svetlanas knowledge on when she began her last period
  2496. 'daylastperiod: <<daylastperiod>> (daystart difference: <<daystart-daylastperiod>>)'
  2497. !! lastmens is for the last day that Svetlana bled during her last cycle.
  2498. 'lastmens: <<lastmens>>'
  2499. !! firstmens is for the first day that Svetlana bled during her last cycle. this is different than daylastperiod because this is the actual date, while daylastperiod is when Svetlana remembers it being.
  2500. 'firstmens: <<lastmens>> (daystart difference: <<daystart-firstmens>>)'
  2501. 'hypnoTime: <<hypnoTime>>'
  2502. 'hypnoStrength: <<hypnoStrength>>'
  2503. 'hypnoDay: <<hypnoDay>>'
  2504. 'hypnoAddict: <<hypnoAddict>>'
  2505. 'missCum: <<missCum>>'
  2506. 'condoms/bad condoms: <<prezik>>/<<badprezik>>'
  2507. if tabletki > 0:
  2508. 'pack(s) of birth control pills: <<tabletki>>'
  2509. if tabletkiold > 0: ' <<tabletkiold>> expired pack'
  2510. if tabletkifake > 0: ' <<tabletkifake>> counterfeit pack'
  2511. if tabletkirej > 0: ' <<tabletkirej>> factory rejected pack'
  2512. if tabletkifert > 0: ' <<tabletkifert>> fertility hormones pack'
  2513. if tabletkisug > 0: ' <<tabletkisug>> sugar pills pack'
  2514. end
  2515. if pillsleft[ptype] > 0:
  2516. if ptype = 0: $pilltype = 'normal '
  2517. if ptype = 1: $pilltype = 'expired '
  2518. if ptype = 2: $pilltype = 'counterfeit '
  2519. if ptype = 3: $pilltype = 'factory rejected '
  2520. if ptype = 4: $pilltype = 'sugar '
  2521. if ptype = 5: $pilltype = 'fertility hormone '
  2522. '<<pillsleft[ptype]>> <<$pilltype>>pills left of your currently used pack'
  2523. killvar '$pilltype'
  2524. end
  2525. }
  2526. $cheatmenu['bdimmain'] = {
  2527. gs 'stat'
  2528. *clr & cla
  2529. gs 'obj_din', 'cheattabs'
  2530. '<center><h1>Cheat Menu - Body Image Sets</h1></center>'
  2531. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  2532. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  2533. '<center><b>Body Image Controls</b></center>'
  2534. *nl
  2535. 'You are currently using set: <<$bodimgsets[((bodset * 10) + 9)]>>'
  2536. if bdsetlock = 1:
  2537. 'The set used is locked to current.'
  2538. else
  2539. 'The set used is unlocked.'
  2540. end
  2541. *nl
  2542. 'This is the current default and custom (if any) body image sets:'
  2543. *nl
  2544. '<a href="exec:chmbodset = 0 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[9]>></b></a>'
  2545. *nl
  2546. '<a href="exec:chmbodset = 1 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[19]>></b></a>'
  2547. *nl
  2548. '<a href="exec:chmbodset = 2 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[29]>></b></a>'
  2549. *nl
  2550. if bodsetcnt >= 4:
  2551. 'You may edit aspects of a custom image set by clicking on their folder names below.'
  2552. *nl
  2553. '<a href="exec:chmbodset = 4 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[49]>></b></a>'
  2554. *nl
  2555. elseif bodsetcnt = 3:
  2556. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  2557. *nl
  2558. end
  2559. if bodsetcnt >= 5:
  2560. '<a href="exec:chmbodset = 5 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[59]>></b></a>'
  2561. *nl
  2562. elseif bodsetcnt = 4:
  2563. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  2564. *nl
  2565. end
  2566. if bodsetcnt >= 6:
  2567. '<a href="exec:chmbodset = 6 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[69]>></b></a>'
  2568. *nl
  2569. elseif bodsetcnt = 5:
  2570. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  2571. *nl
  2572. end
  2573. if bodsetcnt >= 7:
  2574. '<a href="exec:chmbodset = 7 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[79]>></b></a>'
  2575. *nl
  2576. elseif bodsetcnt = 6:
  2577. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  2578. *nl
  2579. end
  2580. if bodsetcnt >= 8:
  2581. '<a href="exec:chmbodset = 8 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[89]>></b></a>'
  2582. *nl
  2583. elseif bodsetcnt = 7:
  2584. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  2585. *nl
  2586. end
  2587. if bodsetcnt >= 9:
  2588. '<a href="exec:chmbodset = 9 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[99]>></b></a>'
  2589. *nl
  2590. elseif bodsetcnt = 8:
  2591. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  2592. *nl
  2593. end
  2594. '</td></tr></table></center>'
  2595. }
  2596. $cheatmenu['bdimdisplay'] = {
  2597. gs 'stat'
  2598. *clr & cla
  2599. '<center><h1>Cheat menu</h1></center>'
  2600. *nl
  2601. '<center><b>Body Image Set Display</b></center>'
  2602. '<a href="exec:killvar ''chmbodset'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
  2603. *nl
  2604. if bdsetlock = 1 and chmbodset = fixbodset:
  2605. 'This is the currently locked set.'
  2606. '<a href="exec:bdsetlock = 0 & bodset = 1 & killvar ''fixbodset'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Clear the lock.</b></a>'
  2607. else
  2608. '<a href="exec:bdsetlock = 1 & bodset = chmbodset & fixbodset = chmbodset & dynamic $cheatmenu[''bdimdisplay'']"><b>Use this set only.</b></a>'
  2609. end
  2610. *nl
  2611. if chmbodset <= 3:
  2612. 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
  2613. 'Descriptors:'
  2614. *nl
  2615. if chmbodset = 3:
  2616. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
  2617. else
  2618. '<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
  2619. end
  2620. *nl
  2621. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a>'
  2622. *nl
  2623. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a>'
  2624. *nl
  2625. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a>'
  2626. *nl
  2627. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a>'
  2628. *nl
  2629. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a>'
  2630. *nl
  2631. if chmbodset = 3:
  2632. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
  2633. else
  2634. '<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
  2635. end
  2636. *nl
  2637. if chmbodset = 3:
  2638. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
  2639. else
  2640. '<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
  2641. end
  2642. *nl
  2643. if chmbodset = 3:
  2644. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/8.jpg''"><<$bodimgsets[((chmbodset * 10) + 8)]>></a>'
  2645. end
  2646. *nl
  2647. else
  2648. 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
  2649. 'Descriptors: (Displayed as "You are:")'
  2650. if imgset0ovr[chmbodset] = 1:
  2651. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a> -- <a href="exec:chmbddes = 0 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2652. *nl
  2653. 'You are using a <a href="exec:imgset0ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 0</a> for this set.'
  2654. *nl
  2655. else
  2656. '<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
  2657. *nl
  2658. 'You are using the <a href="exec:imgset0ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 0</a> for this set.'
  2659. *nl
  2660. end
  2661. *nl
  2662. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a> -- <a href="exec:chmbddes = 1 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2663. *nl
  2664. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a> -- <a href="exec:chmbddes = 2 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2665. *nl
  2666. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a> -- <a href="exec:chmbddes = 3 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2667. *nl
  2668. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a> -- <a href="exec:chmbddes = 4 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2669. *nl
  2670. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a> -- <a href="exec:chmbddes = 5 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2671. *nl
  2672. if imgset6ovr[chmbodset] = 1:
  2673. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a> -- <a href="exec:chmbddes = 6 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2674. *nl
  2675. 'You are using a <a href="exec:imgset6ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 6</a> for this set.'
  2676. *nl
  2677. else
  2678. '<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
  2679. *nl
  2680. 'You are using the <a href="exec:imgset6ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 6</a> for this set.'
  2681. *nl
  2682. end
  2683. if imgset7ovr[chmbodset] = 1:
  2684. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a> -- <a href="exec:chmbddes = 7 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
  2685. *nl
  2686. 'You are using a <a href="exec:imgset7ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 7</a> for this set.'
  2687. *nl
  2688. else
  2689. '<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
  2690. *nl
  2691. 'You are using the <a href="exec:imgset7ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 7</a> for this set.'
  2692. *nl
  2693. end
  2694. '<a href="exec:dynamic $cheatmenu[''bdimcstdel'']">Delete this set.</a>'
  2695. end
  2696. }
  2697. $cheatmenu['bdimcstdel'] = {
  2698. *clr & cla
  2699. '<center><b>Body Image Set Removal</b></center>'
  2700. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
  2701. *nl
  2702. 'This is where you remove a body image set from use, please note it does not delete anything, it just clears the custom set from this game instance/save.'
  2703. if klsetask = 1:
  2704. '<a href="exec:klsetask = 2 & dynamic $cheatmenu[''bdimcstdel'']"><b>Are you sure you want to remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</b></a>'
  2705. elseif klsetask = 2:
  2706. if chmbodset <= 2:
  2707. 'You have encoutered error 1'
  2708. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
  2709. exit
  2710. end
  2711. if bdsetlock = 1 and fixbodset >= chmbodset: bdsetlock = 0 & killvar 'fixbodset'
  2712. if bodsetcnt > chmbodset:
  2713. cyci1 = 0
  2714. cyci2 = chmbodset
  2715. :overwriter1
  2716. $bodimgsets[((cyci2 * 10) + cyci1)] = $bodimgsets[(((cyci2 + 1) * 10) + cyci1)]
  2717. cyci1 += 1
  2718. if cyci1 < 10: jump 'overwriter1'
  2719. imgset6ovr[cyci2] = imgset6ovr[(cyci2 + 1)]
  2720. imgset7ovr[cyci2] = imgset7ovr[(cyci2 + 1)]
  2721. cyci1 = 0
  2722. cyci2 += 1
  2723. if cyci2 < bodsetcnt: jump 'overwriter1'
  2724. killvar 'cyci1' & killvar 'cyci2'
  2725. elseif bodsetcnt < chmbodset:
  2726. 'You have encoutered error 2'
  2727. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
  2728. exit
  2729. end
  2730. cyci1 = 9
  2731. :poofer1
  2732. killvar 'bodimgsets', ((bodsetcnt * 10) + cyci1)
  2733. cyci1 -= 1
  2734. if cyci1 >= 0: jump 'poofer1'
  2735. killvar 'cyci1'
  2736. killvar 'imgset6ovr', bodsetcnt
  2737. killvar 'imgset7ovr', bodsetcnt
  2738. bodsetcnt -= 1
  2739. killvar 'klsetask'
  2740. dynamic $cheatmenu['bdimmain']
  2741. else
  2742. '<a href="exec:klsetask = 1 & dynamic $cheatmenu[''bdimcstdel'']">Remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</a>'
  2743. end
  2744. }
  2745. $cheatmenu['bdimcstadd'] = {
  2746. *clr & cla
  2747. '<center><b>Body Image Set Addition</b></center>'
  2748. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
  2749. *nl
  2750. 'This is where you can add a new image set to a game.'
  2751. 'To add an image set, create a folder in images/pc/body/shape/ and name it anything you want (shorter will be easier to remember). Then put in it any images you want named 1.jpg, 2.jpg, etc. up 5, 6, or 7. Just make sure it contains images 1 to 5. Once you have done that, click the link below and put in your folder name to add that set.'
  2752. 'Note: This will only be for this instance/save of the game and you will have to redo the click the link step if you want to add the same folder to a different instance/save.'
  2753. *nl
  2754. '<a href="exec:dynamic $cheatmenu[''bdimcstaddpro'']">Add Image Set</a>'
  2755. }
  2756. $cheatmenu['bdimcstaddpro'] = {
  2757. $tmpstrg = input("Enter folder name, do not include ''\''")
  2758. if $tmpstrg = '':
  2759. killvar '$tmpstrg'
  2760. dynamic $cheatmenu['bdimcstadd']
  2761. else
  2762. bodsetcnt += 1
  2763. cyci1 = 0
  2764. :addcyc
  2765. $bodimgsets[((bodsetcnt * 10) + cyci1)] = $bodimgsets[(10 + cyci1)]
  2766. cyci1 += 1
  2767. if cyci1 < 9: jump 'addcyc'
  2768. $bodimgsets[((bodsetcnt * 10) + 9)] = $tmpstrg
  2769. imgset6ovr[bodsetcnt] = 0
  2770. imgset7ovr[bodsetcnt] = 0
  2771. killvar '$tmpstrg'
  2772. killvar 'cyci1'
  2773. dynamic $cheatmenu['bdimmain']
  2774. end
  2775. }
  2776. $cheatmenu['bdimcstdesed'] = {
  2777. $tmpstrg = input("Enter a new descriptor")
  2778. if $tmpstrg = '':
  2779. killvar 'chmbddes'
  2780. killvar '$tmpstrg'
  2781. else
  2782. $bodimgsets[((chmbodset * 10) + chmbddes)] = $tmpstrg
  2783. killvar 'chmbddes'
  2784. killvar '$tmpstrg'
  2785. dynamic $cheatmenu['bdimdisplay']
  2786. end
  2787. }
  2788. $cheatmenu['succubreset'] = {
  2789. *clr & cla
  2790. 'Are you sure you want to reset your Succubus status? You will lose all levels, saved power, and succubus skill levels.'
  2791. *nl
  2792. '<a href="exec:dynamic $cheatmenu[''magic'']"><b>No, nevermind.</b></a>'
  2793. *nl
  2794. '<a href="exec:dynamic $cheatmenu[''sucresetdo'']"><b>Yes, remove & reset Succubus status</b></a>'
  2795. }
  2796. $cheatmenu['sucresetdo'] = {
  2797. !! Probably do not need to kill all of these, but better to unload them.
  2798. killvar 'scfwon'
  2799. killvar 'scpopt'
  2800. killvar '$sclocrt'
  2801. killvar '$scargrt'
  2802. killvar '$scsubloc'
  2803. killvar 'suceatinit'
  2804. killvar 'succubusflag'
  2805. killvar 'succubusQW'
  2806. killvar '$sucself1'
  2807. killvar 'succublvl'
  2808. killvar 'succubxp'
  2809. killvar 'sucxpsnapshot'
  2810. killvar 'succhungry'
  2811. killvar 'sucexcess'
  2812. killvar 'sexnutrition'
  2813. killvar 'suclezsex'
  2814. killvar 'sucabslez'
  2815. killvar 'sucabscum'
  2816. killvar '$sucabs1'
  2817. killvar '$sucabs2'
  2818. killvar '$sucabs3'
  2819. killvar 'succonfail'
  2820. killvar 'sucpowzeroed'
  2821. killvar 'suchuntday'
  2822. killvar 'sucpcinfo'
  2823. killvar 'karinsucsex'
  2824. killvar 'karinsucsexday'
  2825. killvar 'karinsucsexask'
  2826. killvar 'tatianasucsex'
  2827. killvar 'tatianasucsexday'
  2828. killvar 'tatianasucsexask'
  2829. killvar 'sucwalkday'
  2830. killvar '$sucgoloc'
  2831. killvar '$sucgometka'
  2832. killvar 'sucskill'
  2833. killvar 'sucstorecap'
  2834. killvar 'sucinfoday'
  2835. killvar 'sctrainprep'
  2836. !! This list will be updated as new variables are added
  2837. dynamic $cheatmenu['magic']
  2838. }
  2839. $cheatmenu['about'] = {
  2840. *clr & cla
  2841. gs 'obj_din', 'settingtabs'
  2842. gs 'stat'
  2843. gs 'saveg'
  2844. gs 'addbuilddate'
  2845. '<center><h1>About Window</h1></center>'
  2846. '<center><table cellspacing="0" cellpadding="20" valign="top">'
  2847. '<tr><td><h3><center>Girl Life version <<version_major>>.<<version_minor>>.<<version_revision>>.<<version_patch>></center></h3></td></tr>'
  2848. '<tr><td><h3><center>built on <<$builddate>></center></h3></td></tr>'
  2849. '<tr><td><h5><center>if loaded so it was the save from</center></h5></td></tr>'
  2850. '<tr><td cellspacing="0" cellpadding="20" valign="top"><center><<$version>></center></td></tr>'
  2851. '</table></center>'
  2852. killvar '$tmp'
  2853. }
  2854. --- Cheatmenu_din ---------------------------------