Cheatmenu_din.qsrc 239 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873
  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['pee'] = {
  128. if cheatPee = 0:
  129. cheatPee = 1
  130. dynamic $cheatmenu['permanent']
  131. exit
  132. elseif cheatPee = 1:
  133. cheatPee = 0
  134. dynamic $cheatmenu['permanent']
  135. end
  136. }
  137. $cheatmenu['fight'] = {
  138. if fight_cheat = 0:
  139. fight_cheat = 1
  140. dynamic $cheatmenu['permanent']
  141. exit
  142. elseif fight_cheat = 1:
  143. fight_cheat = 0
  144. dynamic $cheatmenu['permanent']
  145. end
  146. }
  147. $cheatmenu['autocombat'] = {
  148. if autocombat_cheat = 0:
  149. autocombat_cheat = 1
  150. dynamic $cheatmenu['permanent']
  151. exit
  152. elseif autocombat_cheat = 1:
  153. autocombat_cheat = 0
  154. dynamic $cheatmenu['permanent']
  155. end
  156. }
  157. $cheatmenu['age'] = {
  158. :tooyoung
  159. age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
  160. if ((month * 100) + day) <= pcs_dob mod 10000: age -= 1
  161. if age < 15: pcs_dob -= 10000 & jump 'tooyoung'
  162. dynamic $cheatmenu['looks']
  163. }
  164. $cheatmenu['visualage'] = {
  165. vidage = input("For how many years you want to look?")
  166. if vidage <= 14: vidage = 14
  167. dynamic $cheatmenu['looks']
  168. }
  169. $cheatmenu['money'] = {
  170. money = input("How much money do you want to have?")
  171. if money < 0:money = 0
  172. dynamic $cheatmenu['state']
  173. }
  174. $cheatmenu['bank_money'] = {
  175. karta = input ("How much money do you want to have in the bank?")
  176. if karta < 0: karta = 0
  177. dynamic $cheatmenu['state']
  178. }
  179. $cheatmenu['bodyMod'] = {
  180. *clr & cla
  181. act 'Return to last menu': dynamic $cheatmenu['state']
  182. '<center><h1>Cheat Menu - Body Modification</h1></center>'
  183. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  184. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  185. '<center><b><font color="red">WARNING!</font></b></center>'
  186. 'Changing body shape does not resize clothes.'
  187. 'May cause adverse interactions, use at your own risk!'
  188. ''
  189. 'You are currently <<$bodyVars[''desc'']>>.'
  190. ''
  191. 'You may select from the following sizes:'
  192. ''
  193. if bodset ! 3:
  194. 'starving (No, you may not select ''starving'', it''s here to show where the scale starts)'
  195. ''
  196. if salocatnow ! 1:
  197. '<a href="exec: pcs_mass[''body''] = 20 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
  198. ''
  199. end
  200. if salocatnow ! 2:
  201. '<a href="exec: pcs_mass[''body''] = 40 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
  202. ''
  203. end
  204. if salocatnow ! 3:
  205. '<a href="exec: pcs_mass[''body''] = 60 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
  206. ''
  207. end
  208. if salocatnow ! 4:
  209. '<a href="exec: pcs_mass[''body''] = 80 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
  210. ''
  211. end
  212. if salocatnow ! 5:
  213. '<a href="exec: pcs_mass[''body''] = 100 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
  214. ''
  215. end
  216. if salocatnow ! 6:
  217. '<a href="exec: pcs_mass[''body''] = 120 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
  218. ''
  219. end
  220. if salocatnow ! 7:
  221. '<a href="exec: pcs_mass[''body''] = 140 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
  222. ''
  223. end
  224. else
  225. if (pregchem < 2688) = 0:
  226. '<a href="exec:pregchem = 100 & pregtime = 4 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10))]>></a>'
  227. ''
  228. end
  229. if (pregchem >= 2688 and pregchem < 3192) = 0:
  230. '<a href="exec:pregchem = 2688 & pregtime = 112 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
  231. ''
  232. end
  233. if (pregchem >= 3192 and pregchem < 3696) = 0:
  234. '<a href="exec:pregchem = 3192 & pregtime = 133 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
  235. ''
  236. end
  237. if (pregchem >= 3696 and pregchem < 4200) = 0:
  238. '<a href="exec:pregchem = 3696 & pregtime = 154 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
  239. ''
  240. end
  241. if (pregchem >= 4200 and pregchem < 4704) = 0:
  242. '<a href="exec:pregchem = 4200 & pregtime = 175 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
  243. ''
  244. end
  245. if (pregchem >= 4704 and pregchem < 5208) = 0:
  246. '<a href="exec:pregchem = 4704 & pregtime = 196 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
  247. ''
  248. end
  249. if (pregchem >= 5208 and pregchem < 5712) = 0:
  250. '<a href="exec:pregchem = 5208 & pregtime = 217 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
  251. ''
  252. end
  253. if (pregchem >= 5712 and pregchem < 6216) = 0:
  254. '<a href="exec:pregchem = 5712 & pregtime = 238 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
  255. ''
  256. end
  257. if (pregchem >= 6216) = 0:
  258. '<a href="exec:pregchem = 6216 & pregtime = 259 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 8)]>></a>'
  259. ''
  260. end
  261. end
  262. '</tr></table></b></center>'
  263. }
  264. $cheatmenu['addict'] = {
  265. if NarkImmune = 0:
  266. NarkImmune = 1
  267. smoker = 0
  268. smokerNeed = 0
  269. joint_count = 0
  270. alcohol_count = 0
  271. cocaine_count = 0
  272. amphetamine_count = 0
  273. SNarkTimes = 0
  274. dynamic $cheatmenu['permanent']
  275. exit
  276. elseif NarkImmune = 1:
  277. NarkImmune = 0
  278. dynamic $cheatmenu['permanent']
  279. end
  280. }
  281. $cheatmenu['willpower2'] = {
  282. if InfWillpwer = 0:
  283. InfWillpwer = 1
  284. dynamic $cheatmenu['permanent']
  285. exit
  286. elseif InfWillpwer = 1:
  287. InfWillpwer = 0
  288. dynamic $cheatmenu['permanent']
  289. end
  290. }
  291. $cheatmenu['cheatHorny'] = {
  292. if cheatHorny = 0:
  293. cheatHorny = 1
  294. dynamic $cheatmenu['permanent']
  295. exit
  296. elseif cheatHorny = 1:
  297. cheatHorny = 0
  298. dynamic $cheatmenu['permanent']
  299. end
  300. }
  301. $cheatmenu['slutshot'] = {
  302. if cheatSlut = 0:
  303. cheatSlut = 1
  304. cycle = 6
  305. dynamic $cheatmenu['permanent']
  306. exit
  307. elseif cheatSlut = 1:
  308. cheatSlut = 0
  309. cycle = 0
  310. dynamic $cheatmenu['permanent']
  311. end
  312. }
  313. $cheatmenu['cheat_NoPregnancy'] = {
  314. if cheat_NoPregnancy = 1:
  315. killvar 'cheat_NoPregnancy'
  316. dynamic $cheatmenu['permanent']
  317. else
  318. cheat_NoPregnancy = 1
  319. dynamic $cheatmenu['permanent']
  320. end
  321. }
  322. $cheatmenu['cheat_NoLactation'] = {
  323. if cheat_NoLactation = 1:
  324. killvar 'cheat_NoLactation'
  325. dynamic $cheatmenu['permanent']
  326. else
  327. cheat_Nolactation = 1
  328. dynamic $cheatmenu['permanent']
  329. end
  330. }
  331. $cheatmenu['Vibrator'] = {
  332. if sleepVars['cheatVib'] = 0:
  333. sleepVars['cheatVib'] = 1
  334. sleepVars['bedVibrator'] = 1
  335. dynamic $cheatmenu['permanent']
  336. elseif sleepVars['cheatVib'] = 1:
  337. sleepVars['cheatVib'] = 0
  338. sleepVars['bedVibrator'] = 0
  339. dynamic $cheatmenu['permanent']
  340. end
  341. }
  342. $cheatmenu['BimboCloth'] = {
  343. if cheatBimbo = 0:
  344. cheatBimbo = 1
  345. dynamic $cheatmenu['permanent']
  346. bimbo = 0
  347. bimbolevel = 0
  348. bimbowithdrawal = 0
  349. elseif cheatBimbo = 1:
  350. cheatBimbo = 0
  351. dynamic $cheatmenu['permanent']
  352. end
  353. }
  354. $cheatmenu['SmartBimbo'] = {
  355. if cheatBimbo2 = 0:
  356. cheatBimbo2 = 1
  357. dynamic $cheatmenu['permanent']
  358. bimbostupidity = 0
  359. elseif cheatBimbo2 = 1:
  360. cheatBimbo2 = 0
  361. dynamic $cheatmenu['permanent']
  362. end
  363. }
  364. $cheatmenu['SuccuBimbo'] = {
  365. if cheatBimbo3 = 0:
  366. cheatBimbo3 = 1
  367. dynamic $cheatmenu['permanent']
  368. bimbostupidity = 0
  369. elseif cheatBimbo3 = 1:
  370. cheatBimbo3 = 0
  371. dynamic $cheatmenu['permanent']
  372. end
  373. }
  374. $cheatmenu['exhib_block'] = {
  375. if exhib_cheat = 0:
  376. exhib_cheat = 1
  377. dynamic $cheatmenu['permanent']
  378. pcs_exhib = 0
  379. Exhibitionist_lvl = 0
  380. elseif exhib_cheat = 1:
  381. exhib_cheat = 0
  382. dynamic $cheatmenu['permanent']
  383. end
  384. }
  385. $cheatmenu['addictive_block'] = {
  386. if addictive_cheat = 0:
  387. addictive_cheat = 1
  388. smoke_exp = 0
  389. joint_exp = 0
  390. heroin_exp = 0
  391. cocaine_exp = 0
  392. amphetamine_exp = 0
  393. alcohol_exp = 0
  394. addictive_exp = 0
  395. addictive_trait_lvl = 0
  396. dynamic $cheatmenu['permanent']
  397. elseif addictive_cheat = 1:
  398. addictive_cheat = 0
  399. dynamic $cheatmenu['permanent']
  400. end
  401. }
  402. $cheatmenu['cumtrait_block'] = {
  403. if cumeater_cheat = 0:
  404. cumeater_cheat = 1
  405. dynamic $cheatmenu['permanent']
  406. pcs_traits['cumeater'] = 0
  407. elseif cumeater_cheat = 1:
  408. cumeater_cheat = 0
  409. dynamic $cheatmenu['permanent']
  410. end
  411. }
  412. $cheatmenu['consolecheat'] = {
  413. if cheatConsole = 0:
  414. cheatConsole = 1
  415. dynamic $cheatmenu['permanent']
  416. exit
  417. elseif cheatConsole = 1:
  418. cheatConsole = 0
  419. dynamic $cheatmenu['permanent']
  420. end
  421. }
  422. $cheatmenu['timecheat'] = {
  423. if cheatTime = 0:
  424. cheatTime = 1
  425. dynamic $cheatmenu['permanent']
  426. exit
  427. elseif cheatTime = 1:
  428. cheatTime = 0
  429. dynamic $cheatmenu['permanent']
  430. end
  431. }
  432. $cheatmenu['random_bf_gf'] = {
  433. if random_bf_gf_cheat = 0:
  434. random_bf_gf_cheat = 1
  435. dynamic $cheatmenu['permanent']
  436. exit
  437. elseif random_bf_gf_cheat = 1:
  438. random_bf_gf_cheat = 0
  439. dynamic $cheatmenu['permanent']
  440. end
  441. }
  442. $cheatmenu['street_robbers'] = {
  443. if cheat_street_robbers = 0:
  444. cheat_street_robbers = 1
  445. dynamic $cheatmenu['permanent']
  446. elseif cheat_street_robbers = 1:
  447. cheat_street_robbers = 0
  448. dynamic $cheatmenu['permanent']
  449. end
  450. }
  451. $cheatmenu['street_rapists'] = {
  452. if cheat_street_rapists = 0:
  453. cheat_street_rapists = 1
  454. dynamic $cheatmenu['permanent']
  455. elseif cheat_street_rapists = 1:
  456. cheat_street_rapists = 0
  457. dynamic $cheatmenu['permanent']
  458. end
  459. }
  460. $cheatmenu['shaveLegs'] = {
  461. if cheatShaveLegs = 0:
  462. cheatShaveLegs = 1
  463. dynamic $cheatmenu['permanent']
  464. exit
  465. elseif cheatShaveLegs = 1:
  466. cheatShaveLegs = 0
  467. dynamic $cheatmenu['permanent']
  468. end
  469. }
  470. $cheatmenu['permanent'] = {
  471. gs'stat'
  472. *clr & cla
  473. gs 'obj_din', 'cheattabs'
  474. if cheatWork = 0: $cheatWork = 'Currently OFF'
  475. if cheatWork = 1: $cheatWork = 'Currently ON'
  476. if cheatWillpower = 0: $cheatWillpower = 'Currently OFF'
  477. if cheatWillpower = 1: $cheatWillpower = 'Currently ON'
  478. if cheatHapri = 0: $cheatHapri = 'Currently OFF'
  479. if cheatHapri = 1: $cheatHapri = 'Currently ON'
  480. if cheatKlisma = 1: $cheatKlisma = 'Currently OFF'
  481. if cheatKlisma = 0: $cheatKlisma = 'Currently ON'
  482. if cheatNomakeup = 0: $cheatNomakeup = 'Currently OFF'
  483. if cheatNomakeup = 1: $cheatNomakeup = 'Currently ON'
  484. if cheatNoSweat = 0: $cheatNoSweat = 'Currently OFF'
  485. if cheatNoSweat = 1: $cheatNoSweat = 'Currently ON'
  486. if cheatNoEat = 0: $cheatNoEat = 'Currently OFF'
  487. if cheatNoEat = 1: $cheatNoEat = 'Currently ON'
  488. if cheatNoDrink = 0: $cheatNoDrink = 'Currently OFF'
  489. if cheatNoDrink = 1: $cheatNoDrink = 'Currently ON'
  490. if cheatNoSleep = 0: $cheatNoSleep = 'Currently OFF'
  491. if cheatNoSleep = 1: $cheatNoSleep = 'Currently ON'
  492. if cheatNoMood = 0: $cheatNoMood = 'Currently OFF'
  493. if cheatNoMood = 1: $cheatNoMood = 'Currently ON'
  494. if cheatNoFat = 0: $cheatNoFat = 'Currently OFF'
  495. if cheatNoFat = 1: $cheatNoFat = 'Currently ON'
  496. if cheatHealth = 0: $cheatHealth = 'Enabled'
  497. if cheatHealth = 1: $cheatHealth = 'Disabled'
  498. if cheatPee = 0: $cheatPee = 'Enabled'
  499. if cheatPee = 1: $cheatPee = 'Disabled'
  500. if NarkImmune = 0: $NarkImmune = 'Currently OFF'
  501. if NarkImmune = 1: $NarkImmune = 'Currently ON'
  502. if InfWillpwer = 0: $InfWillpwer = 'Currently OFF'
  503. if InfWillpwer = 1: $InfWillpwer = 'Currently ON'
  504. if cheatSlut = 0: $cheatSlut = 'Enabled'
  505. if cheatSlut = 1: $cheatSlut = 'Disabled'
  506. if cheatHorny = 0: $cheatHorny = 'Currently OFF'
  507. if cheatHorny = 1: $cheatHorny = 'Currently ON'
  508. if sleepVars['bedVibrator'] = 0: $sleepVars['cheatVib'] = 'Currently OFF'
  509. if sleepVars['bedVibrator'] = 1: $sleepVars['cheatVib'] = 'Currently ON'
  510. if fight_cheat = 0: $fight_cheat = 'Currently OFF'
  511. if fight_cheat = 1: $fight_cheat = 'Currently ON'
  512. if autocombat_cheat = 0: $autocombat_cheat = 'Currently OFF'
  513. if autocombat_cheat = 1: $autocombat_cheat = 'Currently ON'
  514. if cheat_NoPregnancy = 0: $cheat_NoPregnancy = 'Enabled'
  515. if cheat_NoPregnancy = 1: $cheat_NoPregnancy = 'Disabled'
  516. if cheat_NoLactation = 0: $cheat_NoLactation = 'Enabled'
  517. if cheat_NoLactation = 1: $cheat_NoLactation = 'Disabled'
  518. if cheatBimbo = 0: $cheatBimbo = 'Enabled'
  519. if cheatBimbo = 1: $cheatBimbo = 'Disabled'
  520. if cheatBimbo2 = 0: $cheatBimbo2 = 'Disabled'
  521. if cheatBimbo2 = 1: $cheatBimbo2 = 'Enabled'
  522. if cheatBimbo3 = 0: $cheatBimbo3 = 'Disabled'
  523. if cheatBimbo3 = 1: $cheatBimbo3 = 'Enabled'
  524. if cumeater_cheat = 0: $cheatcumtrait = 'Enabled'
  525. if cumeater_cheat = 1: $cheatcumtrait = 'Disabled'
  526. if exhib_cheat = 0: $cheatexhib = 'Enabled'
  527. if exhib_cheat = 1: $cheatexhib = 'Disabled'
  528. if addictive_cheat = 0: $cheataddictive = 'Enabled'
  529. if addictive_cheat = 1: $cheataddictive = 'Disabled'
  530. if cheatConsole = 0: $cheatConsole = 'Visible'
  531. if cheatConsole = 1: $cheatConsole = 'Hidden'
  532. if cheatTime = 0: $cheatTime = 'Disabled'
  533. if cheatTime = 1: $cheatTime = 'Enabled'
  534. if random_bf_gf_cheat = 0: $random_bf_gf_cheat = 'Enabled'
  535. if random_bf_gf_cheat = 1: $random_bf_gf_cheat = 'Disabled'
  536. if cheat_street_robbers = 0: $cheat_street_robbers = 'Enabled'
  537. if cheat_street_robbers = 1: $cheat_street_robbers = 'Disabled'
  538. if cheat_street_rapists = 0: $cheat_street_rapists = 'Enabled'
  539. if cheat_street_rapists = 1: $cheat_street_rapists = 'Disabled'
  540. if cheatShaveLegs = 0: $cheatShaveLegs = 'Currently OFF'
  541. if cheatShaveLegs = 1: $cheatShaveLegs = 'Currently ON'
  542. '<center><h1>Cheat Menu - Recurrent Cheats</h1></center>'
  543. '<center><font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!</center>'
  544. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  545. '<td width="450" cellspacing="0" cellpadding="20" valign="top">'
  546. 'More than one job is possible: <a href="exec:dynamic $cheatmenu[''work'']"><<$cheatWork>></a>'
  547. 'Willpower cost always zero: <a href="exec:dynamic $cheatmenu[''willpower'']"><<$cheatWillpower>></a>'
  548. 'Infinite willpower: <a href="exec:dynamic $cheatmenu[''willpower2'']"><<$InfWillpwer>></a>'
  549. 'Always combed: <a href="exec:dynamic $cheatmenu[''hair'']"><<$cheatHapri>></a>'
  550. 'Cosmetics never smeared: <a href="exec:dynamic $cheatmenu[''nomakeup'']"><<$cheatNomakeup>></a>'
  551. 'Never sweat: <a href="exec:dynamic $cheatmenu[''nosweat'']"><<$cheatNoSweat>></a>'
  552. 'Never eat: <a href="exec:dynamic $cheatmenu[''noEat'']"><<$cheatNoEat>></a>'
  553. 'Never drink: <a href="exec:dynamic $cheatmenu[''noDrink'']"><<$cheatNoDrink>></a>'
  554. 'Never sleep: <a href="exec:dynamic $cheatmenu[''noSleep'']"><<$cheatNoSleep>></a>'
  555. 'Never unhappy: <a href="exec:dynamic $cheatmenu[''noMood'']"><<$cheatNoMood>></a>'
  556. 'Never lose or gain weight: <a href="exec:dynamic $cheatmenu[''noFat'']"><<$cheatNoFat>></a>'
  557. 'Never get addicted: <a href="exec:dynamic $cheatmenu[''addict'']"><<$NarkImmune>></a>'
  558. 'Never shave legs: <a href="exec:dynamic $cheatmenu[''shaveLegs'']"><<$cheatShaveLegs>></a>'
  559. if Enable_sforma = 1:
  560. 'Allow any clothing for school: <a href="exec:Enable_sforma = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
  561. else
  562. 'Allow any clothing for school: <a href="exec:Enable_sforma = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
  563. end
  564. *nl
  565. 'Random boyfriend/girlfriend events: <a href="exec:dynamic $cheatmenu[''random_bf_gf'']"><<$random_bf_gf_cheat>></a>'
  566. 'Random robbers in the streets: <a href="exec:dynamic $cheatmenu[''street_robbers'']"><<$cheat_street_robbers>></a>'
  567. 'Random rapists in the streets: <a href="exec:dynamic $cheatmenu[''street_rapists'']"><<$cheat_street_rapists>></a>'
  568. *nl
  569. 'Enable sleeping with vibrator inserted: <a href="exec:dynamic $cheatmenu[''Vibrator'']"><<$sleepVars[''cheatVib'']>></a>'
  570. *nl
  571. 'Automatically win every fight: <a href="exec:dynamic $cheatmenu[''fight'']"><<$fight_cheat>></a>'
  572. 'Automatically resolve non-magical fights: <a href="exec:dynamic $cheatmenu[''autocombat'']"><<$autocombat_cheat>></a>'
  573. *nl
  574. 'Bimbo trait and the effects of wearing bimbo clothes: <a href="exec:dynamic $cheatmenu[''BimboCloth'']"><<$cheatBimbo>></a>'
  575. 'Exhibitionist trait: <a href="exec:dynamic $cheatmenu[''exhib_block'']"><<$cheatexhib>></a>'
  576. 'Addictive personality trait: <a href="exec:dynamic $cheatmenu[''addictive_block'']"><<$cheataddictive>></a>'
  577. 'Cumeater trait: <a href="exec:dynamic $cheatmenu[''cumtrait_block'']"><<$cheatcumtrait>></a>'
  578. *nl
  579. 'Who says bimbos can''t be smart? Smart bimbo mode: <a href="exec:dynamic $cheatmenu[''SmartBimbo'']"><<$cheatBimbo2>></a>'
  580. 'Succubus bimbo mode: <a href="exec:dynamic $cheatmenu[''SuccuBimbo'']"><<$cheatBimbo3>></a>'
  581. *nl
  582. 'Set arousal to always be at 50 or more: <a href="exec:dynamic $cheatmenu[''cheatHorny'']"><<$cheatHorny>></a>'
  583. 'Periods (and pregnancies): <a href="exec:dynamic $cheatmenu[''slutshot'']"><<$cheatSlut>></a>'
  584. 'Impregnation: <a href="exec:dynamic $cheatmenu[''cheat_NoPregnancy'']"><<$cheat_nopregnancy>></a>'
  585. 'Lactation: <a href="exec:dynamic $cheatmenu[''cheat_NoLactation'']"><<$cheat_nolactation>></a>'
  586. 'STDs: <a href="exec:dynamic $cheatmenu[''health'']"><<$cheatHealth>></a>'
  587. 'Peeing: <a href="exec:dynamic $cheatmenu[''pee'']"><<$cheatPee>></a>'
  588. *nl
  589. if Enable_auto_tampons = 1:
  590. 'Automatic cheat on Tampon: <a href="exec:Enable_auto_tampons = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
  591. else
  592. 'Automatic cheat on Tampon: <a href="exec:Enable_auto_tampons = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
  593. end
  594. *nl
  595. if sleepVars['cheat_nodream_chance'] > 0:
  596. 'No dream chance: <a href="exec:sleepVars[''cheat_nodream_chance'']=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']"><<sleepVars[''cheat_nodream_chance'']>>%</a>, <a href="exec:sleepVars[''cheat_nodream_chance'']=0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
  597. else
  598. 'No dream chance: <a href="exec:sleepVars[''cheat_nodream_chance'']=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
  599. end & !1.2.3 new function
  600. *nl
  601. 'Hide Console input in objects window: <a href="exec:dynamic $cheatmenu[''consolecheat'']"><<$cheatConsole>></a>'
  602. 'Time Cheat in Objects window: <a href="exec:dynamic $cheatmenu[''timecheat'']"><<$cheatTime>></a>'
  603. *nl
  604. '<font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!'
  605. '</tr></table></b></center>'
  606. }
  607. $cheatmenu['therapist_reset'] = {
  608. gs 'therapist'
  609. dynamic $RestTherapyVariables
  610. gs 'stat'
  611. dynamic $cheatmenu['state']
  612. }
  613. $cheatmenu['state'] = {
  614. gs'stat'
  615. *clr & cla
  616. gs 'obj_din', 'cheattabs'
  617. '<center><h1>Cheat Menu - Character State Changes</h1></center>'
  618. '<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'
  619. 'especially dangerous unless you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
  620. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  621. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  622. 'Set alcohol levels:'
  623. '<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>'
  624. *nl
  625. '<a href="exec:pcs_horny = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Max arousal</a>'
  626. '<a href="exec:pcs_horny = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Min arousal</a>'
  627. '<a href="exec:dynamic $cheatmenu[''bodyMod'']">Body Modification</a>'
  628. *nl
  629. '<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>'
  630. '<a href="exec:pcs_sleep = 100 & pcs_stam = stammax & pcs_mood = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Sleep, Stamina, Mood.</a>'
  631. '<a href="exec:pcs_energy = 200 & pcs_hydra = 200 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Hunger and Water.</a>'
  632. '<a href="exec:dynamic $cheatmenu[''money''] & gs ''stat''">Change money</a>'
  633. '<a href="exec:money = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Zero money</a>'
  634. if bankAccount = 1:
  635. '<a href="exec:dynamic $cheatmenu[''bank_money''] & gs ''stat''">Change money in the bank</a>'
  636. '<a href="exec: karta = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Zero money in the bank</a>'
  637. else
  638. '<b>You need to open a bank account before getting access to change money in the bank</b>'
  639. end
  640. '<a href="exec:dynamic $cheatmenu[''std_cure''] & gs ''stat''">Cure all stds</a>'
  641. '<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>'
  642. *nl
  643. '<a href="exec:dynamic $cheatmenu[''force_preg''] & gs ''stat''">Force random pregnancy</a>'
  644. '<a href="exec:dynamic $cheatmenu[''remove_preg''] & gs ''stat''">Remove pregnancy</a>'
  645. '<a href="exec:gs''cum_cleanup'',''reset'' & dynamic $cheatmenu[''state''] & gs ''stat''">Remove all cum</a>'
  646. '<a href="exec:dynamic $cheatmenu[''cycle''] & gs ''stat''">Set stage of menstrual cycle</a>'
  647. if lactation['active'] <= 0:
  648. 'You are not lactating'
  649. 'Your current prolactinlvl is <<lactation[''prolactinlvl'']>>ng/ml.'
  650. '<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch ON</a>'
  651. else
  652. 'You are lactating'
  653. '<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch OFF</a>'
  654. if lactation['milkprod_type'] = 1:
  655. '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.'
  656. elseif lactation['milkprod_type'] = 0:
  657. '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.'
  658. else
  659. lactation['milkprod_type'] = 1
  660. end
  661. if lactation['lactaterate'] <= 0:
  662. 'Lactate Rate: <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
  663. elseif lactation['lactaterate'] >= 600000:
  664. 'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h'
  665. else
  666. '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>'
  667. 'Cap Lactate Rate: ' + _
  668. iif(lactation['milkprod_type'] = 0 and lactation['caplactaterate'] > 0,'<a href="exec:lactation[''caplactaterate''] -= 2 & dynamic $cheatmenu[''state'']">-2h</a> ','') + _
  669. iif(lactation['milkprod_type'] = 1 and lactation['caplactaterate'] > 4,'<a href="exec:lactation[''caplactaterate''] -= 2 & dynamic $cheatmenu[''state'']">-2h</a> ','') + _
  670. iif(lactation['caplactaterate'] > 0,'<<lactation[''caplactaterate'']>>h ','OFF ') + _
  671. iif(lactation['caplactaterate'] < 72,'<a href="exec:lactation[''caplactaterate''] += 2 & dynamic $cheatmenu[''state'']">+2h</a>','')
  672. '<font color="grey">Cap lactate rate makes lactate rate stop growing if <<$pcs_firstname>> needs milking more often.</font>'
  673. end
  674. 'Milk in Breasts: <<lactation[''breastmv'']/1000>>ml'
  675. 'Max Milk Storage: <<lactation[''breastmm'']/1000>>ml'
  676. '<font color="grey">Maximum milk storage changes with breast size, and if <<$pcs_firstname>> went through pregnancy</font>'
  677. if lactation['induced'] <= 0:
  678. 'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 1 & dynamic $cheatmenu[''state'']">no</a>'
  679. else
  680. 'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 0 & dynamic $cheatmenu[''state'']">yes</a>'
  681. end
  682. '<font color="grey">Does <<$pcs_firstname>> know she induced lactation herself, or not? (This is only used for some events.)</font>'
  683. end
  684. *nl
  685. '<a href="exec:dynamic $cheatmenu[''therapist_reset'']">Reset therapist states</a>'
  686. '</tr></table></b></center>'
  687. }
  688. $cheatmenu['avatar_hair_set'] = {
  689. $av_hair = input("Input your custom hair:")
  690. if $av_hair='':exit
  691. avatar_hair = 1
  692. dynamic $cheatmenu['looks']
  693. }
  694. $cheatmenu['rename'] = {
  695. !! player name is set in preSYS.qsrc
  696. $temp_firstname = '<<$pcs_firstname>>'
  697. $pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
  698. if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
  699. killvar '$temp_firstname'
  700. $temp_lastname = '<<$pcs_lastname>>'
  701. $pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
  702. if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
  703. killvar '$temp_lastname'
  704. $temp_nickname = '<<$pcs_nickname>>'
  705. $pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
  706. if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
  707. killvar '$temp_nickname'
  708. }
  709. $cheatmenu['setLooks'] = {
  710. gs 'shortgs', 'setStat', $ARGS[0], ARGS[1]
  711. dynamic $cheatmenu['looks']
  712. }
  713. $cheatmenu['setLooksInput'] = {
  714. $temp_input = $input("Set your <<$ARGS[1]>> level:")
  715. if isnum($temp_input) ! 0:
  716. gs 'shortgs', 'setStat', $ARGS[0], val($temp_input)
  717. elseif $temp_input ! '':
  718. msg 'invalid input'
  719. end
  720. killvar '$temp_input'
  721. dynamic $cheatmenu['looks']
  722. }
  723. $cheatmenu['printLooksLinks'] = {
  724. *p '<a href="exec:dynamic $cheatmenu[''setLooks''], ''<<$ARGS[0]>>'', 100">Max</a> '
  725. *p '<a href="exec:dynamic $cheatmenu[''setLooks''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl + 1">+1</a> '
  726. *p '<a href="exec:dynamic $cheatmenu[''setLooks''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl + 10">+10</a> '
  727. *p '<a href="exec:dynamic $cheatmenu[''setLooks''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl - 1">-1</a> '
  728. *p '<a href="exec:dynamic $cheatmenu[''setLooks''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl - 10">-10</a> '
  729. *p '<a href="exec:dynamic $cheatmenu[''setLooks''], ''<<$ARGS[0]>>'', 0">Min</a> '
  730. *pl '<a href="exec:dynamic $cheatmenu[''setLooksInput''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''">Set</a>'
  731. }
  732. $cheatmenu['looks'] = {
  733. *clr & cla
  734. if pcs_hgt < 100:
  735. pcs_hgt = 100
  736. elseif pcs_hgt > 200:
  737. pcs_hgt = 200
  738. end
  739. gs 'obj_din', 'cheattabs'
  740. gs'stat'
  741. '<center><h1>Cheat Menu - Character Appearance</h1></center>'
  742. '<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>'
  743. *nl
  744. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  745. '<tr><td width="33%" cellpadding="20" valign="top">'
  746. '<<$pcs_firstname>> <<$pcs_lastname>> (<<$pcs_nickname>>). <a href="exec:dynamic $cheatmenu[''rename'']">Rename</a>'
  747. if player_avatar = 1:
  748. 'Custom Avatar: <a href="exec:player_avatar = 0 & dynamic $cheatmenu[''looks'']">ON</a>'
  749. else
  750. 'Custom Avatar: <a href="exec:player_avatar = 1 & dynamic $cheatmenu[''looks'']">OFF</a>'
  751. end
  752. if avatar_hair = 1:
  753. '<a href="exec:avatar_hair = 0 & dynamic $cheatmenu[''looks'']">Custom Hair: ON</a>'
  754. '<<$av_hair>>'
  755. else
  756. '<a href="exec:dynamic $cheatmenu[''avatar_hair_set'']">Custom Hair: OFF</a>'
  757. end
  758. *nl
  759. '<a href="exec:dynamic $cheatmenu[''parameters'']">Show design parameters of body</a>'
  760. '<a href="exec:dynamic $cheatmenu[''vneshpara'']">Show beauty parameters</a>'
  761. *nl
  762. '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'
  763. *nl
  764. 'You look <<vidage>> years old'
  765. '<a href="exec:dynamic $cheatmenu[''visualage'']">Change apparent age</a>'
  766. *nl
  767. 'You are <<pcs_hgt>> centimetres tall'
  768. '<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>'
  769. *nl
  770. *p 'Musculature (<<stren_plus_lvl>>): ' & dynamic $cheatmenu['printLooksLinks'], 'stren_plus', 'Musculature'
  771. *pl '<font color="grey">Allows strength to go past 100'
  772. *pl'<font color="red">Negatively</font> affects appearance</font>'
  773. *nl
  774. *p 'Toned Butt (<<butt_tr_lvl>>): ' & dynamic $cheatmenu['printLooksLinks'], 'butt_tr', 'Toned Butt'
  775. *nl
  776. 'You have <<$titsize>> breasts'
  777. if tits => 0 and tits < 11:'<a href="exec: bodyVars[''bust_silicone''] += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(silicone)</a>'
  778. if bodyVars['bust_silicone'] => 1:'<a href="exec: bodyVars[''bust_silicone''] -= 5 & dynamic $cheatmenu[''looks'']">Shrink breasts(silicone)</a>'
  779. if tits => 0 and tits < 11:'<a href="exec: pcs_mass[''bust''] += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(natural)</a>'
  780. if pcs_mass['bust'] => 1: '<a href="exec: pcs_mass[''bust''] -= 5 & titreduc = 1 & dynamic $cheatmenu[''looks'']">Shrink breasts(natural)</a>'
  781. *nl
  782. if pcs_butt <= 4:
  783. $pcs_butt[1] = 'flat'
  784. elseif pcs_butt <= 8:
  785. $pcs_butt[1] = 'average'
  786. elseif pcs_butt <= 12:
  787. $pcs_butt[1] = 'pert'
  788. else
  789. $pcs_butt[1] = 'bubble'
  790. end
  791. 'You have <<$pcs_butt[1]>> butt'
  792. if pcs_butt < 20:'<a href="exec: bodyVars[''butt_cheat''] += 2 & dynamic $cheatmenu[''looks'']">Enlarge butt</a>'
  793. if pcs_butt > 1:'<a href="exec: bodyVars[''butt_cheat''] -= 2 & dynamic $cheatmenu[''looks'']">Shrink butt</a>'
  794. if bodyVars['butt_cheat'] ! 0:'<a href="exec: bodyVars[''butt_cheat''] = 0 & dynamic $cheatmenu[''looks'']">Reset butt shape to default</a>'
  795. if bodyVars['butt_silicone'] => 1:'<a href="exec: bodyVars[''butt_silicone''] = 0 & dynamic $cheatmenu[''looks'']">Remove butt implants</a>'
  796. if bodyVars['butt_silicone'] = 0:'<a href="exec: bodyVars[''butt_silicone''] += 16 & dynamic $cheatmenu[''looks'']">Add butt implants</a>'
  797. *nl
  798. '<<$lip>>'
  799. if pcs_lip < 4:'<a href="exec:pcs_lip += 1 & dynamic $cheatmenu[''looks'']">Enlarge lips</a>'
  800. if pcs_lip > 0:'<a href="exec:pcs_lip -= 1 & dynamic $cheatmenu[''looks'']">Shrink lips</a>'
  801. *nl
  802. '<<$skin>>'
  803. if pcs_skin < 900: '<a href="exec:pcs_skin += 200 & gs ''AppearanceSystem'', ''UpdateBaseAppearance'' & dynamic $cheatmenu[''looks'']">Improve skin</a>'
  804. if pcs_skin > 0: '<a href="exec:pcs_skin -= 200 & gs ''AppearanceSystem'', ''UpdateBaseAppearance'' & dynamic $cheatmenu[''looks'']">Worsen skin</a>'
  805. if pcs_tan >= 0:'<a href="exec:pcs_tan += 10 & dynamic $cheatmenu[''looks'']">Become tanned</a>'
  806. if pcs_tan > 0:'<a href="exec:pcs_tan = 0 & dynamic $cheatmenu[''looks'']">Remove tan</a>'
  807. *nl
  808. '<<$pcs_throat>>'
  809. if pcs_throat <= 31:'<a href="exec:pcs_throat += 5 & dynamic $cheatmenu[''looks'']">Increase throat capacity</a>'
  810. if pcs_throat >= 5:'<a href="exec:pcs_throat -= 5 & dynamic $cheatmenu[''looks'']">Decrease throat capacity</a>'
  811. if dounspell = 1:
  812. *nl
  813. '<a href="exec:dounsplkil = 2 & gs ''body'', ''hardreset''">Hard Reset body shape</a>'
  814. end
  815. '</td><td width="33%" cellpadding="20" valign="top">'
  816. '<<$pcs_vag>>'
  817. if pcs_vag > 0:'<a href="exec:pcs_vag = 0 & dynamic $cheatmenu[''looks'']">Reinstate virginity</a>'
  818. if stat['think_virgin'] < 1:'<a href="exec:stat[''vaginal''] = 0 & stat[''vaginal_fist''] = 0 & stat[''vaginal_dildo''] = 0 & stat[''vaginal_strap''] = 0 & dynamic $cheatmenu[''looks'']">Make Sveta believe she is a virgin again (resets the related sex stats)</a>'
  819. if pcs_vag <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''vagenlarge''">Enlarge comfortable vaginal capacity</a>'
  820. if pcs_vag >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''vagreduce''">Reduce comfortable vaginal capacity</a>'
  821. 'Your comfortable vaginal capacity will reduce by <<vshrink>> every <<vshrinkdays>> days.'
  822. if vshrink < 10:'<a href="exec:vshrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
  823. if vshrink > 0:'<a href="exec:vshrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
  824. if vshrinkdays < 10:'<a href="exec:vshrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
  825. if vshrinkdays > 1:'<a href="exec:vshrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
  826. 'When gaped your vagina will reduce each stage (up to 4 for maximum gape) every <<vgape[4]>> minutes.'
  827. if vgape[4] < 60:'<a href="exec:vgape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
  828. if vgape[4] > 5:'<a href="exec:vgape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
  829. *nl
  830. '<<$pcs_ass>>'
  831. if pcs_ass <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''assenlarge''">Enlarge comfortable anal capacity</a>'
  832. if pcs_ass >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''assreduce''">Reduce comfortable anal capacity</a>'
  833. 'Your comfortable anal capacity will reduce by <<ashrink>> every <<ashrinkdays>> days.'
  834. if ashrink < 10:'<a href="exec:ashrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
  835. if ashrink > 0:'<a href="exec:ashrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
  836. if ashrinkdays < 10:'<a href="exec:ashrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
  837. if ashrinkdays > 1:'<a href="exec:ashrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
  838. 'When gaped your anus will reduce each stage (up to 4 for maximum gape) every <<agape[4]>> minutes.'
  839. if agape[4] < 60:'<a href="exec:agape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
  840. if agape[4] > 5:'<a href="exec:agape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
  841. *nl
  842. if dounspell = 0:
  843. if fat ! 0: '<a href="exec:fat = 0 & dynamic $cheatmenu[''looks'']">Zero fat</a>'
  844. 'Body Fat = (<<pcs_mass[''body'']>>): <a href="exec: gs ''Cheatmenu_din'', ''change_pcs_mass_body'', -10">-10</a> <a href="exec: gs ''Cheatmenu_din'', ''change_pcs_mass_body'', -5">-5</a> <a href="exec: gs ''Cheatmenu_din'', ''change_pcs_mass_body'', -1">-1</a> <a href="exec: gs ''Cheatmenu_din'', ''change_pcs_mass_body'', 1">+1</a> <a href="exec: gs ''Cheatmenu_din'', ''change_pcs_mass_body'', 5">+5</a> <a href="exec: gs ''Cheatmenu_din'', ''change_pcs_mass_body'', 10">+10</a>'
  845. '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. 60 is the center of a healthy bodyweight.'
  846. end
  847. *nl
  848. '<a href="exec:dynamic $cheatmenu[''tatoo'']">Tattoo removal</a>'
  849. '</td><td width="33%" cellpadding="20" valign="top">'
  850. '<<$hair>>'
  851. if pcs_haircol = 0:
  852. 'Your hair is now (prev) <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks''] & nathcol = pcs_haircol">(next)</a>'
  853. elseif pcs_haircol > 0 and pcs_haircol < 3:
  854. '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>'
  855. elseif pcs_haircol = 3:
  856. 'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks'']" & nathcol = pcs_haircol>(prev)</a> <<$pcs_haircol>> (next)'
  857. else
  858. '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.'
  859. end
  860. if pcs_hairlng > 975:
  861. '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>'
  862. elseif pcs_hairlng > 900:
  863. '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>'
  864. elseif pcs_hairlng >= 100:
  865. '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>'
  866. elseif pcs_hairlng >= 25:
  867. '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>'
  868. elseif pcs_hairlng >= 5:
  869. '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>'
  870. else
  871. '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>'
  872. end
  873. if hairgrowcht = 0:'<a href="exec:hairgrowcht = 1 & dynamic $cheatmenu[''looks'']">Stop hair growth</a>'
  874. if hairgrowcht = 1:'<a href="exec:hairgrowcht = 0 & dynamic $cheatmenu[''looks'']">Allow hair growth</a>'
  875. *nl
  876. '<<$glaza>>'
  877. if pcs_naturallashes < 2:'<a href="exec:pcs_naturallashes += 1 & dynamic $cheatmenu[''looks'']">Enlarge lashes</a>'
  878. if pcs_naturallashes > 0:'<a href="exec:pcs_naturallashes -= 1 & dynamic $cheatmenu[''looks'']">Shrink lashes</a>'
  879. if pcs_eyesize < 3:'<a href="exec:pcs_eyesize += 1 & dynamic $cheatmenu[''looks'']">Increase the size of the eye</a>'
  880. if pcs_eyesize > 0:'<a href="exec:pcs_eyesize -= 1 & dynamic $cheatmenu[''looks'']">Reduce the size of the eye</a>'
  881. if pcs_eyecol <= 0:
  882. 'Your eyes are now (prev) <<$pcs_eyecol>> <a href="exec:pcs_eyecol +=1 & dynamic $cheatmenu[''looks'']">(next)</a>'
  883. elseif pcs_eyecol > 0 and pcs_eyecol < 3:
  884. '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>'
  885. elseif pcs_eyecol >= 3:
  886. 'Your eyes are now <a href="exec:pcs_eyecol -=1 & dynamic $cheatmenu[''looks'']">(prev)</a> <<$pcs_eyecol>> (next)'
  887. end
  888. '</td></tr></table></center>'
  889. }
  890. if $ARGS[0] = 'change_pcs_mass_body':
  891. gs 'body', 'Set_mass_distribution_using_body', pcs_mass['body'] + ARGS[1]
  892. dynamic $cheatmenu['looks']
  893. end
  894. if $ARGS[0] = 'vagenlarge':
  895. if pcs_vag = 0:
  896. pcs_vag = 5
  897. elseif pcs_vag <= 5:
  898. pcs_vag = 10
  899. elseif pcs_vag <= 10:
  900. pcs_vag = 15
  901. elseif pcs_vag <= 15:
  902. pcs_vag = 25
  903. elseif pcs_vag <= 25:
  904. pcs_vag = 35
  905. end
  906. dynamic $cheatmenu['looks']
  907. end
  908. if $ARGS[0] = 'vagreduce':
  909. if pcs_vag > 25:
  910. pcs_vag = 25
  911. elseif pcs_vag > 15:
  912. pcs_vag = 15
  913. elseif pcs_vag > 10:
  914. pcs_vag = 10
  915. elseif pcs_vag > 5:
  916. pcs_vag = 1
  917. end
  918. dynamic $cheatmenu['looks']
  919. end
  920. if $ARGS[0] = 'assenlarge':
  921. if pcs_ass = 0:
  922. pcs_ass = 5
  923. elseif pcs_ass <= 5:
  924. pcs_ass = 10
  925. elseif pcs_ass <= 10:
  926. pcs_ass = 15
  927. elseif pcs_ass <= 15:
  928. pcs_ass = 25
  929. elseif pcs_ass <= 25:
  930. pcs_ass = 35
  931. end
  932. dynamic $cheatmenu['looks']
  933. end
  934. if $ARGS[0] = 'assreduce':
  935. if pcs_ass > 25:
  936. pcs_ass = 25
  937. elseif pcs_ass > 15:
  938. pcs_ass = 15
  939. elseif pcs_ass > 10:
  940. pcs_ass = 10
  941. elseif pcs_ass > 5:
  942. pcs_ass = 1
  943. end
  944. dynamic $cheatmenu['looks']
  945. end
  946. $cheatmenu['parameters'] = {
  947. *clr & cla
  948. '<center><h1>Cheat Menu - Appearance Stats</h1></center>'
  949. act 'Return to appearance menu':dynamic $cheatmenu['looks']
  950. *nl
  951. 'Body Shape Parameters'
  952. '<<pcs_bust>> - <<pcs_waist>> - <<pcs_hips>>, <<$titsize>> breasts, the difference between the hips and waist <<pcs_hips-pcs_waist>> cm'
  953. 'Muscularity: strenbuf = <<strenbuf>>, pcs_mass[''body''] = <<pcs_mass[''body'']>>, fat = <<fat>>'
  954. 'Variable List:'
  955. 'agilbuf = <<agilbuf>>'
  956. 'strenbuf = <<strenbuf>>'
  957. 'vitalbuf = <<vitalbuf>>'
  958. 'BMI (pcs_bmi) = <<pcs_bmi[0]>>.<<pcs_bmi[1]>>'
  959. 'weight (pcs_weight) = <<pcs_weight[0]>>.<<pcs_weight[1]>> kg'
  960. 'bust (pcs_bust) = <<pcs_bust>>'
  961. 'band (pcs_band) = <<pcs_band>>'
  962. 'waist (pcs_waist) = <<pcs_waist>>'
  963. 'hips (pcs_hips) = <<pcs_hips>>'
  964. 'bust - band (pcs_cupsize) = <<pcs_cupsize>>'
  965. 'pcs_mass[''bust''] = <<pcs_mass[''bust'']>>'
  966. 'pcs_mass[''bust_gen''] = <<pcs_mass[''bust_gen'']>>'
  967. 'bodyVars[''bust_magic''] = <<bodyVars[''bust_magic'']>>'
  968. 'bodyVars[''bust_silicone''] = <<bodyVars[''bust_silicone'']>>'
  969. 'bodyVars[''bust_other''] = <<bodyVars[''bust_other'']>>'
  970. 'pcs_mass[''butt''] = <<pcs_mass[''butt'']>>'
  971. 'pcs_mass[''butt_gen''] = <<pcs_mass[''butt_gen'']>>'
  972. 'bodyVars[''butt_silicone''] = <<bodyVars[''butt_silicone'']>>'
  973. 'bodyVars[''butt_other''] = <<bodyVars[''butt_other'']>>'
  974. 'bodyVars[''vhips''] = <<bodyVars[''vhips'']>>'
  975. 'bodyVars[''wratio''] = <<bodyVars[''wratio'']>>'
  976. 'bodyVars[''bratio''] = <<bodyVars[''bratio'']>>'
  977. 'bodyVars[''hratio''] = <<bodyVars[''hratio'']>>'
  978. 'bodyVars[''vofat''] = <<bodyVars[''vofat'']>>'
  979. 'salocatnow = <<salocatnow>>'
  980. 'salocatlast = <<salocatlast>>'
  981. 'magf2bdo = <<magf2bdo>>'
  982. 'mgf2bnocnt = <<mgf2bnocnt>>'
  983. 'magtarcup = <<magtarcup>>'
  984. 'normbuffpick = <<normbuffpick>>'
  985. 'nrmbfpckct = <<nrmbfpckct>>'
  986. 'bodyVars[''weight_warning''] = <<bodyVars[''weight_warning'']>>'
  987. 'salolast = <<salolast>>'
  988. }
  989. $cheatmenu['vneshpara'] = {
  990. *clr & cla
  991. '<center><h1>Cheat Menu - ?</h1></center>'
  992. act 'Return to appearance menu':dynamic $cheatmenu['looks']
  993. *nl
  994. 'Appearance Parameters'
  995. *nl
  996. 'Base Appearance'
  997. 'pcs_skin = <<pcs_skin>> and skin_bonus = <<skinBonus>> (between 0 and 100)'
  998. 'bodyShapeBonus = <<bodyShapeBonus>> (between -158 and 70)'
  999. 'visableAgePenalty = <<visibleAgePenalty>> (-2.5 for every year below 20)'
  1000. 'pcs_teeth = <<pcs_teeth>> and teethPenalty = <<teethPenalty>> (10*(pcs_teeth +pcs_missing_teeth)'
  1001. 'attributeBonus = <<attributeBonus>> (pcs_agil / 5) + (pcs_vital / 5)'
  1002. 'these are adjusted by BMI if it is outside <18 and >29'
  1003. 'pcs_apprncbase = <<pcs_apprncbase>>'
  1004. *nl
  1005. *nl
  1006. 'Bonus'
  1007. 'groomingBonus = <<func(''AppearanceSystem'',''CalcGroomingBonus'')>> (pcs_breath and makeup)'
  1008. 'groomingPenalty = <<func(''AppearanceSystem'',''CalcGroomingPenalty'')>> '
  1009. '(lipbalm, hair brushed, hair length, deo, sweat, glasses, hair color fade, leg hair..)'
  1010. 'accessoriesBonus = <<func(''AppearanceSystem'',''CalcAccessoriesBonus'')>> '
  1011. 'CalcClothingBonus = <<func(''AppearanceSystem'',''CalcClothingBonus'')>> '
  1012. '((PXCloThinness + PXCloTopCut + PXCloBottomShortness)/2)/ 76 * PCloQuality'
  1013. *nl
  1014. *nl
  1015. 'coatQualityBonus = <<bonusZ>>'
  1016. 'shoesQualityBonus = <<PShoQualityZ>>'
  1017. 'PXCloThinness = <<PXCloThinness>>'
  1018. 'PXCloTopCut = <<PXCloTopCut>>'
  1019. 'PXCloBottomShortness = <<PXCloBottomShortness>>'
  1020. 'PCloQuality = <<PCloQuality>>'
  1021. 'lipBalmPenalty = <<lipBalmPenalty>>'
  1022. 'hairPenalty = <<hairPenalty>>'
  1023. 'deodorantPenalty = <<deodorantPenalty>>'
  1024. 'sweatPenalty = <<sweatPenalty>>'
  1025. 'glassesPenalty = <<glassesPenalty>>'
  1026. 'hairDyePenalty = <<hairDyePenalty>>'
  1027. 'legPenalty = <<legPenalty>>'
  1028. 'pcs_eyesize = <<pcs_eyesize>>'
  1029. 'pcs_lip = <<pcs_lip>>'
  1030. }
  1031. $cheatmenu['tatoo'] = {
  1032. gs'stat'
  1033. *clr & cla
  1034. '<center><h1>Cheat Menu - Tattoos</h1></center>'
  1035. act 'Return to appearance menu':dynamic $cheatmenu['looks']
  1036. *nl
  1037. if tatarm = 0:'You do not have a tattoo on your arm</a>'
  1038. if tatarm >= 1:'<a href="exec:tattCount-=1 & tatarm = 0 & dynamic $cheatmenu[''tatoo'']">Remove your arm tattoo</a>'
  1039. if tatass = 0:'You do not have a tattoo on your ass</a>'
  1040. if tatass >= 1:'<a href="exec:tattCount-=1 & tatass = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ass tattoo</a>'
  1041. if tatback = 0:'You do not have a tattoo on your back</a>'
  1042. if tatback >= 1:'<a href="exec:tattCount-=1 & tatback = 0 & dynamic $cheatmenu[''tatoo'']">Remove your back tattoo</a>'
  1043. if tatblly = 0:'You do not have a tattoo on your belly</a>'
  1044. if tatblly >= 1:'<a href="exec:tattCount-=1 & tatblly = 0 & dynamic $cheatmenu[''tatoo'']">Remove your belly tattoo</a>'
  1045. if tatbrst = 0:'You do not have a tattoo on your breast</a>'
  1046. if tatbrst >= 1:'<a href="exec:tattCount-=1 & tatbrst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your breast tattoo</a>'
  1047. if tatchst = 0:'You do not have a tattoo on your chest</a>'
  1048. if tatchst >= 1:'<a href="exec:tattCount-=1 & tatchst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your chest tattoo</a>'
  1049. if tatfce = 0:'You do not have a tattoo on your face</a>'
  1050. if tatfce >= 1:'<a href="exec:tattCount-=1 & tatfce = 0 & dynamic $cheatmenu[''tatoo'']">Remove your face tattoo</a>'
  1051. if tatankle = 0:'You do not have a tattoo on your ankle</a>'
  1052. if tatankle >= 1:'<a href="exec:tattCount-=1 & tatankle = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ankle tattoo</a>'
  1053. if tatleg = 0:'You do not have a tattoo on your leg</a>'
  1054. if tatleg >= 1:'<a href="exec:tattCount-=1 & tatleg = 0 & dynamic $cheatmenu[''tatoo'']">Remove your leg tattoo</a>'
  1055. if tatlip = 0:'You do not have a tattoo on your lip</a>'
  1056. if tatlip >= 1:'<a href="exec:tattCount-=1 & tatlip = 0 & dynamic $cheatmenu[''tatoo'']">Remove your lip tattoo</a>'
  1057. if tatneck = 0:'You do not have a tattoo on your neck</a>'
  1058. if tatneck >= 1:'<a href="exec:tattCount-=1 & tatneck = 0 & dynamic $cheatmenu[''tatoo'']">Remove your neck tattoo</a>'
  1059. if tatvag = 0:'You do not have a pubic tattoo</a>'
  1060. if tatvag >= 1:'<a href="exec:tattCount-=1 & tatvag = 0 & dynamic $cheatmenu[''tatoo'']">Remove your pubic tattoo</a>'
  1061. if tatlech = 0:'You do not have a tattoo on your shoulder</a>'
  1062. if tatlech >= 1:'<a href="exec:tattCount-=1 & tatlech = 0 & dynamic $cheatmenu[''tatoo'']">Remove your shoulder tattoo</a>'
  1063. if tatside = 0:'You do not have a tattoo on your side</a>'
  1064. if tatside >= 1:'<a href="exec:tattCount-=1 & tatside = 0 & dynamic $cheatmenu[''tatoo'']">Remove your the tattoo on your side</a>'
  1065. if tatupb = 0:'You do not have a tramp stamp</a>'
  1066. if tatupb >= 1:'<a href="exec:tattCount-=1 & tatupb = 0 & dynamic $cheatmenu[''tatoo'']">Remove your tramp stamp</a>'
  1067. if tatunder = 0:'You do not have an under breast tattoo</a>'
  1068. if tatunder >= 1:'<a href="exec:tattCount-=1 & tatunder = 0 & dynamic $cheatmenu[''tatoo'']">Remove your under breast tattoo</a>'
  1069. if tatwrist = 0:'You do not have a tattoo on your wrist</a>'
  1070. if tatwrist >= 1:'<a href="exec:tattCount-=1 & tatwrist = 0 & dynamic $cheatmenu[''tatoo'']">Remove your wrist tattoo</a>'
  1071. if tathand = 0:'You do not have a tattoo on your hand</a>'
  1072. if tathand >= 1:'<a href="exec:tattCount-=1 & tathand = 0 & dynamic $cheatmenu[''tatoo'']">Remove your hand tattoo</a>'
  1073. if cosmetic_tattoo = 0:'You do not have the makup tattoo</a>'
  1074. if cosmetic_tattoo >= 1:'<a href="exec:cosmetic_tattoo = 0 & dynamic $cheatmenu[''tatoo'']">Remove your makup tattoo</a>'
  1075. }
  1076. $cheatmenu['setStat'] = {
  1077. gs 'shortgs', 'setStat', $ARGS[0], ARGS[1]
  1078. dynamic $cheatmenu['stats']
  1079. }
  1080. $cheatmenu['setStatInput'] = {
  1081. $temp_input = $input("Set your <<$ARGS[1]>> level:")
  1082. if isnum($temp_input) ! 0:
  1083. gs 'shortgs', 'setStat', $ARGS[0], val($temp_input)
  1084. elseif $temp_input ! '':
  1085. msg 'invalid input'
  1086. end
  1087. killvar '$temp_input'
  1088. dynamic $cheatmenu['stats']
  1089. }
  1090. $cheatmenu['setStatInputInverted'] = {
  1091. $temp_input = $input("Set your <<$ARGS[1]>> level:")
  1092. if isnum($temp_input) ! 0:
  1093. gs 'shortgs', 'setStat', $ARGS[0], (100 - val($temp_input))
  1094. elseif $temp_input ! '':
  1095. msg 'invalid input'
  1096. end
  1097. killvar '$temp_input'
  1098. dynamic $cheatmenu['stats']
  1099. }
  1100. $cheatmenu['setAttrs'] = {
  1101. loop_index = 0
  1102. !! skip stren_plus and butt_tr
  1103. loop_index_max = arrsize('$att_name') - 2
  1104. !! skip magik in nonmagic starts
  1105. if $start_type[1] = 'nomagic': loop_index_max -= 1
  1106. :set_attrs_loop
  1107. gs 'shortgs', 'setStat', $att_name[loop_index], ARGS[0]
  1108. loop_index += 1
  1109. if loop_index < loop_index_max: jump 'set_attrs_loop'
  1110. killvar 'loop_index' & killvar 'loop_index_max'
  1111. dynamic $cheatmenu['stats']
  1112. }
  1113. $cheatmenu['setSkills'] = {
  1114. loop_index = 0
  1115. loop_index_max = arrsize('$skl_name')
  1116. :set_skills_loop
  1117. !! Inhibition (number 33) isn''t a skill so we''ll skip it
  1118. if loop_index = 33: loop_index += 1 & jump 'set_skills_loop'
  1119. gs 'shortgs', 'setStat', $skl_name[loop_index], ARGS[0]
  1120. loop_index += 1
  1121. if loop_index < loop_index_max: jump 'set_skills_loop'
  1122. killvar 'loop_index' & killvar 'loop_index_max'
  1123. dynamic $cheatmenu['stats']
  1124. }
  1125. $cheatmenu['printStatLinks'] = {
  1126. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', 100">Max</a> '
  1127. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl + 1">+1</a> '
  1128. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl + 10">+10</a> '
  1129. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl - 1">-1</a> '
  1130. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl - 10">-10</a> '
  1131. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', 0">Min</a> '
  1132. *pl '<a href="exec:dynamic $cheatmenu[''setStatInput''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''">Set</a>'
  1133. }
  1134. $cheatmenu['printStatLinksInverted'] = {
  1135. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', 0">Max</a> '
  1136. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl - 1">+1</a> '
  1137. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl - 10">+10</a> '
  1138. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl + 1">-1</a> '
  1139. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', <<$ARGS[0]>>_lvl + 10">-10</a> '
  1140. *p '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', 100">Min</a> '
  1141. *pl '<a href="exec:dynamic $cheatmenu[''setStatInputInverted''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''">Set</a>'
  1142. }
  1143. $cheatmenu['stats'] = {
  1144. gs 'stat'
  1145. *clr & cla
  1146. gs 'obj_din', 'cheattabs'
  1147. !Set a floor and ceiling for all attributes and skills
  1148. loop_index = 0
  1149. :attr_trim_loop
  1150. dynamic "
  1151. if <<$att_name[loop_index]>>_lvl < 0: <<$att_name[loop_index]>>_lvl = 0
  1152. if <<$att_name[loop_index]>>_lvlst < 0: <<$att_name[loop_index]>>_lvlst = 0
  1153. if <<$att_name[loop_index]>>_lvl > 100: <<$att_name[loop_index]>>_lvl = 100
  1154. if <<$att_name[loop_index]>>_lvlst > 100: <<$att_name[loop_index]>>_lvlst = 100
  1155. "
  1156. loop_index += 1
  1157. if loop_index < arrsize('$att_name'): jump 'attr_trim_loop'
  1158. loop_index = 0
  1159. :skill_trim_loop
  1160. dynamic "
  1161. if <<$skl_name[loop_index]>>_lvl < 0: <<$skl_name[loop_index]>>_lvl = 0
  1162. if <<$skl_name[loop_index]>>_lvlst < 0: <<$skl_name[loop_index]>>_lvlst = 0
  1163. if <<$skl_name[loop_index]>>_lvl > 100: <<$skl_name[loop_index]>>_lvl = 100
  1164. if <<$skl_name[loop_index]>>_lvlst > 100: <<$skl_name[loop_index]>>_lvlst = 100
  1165. "
  1166. loop_index += 1
  1167. if loop_index < arrsize('$skl_name'): jump 'skill_trim_loop'
  1168. killvar 'loop_index'
  1169. '<center><h1>Cheat Menu - Attributes and Skills</h1></center>'
  1170. '<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>'
  1171. *nl
  1172. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  1173. '<tr><td width="50%" cellpadding="10" valign="top">'
  1174. *pl'<b>Attributes</b> (values 0 - 100):'
  1175. *pl '<a href="exec:dynamic $cheatmenu[''setAttrs''], 100" >Max Attributes</a> <a href="exec:dynamic $cheatmenu[''setAttrs''], 0" >Min Attributes</a>'
  1176. *p 'Strength (<<stren_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'stren', 'Strength'
  1177. *p 'Agility (<<agil_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'agil', 'Agility'
  1178. *p 'Endurance (<<vital_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'vital', 'Endurance'
  1179. *p 'Intelligence (<<intel_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'intel', 'Intelligence'
  1180. *p 'Reaction (<<react_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'react', 'Reaction'
  1181. *p 'Spirit (<<sprt_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'sprt', 'Spirit'
  1182. *p 'Charisma (<<chrsm_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'chrsm', 'Charisma'
  1183. *p 'Perception (<<prcptn_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'prcptn', 'Perception'
  1184. if $start_type[1] ! 'nomagic': *p 'Magic (<<magik_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'magik', 'Magic'
  1185. *nl
  1186. *pl'<b>Sexual:</b>'
  1187. *pl 'Inhibition level (<<100 - inhib_lvl>>): ' & dynamic $cheatmenu['printStatLinksInverted'], 'inhib', 'Inhibition'
  1188. if willpowermax > 150: willpowermax = 150
  1189. if willpowermax < 50: willpowermax = 50
  1190. *pl 'Willpower Maximum (<<willpowermax>>): <a href="exec:willpowermax = 150 & 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>'
  1191. if workPTU > 1:*pl'<a href="exec:teachlevel += 10 & dynamic $cheatmenu[''stats'']">Reputation teacher+10: <<teachlevel>></a>'
  1192. if workPTU > 1:*pl'<a href="exec:teachlevel -= 10 & dynamic $cheatmenu[''stats'']">Reputation teacher-10: <<teachlevel>></a>'
  1193. *nl
  1194. if $start_type['loc'] = 'sg' and SchoolAtestat = 0:
  1195. *pl'<b>School:</b>'
  1196. *pl 'Math grade: <<class[''school_math_grade'']>> ' + iif(class['school_math_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_math_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1197. *pl 'Russian grade: <<class[''school_rus_grade'']>> ' + iif(class['school_rus_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_rus_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1198. *pl 'Literature grade: <<class[''school_lit_grade'']>> ' + iif(class['school_lit_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''lit'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_lit_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''lit'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1199. *pl 'Art grade: <<class[''school_art_grade'']>> ' + iif(class['school_art_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''art'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_art_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''art'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1200. *pl 'Biology grade: <<class[''school_bio_grade'']>> ' + iif(class['school_bio_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''bio'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_bio_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''bio'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1201. *pl 'English grade: <<class[''school_eng_grade'']>> ' + iif(class['school_eng_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''eng'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_eng_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''eng'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1202. *pl 'Geography grade: <<class[''school_geo_grade'']>> ' + iif(class['school_geo_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''geo'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_geo_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''geo'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1203. *pl 'Science grade: <<class[''school_sci_grade'']>> ' + iif(class['school_sci_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''sci'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_sci_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''sci'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1204. *pl 'History grade: <<class[''school_his_grade'']>> ' + iif(class['school_his_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''his'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_his_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''his'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1205. *pl 'Shop grade: <<class[''school_shop_grade'']>> ' + iif(class['school_shop_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''shop'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_shop_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''shop'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1206. *pl 'Computer grade: <<class[''school_comp_grade'']>> ' + iif(class['school_comp_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''comp'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_comp_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''comp'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1207. *pl 'Music grade: <<class[''school_mus_grade'']>> ' + iif(class['school_mus_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''mus'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_mus_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''mus'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1208. *pl 'P.E. grade: <<class[''school_pe_grade'']>> ' + iif(class['school_pe_grade'] < 100, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''pe'', 10 & dynamic $cheatmenu[''stats'']">+10</a>', '') + iif(class['school_pe_grade'] > 0, ' <a href="exec:gs ''grades'', ''grade_award'',''school'', ''pe'', -10 & dynamic $cheatmenu[''stats'']">-10</a>', '')
  1209. if schoolprogul >= 0: *pl '<a href="exec: schoolprogul = 0 & dynamic $cheatmenu[''stats'']">Zero Absenteeism (School): <<schoolprogul>></a>'
  1210. *nl
  1211. end
  1212. *pl'<b>Skills</b> (values 0 - 100, and adjusted total by attributes):'
  1213. *pl '<a href="exec:dynamic $cheatmenu[''setSkills''], 100" >Max Skills</a> <a href="exec:dynamic $cheatmenu[''setSkills''], 0" >Min Skills</a>'
  1214. *nl
  1215. *pl'<b>Others:</b>'
  1216. *p 'Chess (<<chess_lvl>>) - Total (<<pcs_chess>>): ' & dynamic $cheatmenu['printStatLinks'], 'chess', 'Chess'
  1217. *p 'Gaming (<<gaming_lvl>>) - Total (<<pcs_gaming>>): ' & dynamic $cheatmenu['printStatLinks'], 'gaming', 'Gaming'
  1218. *p 'Social (<<humint_lvl>>) - Total (<<pcs_humint>>): ' & dynamic $cheatmenu['printStatLinks'], 'humint', 'People Skills'
  1219. *p 'Persuasion (<<persuas_lvl>>) - Total (<<pcs_persuas>>): ' & dynamic $cheatmenu['printStatLinks'], 'persuas', 'Persuasion'
  1220. *p 'Observation (<<observ_lvl>>) - Total (<<pcs_observ>>): ' & dynamic $cheatmenu['printStatLinks'], 'observ', 'Observation'
  1221. *p 'Makeup (<<makupskl_lvl>>) - Total (<<pcs_makupskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'makupskl', 'Makeup'
  1222. *p 'Computers (<<compskl_lvl>>) - Total (<<pcs_compskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'compskl', 'Computer Skill'
  1223. *p 'Hacking (<<comphckng_lvl>>) - Total (<<pcs_comphckng>>): ' & dynamic $cheatmenu['printStatLinks'], 'comphckng', 'Hacking'
  1224. *p 'Handy-work (<<hndiwrk_lvl>>) - Total (<<pcs_hndiwrk>>): ' & dynamic $cheatmenu['printStatLinks'], 'hndiwrk', 'Handy-work'
  1225. *p 'Pool (<<pool_lvl>>) - Total (<<pcs_pool>>): ' & dynamic $cheatmenu['printStatLinks'], 'pool', 'Pool'
  1226. *p 'Heels (<<pcs_heels>>) - Total (<<pcs_heels>>): ' & dynamic $cheatmenu['printStatLinks'], 'heels', 'Heels'
  1227. if $start_type[1] ! 'nomagic': *p 'Spell Casting (<<splcstng_lvl>>) - Total (<<pcs_splcstng>>): ' & dynamic $cheatmenu['printStatLinks'], 'splcstng', 'Spellcasting'
  1228. '</td><td width="50%" cellpadding="10" valign="top">'
  1229. *pl'<b>Combat:</b>'
  1230. *p 'Jabs (<<jab_lvl>>)- Total (<<pcs_jab>>): ' & dynamic $cheatmenu['printStatLinks'], 'jab', 'Jabs'
  1231. *p 'Power Strikes (<<punch_lvl>>) - Total (<<pcs_punch>>): ' & dynamic $cheatmenu['printStatLinks'], 'punch', 'Power Strikes'
  1232. *p 'Kicks (<<kick_lvl>>) - Total (<<pcs_kick>>): ' & dynamic $cheatmenu['printStatLinks'], 'kick', 'Kicks'
  1233. *p 'Defence (<<def_lvl>>) - Total (<<pcs_def>>): ' & dynamic $cheatmenu['printStatLinks'], 'def', 'Defence'
  1234. *p 'Marksmanship (<<shoot_lvl>>) - Total (<<pcs_shoot>>): ' & dynamic $cheatmenu['printStatLinks'], 'shoot', 'Marksmanship'
  1235. *p 'Bushcraft (<<bushcraft_lvl>>) - Total (<<pcs_bushcraft>>): ' & dynamic $cheatmenu['printStatLinks'], 'bushcraft', 'Bushcraft'
  1236. *nl
  1237. *pl'<b>Craft:</b>'
  1238. *p 'Singing (<<vokal_lvl>>) - Total (<<pcs_vokal>>): ' & dynamic $cheatmenu['printStatLinks'], 'vokal', 'Singing'
  1239. *p 'Tailoring (<<sewng_lvl>>) - Total (<<pcs_sewng>>): ' & dynamic $cheatmenu['printStatLinks'], 'sewng', 'Tailoring'
  1240. *p 'Instruments (<<instrmusic_lvl>>) - Total (<<pcs_instrmusic>>): ' & dynamic $cheatmenu['printStatLinks'], 'instrmusic', 'Instrumental Music'
  1241. *p 'Photography (<<photoskl_lvl>>) - Total (<<pcs_photoskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'photoskl', 'Photography'
  1242. *p 'Artistic (<<artskls_lvl>>) - Total (<<pcs_artskls>>): ' & dynamic $cheatmenu['printStatLinks'], 'artskls', 'Artistic Skills'
  1243. *p 'Performing (<<perform_lvl>>) - Total (<<pcs_perform>>): ' & dynamic $cheatmenu['printStatLinks'], 'perform', 'Performance'
  1244. *p 'Music Production (<<musicprod_lvl>>) - Total (<<pcs_musicprod>>): ' & dynamic $cheatmenu['printStatLinks'], 'musicprod', 'Music Production'
  1245. *nl
  1246. *pl'<b>Dance:</b>'
  1247. *p 'Modern Dance (<<danc_lvl>>) - Total (<<pcs_danc>>): ' & dynamic $cheatmenu['printStatLinks'], 'danc', 'Modern Dancing'
  1248. *p 'Erotic Dance (<<dancero_lvl>>) - Total (<<pcs_dancero>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancero', 'Erotic Dancing'
  1249. *p 'Pole Dance (<<dancpol_lvl>>) - Total (<<pcs_dancpol>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancpol', 'Pole Dancing'
  1250. *p 'Cheerleading (<<cheer_lvl>>) - Total (<<pcs_cheer>>): ' & dynamic $cheatmenu['printStatLinks'], 'cheer', 'Cheerleading'
  1251. *nl
  1252. *pl'<b>Sport:</b>'
  1253. *p 'Running (<<run_lvl>>) - Total (<<pcs_run>>): ' & dynamic $cheatmenu['printStatLinks'], 'run', 'Running'
  1254. *p 'Volleyball (<<vball_lvl>>) - Total (<<pcs_vball>>): ' & dynamic $cheatmenu['printStatLinks'], 'vball', 'Volleyball'
  1255. *p 'Ice Skating (<<icesktng_lvl>>) - Total (<<pcs_icesktng>>): ' & dynamic $cheatmenu['printStatLinks'], 'icesktng', 'Ice Skating'
  1256. *p 'Wrestling (<<wrstlng_lvl>>) - Total (<<pcs_wrstlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'wrstlng', 'Wrestling'
  1257. *p 'Football (<<ftbll_lvl>>) - Total (<<pcs_ftbll>>): ' & dynamic $cheatmenu['printStatLinks'], 'ftbll', 'Football'
  1258. *nl
  1259. *pl'<b>Work:</b>'
  1260. *p 'Serving (<<servng_lvl>>) - Total (<<pcs_servng>>): ' & dynamic $cheatmenu['printStatLinks'], 'servng', 'Serving'
  1261. *p 'Modeling (<<mdlng_lvl>>) - Total (<<pcs_mdlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'mdlng', 'Modeling'
  1262. *p 'Medicine (<<medcn_lvl>>) - Total (<<pcs_medcn>>): ' & dynamic $cheatmenu['printStatLinks'], 'medcn', 'Medicine'
  1263. *p 'Cleaning (<<cleaning_lvl>>) - Total (<<pcs_cleaning>>): ' & dynamic $cheatmenu['printStatLinks'], 'cleaning', 'Cleaning'
  1264. '</tr></table></b></center>'
  1265. }
  1266. $cheatmenu['reputation'] = {
  1267. gs'stat'
  1268. *clr & cla
  1269. gs 'obj_din', 'cheattabs'
  1270. '<center><h1>Cheat Menu - Relationships and Renown</h1></center>'
  1271. '<center>Relationship values are from 0 - 100.</center>'
  1272. '<center>If they exceed this limit they will be reset overnight.</center>'
  1273. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  1274. '<tr><td width="50%" cellpadding="10" valign="top">'
  1275. *nl
  1276. 'Relationships in Pavlovsk'
  1277. *nl
  1278. '<font color="blue"><b>Family</b></font>'
  1279. if Enable_reputation_family = 0:
  1280. '<a href="exec:Enable_reputation_family = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1281. end
  1282. if Enable_reputation_family = 1:
  1283. '<a href="exec:Enable_reputation_family = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1284. '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>'
  1285. '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>'
  1286. '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>'
  1287. '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>'
  1288. end
  1289. 'Your dog: '+iif($status['dog'] = 'active', '<b>Active</b>', '<a href="exec: $status[''dog''] = ''active'' & dynamic $cheatmenu[''reputation'']">Active</a>')+'|'+iif($status['dog'] = 'blocked', '<b>Blocked</b>', '<a href="exec: $status[''dog''] = ''blocked'' & dynamic $cheatmenu[''reputation'']">Blocked</a>')
  1290. if $status['dog'] ! 'blocked':
  1291. '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 & dynamic $cheatmenu[''reputation'']">Off</a>', '<a href="exec: cheat[''dog_rel''] = 0 & dynamic $cheatmenu[''reputation'']">Currently On</a>')
  1292. '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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_feed_base''] += 1 & dynamic $cheatmenu[''reputation'']">+1</a>'
  1293. '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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_walk_base''] += 1 & dynamic $cheatmenu[''reputation'']">+1</a>'
  1294. '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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_bath_base''] += 1 & dynamic $cheatmenu[''reputation'']">+1</a>'
  1295. end
  1296. *nl
  1297. if mid($start_type,1,2) = 'sg':
  1298. '<font color="blue"><b>School</b></font>'
  1299. '<i>Popular Kids</i>'
  1300. if Enable_reputation_popular = 0:
  1301. '<a href="exec:Enable_reputation_popular = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1302. end
  1303. if Enable_reputation_popular = 1:
  1304. '<a href="exec:Enable_reputation_popular = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1305. '<<$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>'
  1306. '<<$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>'
  1307. '<<$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>'
  1308. '<<$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>'
  1309. '<<$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>'
  1310. '<<$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>'
  1311. '<<$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>'
  1312. '<<$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>'
  1313. '<<$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>'
  1314. 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>'
  1315. '<<$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>'
  1316. '<<$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>'
  1317. end
  1318. *nl
  1319. '<i>Athletes</i>'
  1320. if Enable_reputation_athletes = 0:
  1321. '<a href="exec:Enable_reputation_athletes = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1322. end
  1323. if Enable_reputation_athletes = 1:
  1324. '<a href="exec:Enable_reputation_athletes = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1325. '<<$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>'
  1326. 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>'
  1327. '<<$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>'
  1328. '<<$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>'
  1329. '<<$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>'
  1330. '<<$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>'
  1331. '<<$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>'
  1332. '<<$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>'
  1333. '<<$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>'
  1334. '<<$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>'
  1335. '<<$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>'
  1336. end
  1337. *nl
  1338. '<i>Nerds</i>'
  1339. if Enable_reputation_nerds = 0:
  1340. '<a href="exec:Enable_reputation_nerds = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1341. end
  1342. if Enable_reputation_nerds = 1:
  1343. '<a href="exec:Enable_reputation_nerds = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1344. '<<$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>'
  1345. '<<$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>'
  1346. '<<$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>'
  1347. '<<$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>'
  1348. '<<$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>'
  1349. '<<$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>'
  1350. '<<$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>'
  1351. '<<$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>'
  1352. '<<$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>'
  1353. end
  1354. *nl
  1355. '<i>Gopniks</i>'
  1356. if Enable_reputation_gopniks = 0:
  1357. '<a href="exec:Enable_reputation_gopniks = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1358. end
  1359. if Enable_reputation_gopniks = 1:
  1360. '<a href="exec:Enable_reputation_gopniks = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1361. '<<$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>'
  1362. '<<$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>'
  1363. '<<$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>'
  1364. '<<$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>'
  1365. '<<$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>'
  1366. '<<$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>'
  1367. '<<$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>'
  1368. '<<$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>'
  1369. '<<$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>'
  1370. '<<$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>'
  1371. '<<$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>'
  1372. '<<$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>'
  1373. '<<$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>'
  1374. '<<$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>'
  1375. '<<$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>'
  1376. end
  1377. *nl
  1378. '<i>Outcasts/Loners</i>'
  1379. if Enable_reputation_outcasts = 0:
  1380. '<a href="exec:Enable_reputation_outcasts = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1381. end
  1382. if Enable_reputation_outcasts = 1:
  1383. '<a href="exec:Enable_reputation_outcasts = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1384. '<<$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>'
  1385. 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>'
  1386. 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>'
  1387. '<<$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>'
  1388. end
  1389. *nl
  1390. '<i>Teachers/Coaches</i>'
  1391. if Enable_reputation_teachers = 0:
  1392. '<a href="exec:Enable_reputation_teachers = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1393. end
  1394. if Enable_reputation_teachers = 1:
  1395. '<a href="exec:Enable_reputation_teachers = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1396. '<<$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>'
  1397. '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>'
  1398. '<<$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>'
  1399. '<<$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>'
  1400. '<<$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>'
  1401. '<<$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>'
  1402. '<<$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>'
  1403. '<<$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>'
  1404. '<<$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>'
  1405. '<<$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>'
  1406. '<<$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>'
  1407. '<<$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>'
  1408. '<<$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>'
  1409. end
  1410. end
  1411. *nl
  1412. '<font color="blue"><b>Nicholas'' Family</b></font>'
  1413. '<a href="exec:gt ''nichUtil'', ''debug''">Storyline Debug Menu</a>'
  1414. '</td><td width="50%" cellpadding="10" valign="top">'
  1415. *nl
  1416. 'Miscellaneous relationships'
  1417. *nl
  1418. '<font color="blue"><b>Others</b></font>'
  1419. *nl
  1420. if Enable_reputation_others = 0:
  1421. '<a href="exec:Enable_reputation_others = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
  1422. end
  1423. if Enable_reputation_others = 1:
  1424. '<a href="exec:Enable_reputation_others = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
  1425. if npc_rel['A112'] >= 0:
  1426. '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>'
  1427. end
  1428. if npc_rel['A219'] >= 0:
  1429. '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>'
  1430. end
  1431. if npc_rel['A220'] >= 0:
  1432. '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>'
  1433. end
  1434. if npc_rel['A93'] >= 0:
  1435. '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>'
  1436. end
  1437. if npc_rel['A43'] >= 0:
  1438. '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>'
  1439. end
  1440. if alla >= 0:
  1441. 'Alla: <<alla>> <a href="exec:alla += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:alla -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1442. end
  1443. if masha >= 0:
  1444. 'Masha: <<masha>> <a href="exec:masha += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:masha -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1445. end
  1446. if npc_rel['A41'] >= 0:
  1447. '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>'
  1448. end
  1449. if npc_rel['A42'] >= 0:
  1450. '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>'
  1451. end
  1452. if npc_rel['A89'] >= 0:
  1453. '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>'
  1454. end
  1455. if npc_rel['A217'] >= 0:
  1456. '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>'
  1457. end
  1458. if huntersAndreiQw >= 0:
  1459. 'Hunter Andrei: <<huntersAndreiQw>> <a href="exec:huntersAndreiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersAndreiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1460. end
  1461. if huntersSergeiQw >= 0:
  1462. 'Hunter Sergei: <<huntersSergeiQw>> <a href="exec:huntersSergeiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersSergeiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1463. end
  1464. if huntersIgorQw >= 0:
  1465. 'Hunter Igor: <<huntersIgorQw>> <a href="exec:huntersIgorQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersIgorQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
  1466. end
  1467. if npc_rel['A217'] >= 0:
  1468. '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>'
  1469. end
  1470. end
  1471. if pcs_lovers[0] = 1:
  1472. *nl
  1473. 'You are dating <<$loverdesc[0]>>.'
  1474. if loverrelation[0] < 0: loverrelation[0] = 0
  1475. if loverdays[0] < 0: loverdays[0] = 0
  1476. if haraklover[0] > 2: haraklover[0] = 0
  1477. if loverizvrat[0] > 1: loverizvrat[0] = 0
  1478. 'Change lover''s personality: <a href="exec:haraklover[0] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[0]>></a>'
  1479. 'Change lover''s perversion: <a href="exec:loverizvrat[0] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[0]>></a>'
  1480. '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>'
  1481. '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>'
  1482. end
  1483. if pcs_lovers[1] = 1:
  1484. *nl
  1485. 'You are dating <<$loverdesc[1]>>.'
  1486. if loverrelation[1] < 0: loverrelation[1] = 0
  1487. if loverdays[1] < 0: loverdays[1] = 0
  1488. if haraklover[1] > 2: haraklover[1] = 0
  1489. if loverizvrat[1] > 1: loverizvrat[1] = 0
  1490. 'Change lover''s personality: <a href="exec:haraklover[1] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[1]>></a>'
  1491. 'Change lover''s perversion: <a href="exec:loverizvrat[1] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[1]>></a>'
  1492. '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>'
  1493. '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>'
  1494. end
  1495. if pcs_lovers[2] = 1:
  1496. *nl
  1497. 'You are dating <<$loverdesc[2]>>.'
  1498. if loverrelation[2] < 0: loverrelation[2] = 0
  1499. if loverdays[2] < 0: loverdays[2] = 0
  1500. if haraklover[2] > 2: haraklover[2] = 0
  1501. if loverizvrat[2] > 1: loverizvrat[2] = 0
  1502. 'Change lover''s personality: <a href="exec:haraklover[2] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[2]>></a>'
  1503. 'Change lover''s perversion: <a href="exec:loverizvrat[2] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[2]>></a>'
  1504. '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>'
  1505. '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>'
  1506. end
  1507. *nl
  1508. if fame['pav_slut'] >= 50:
  1509. gs 'fame'
  1510. '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>'
  1511. end
  1512. *nl
  1513. 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>'
  1514. if mid($start_type,1,2) = 'sg':
  1515. *nl
  1516. '<font color="red"><b>WARNING</b></font>: Clearing reputation flags with your family may cause bugs. Use at your own risk!'
  1517. *nl
  1518. if motherKnowWhore > 0:
  1519. '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>'
  1520. elseif motherKnowSpravka > 0:
  1521. 'Your mother knows that you are sexually active. <a href="exec:motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1522. else
  1523. 'Your mother thinks that you are a virgin.'
  1524. end
  1525. *nl
  1526. if evgenQW >= 4 and fame['pav_slut'] >= 250:
  1527. 'Your brother thinks you are a total whore. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1528. elseif evgenQW >= 3:
  1529. 'Your brother thinks you are a slut. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1530. elseif brotherknowslut = 1:
  1531. 'Your brother saw semen on your body and thinks you fuck around. <a href="exec:brotherknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1532. elseif brotherknowslut >= 2:
  1533. 'Your brother saw you in the park fucking the Gopniks. <a href="exec:brotherknowslut = 1 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1534. else
  1535. 'Your brother has a good opinion of you.'
  1536. end
  1537. *nl
  1538. if sisterknowslut > 1 and sisboypartyQW > 1:
  1539. 'Your sister thinks you are a slut <a href="exec:sisboypartyQW = 0 & sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1540. elseif sisterknowslut > 0:
  1541. 'Your sister knows that you sleep around. <a href="exec:sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
  1542. else
  1543. 'Your sister has a good opinion of you.'
  1544. end
  1545. *nl
  1546. if func('homes_properties', 'can_live_here', 'parents_home') = 0:
  1547. '<a href="exec: gs ''homes_properties'', ''give_access'', ''parents_home'' & dynamic $cheatmenu[''reputation'']">Restore</a> access to your parent''s apartment.'
  1548. end
  1549. if momKnowsKolka = 1:
  1550. 'Your mother knows Kolka is the father. <a href="momKnowsKolka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
  1551. end
  1552. if momKnowsVladimir = 1:
  1553. 'Your mother knows Vladimir is the father. <a href="exec:momKnowsVladimir = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
  1554. end
  1555. if SchoolBlock = 1:
  1556. 'You''ve been expelled from school. <a href="exec:SchoolBlock = 0 & schoolPredupr = 0 & schoolprogul = 0 & pcs_grades = 50 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
  1557. end
  1558. end
  1559. '</td></tr></table></center>'
  1560. }
  1561. $cheatmenu['documents'] = {
  1562. gs'stat'
  1563. *clr & cla
  1564. gs 'obj_din', 'cheattabs'
  1565. '<center><h1>Cheat Menu - Diplomas, Licences, and Certificates</h1></center>'
  1566. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1567. '<td width="300" cellspacing="0" cellpadding="20" valign="top">'
  1568. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  1569. if SchoolAtestat = 0: '<a href="exec:SchoolAtestat = 1 & dynamic $cheatmenu[''documents'']">Get School Certificate</a>'
  1570. if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0: '<font color="red"><b>WARNING!</b></font>: This will end your school year!' & *nl
  1571. if SchoolAtestat = 1:'Already have a School Certificate'
  1572. if university['diploma'] > 0:
  1573. 'You already have a Diploma'
  1574. else
  1575. '<a href="exec:gs ''uniutil'', ''diploma'', ''set_obtained'' & dynamic $cheatmenu[''documents'']">Get Diploma</a>'
  1576. end
  1577. if secrdiplom = 0:'<a href="exec:secrdiplom = 1 & dynamic $cheatmenu[''documents'']">Get Secretarial Diploma</a>'
  1578. if secrdiplom = 1:'You already have a Secretarial Diploma'
  1579. if masseuse['certification'] < 10:'<a href="exec:masseuse[''certification''] = 10 & dynamic $cheatmenu[''documents'']">Get Masseuse Certificate</a>'
  1580. if masseuse['certification'] >= 10:'You already have a Masseuse Certificate'
  1581. if prava = 0:'<a href="exec:prava = 1 & dynamic $cheatmenu[''documents'']">Get Driving Licence</a>'
  1582. if prava = 1:'You already have Driving Licence'
  1583. '</td></tr></table></center>'
  1584. }
  1585. $cheatmenu['input_time'] = {
  1586. inputtmp = input("Enter time with 4-digit (input 0102 for 1:02)")
  1587. if inputtmp/100 >= 0 and inputtmp/100 <= 23:hour = inputtmp/100
  1588. inputtmp = inputtmp mod 100
  1589. if inputtmp >= 0 and inputtmp <= 59:minut = inputtmp
  1590. killvar 'inputtmp'
  1591. dynamic $cheatmenu['time']
  1592. }
  1593. $cheatmenu['time'] = {
  1594. if currtimecheck = 1:
  1595. if ((year mod 4 = 0) and (year mod 100 ! 0)) or (year mod 400 = 0):
  1596. monthsend[2] = 29
  1597. else
  1598. monthsend[2] = 28
  1599. end
  1600. end
  1601. gs 'daystart'
  1602. gs 'outdoors', 'temp_set'
  1603. gs 'stat'
  1604. temp_daystart = (temp_year - 2016) * 365
  1605. !! leap year correction
  1606. temp_daystart += (temp_year - 2013) / 4
  1607. copyarr 'temp_monthsend', 'monthsend'
  1608. if ((temp_year mod 4 = 0) and (temp_year mod 100 ! 0)) or (temp_year mod 400 = 0):
  1609. temp_monthsend[2] = 29
  1610. else
  1611. temp_monthsend[2] = 28
  1612. end
  1613. i=1
  1614. :temp_daystart
  1615. if temp_month > i:
  1616. temp_daystart += temp_monthsend[i]
  1617. i += 1
  1618. jump 'temp_daystart'
  1619. end
  1620. killvar 'temp_monthsend'
  1621. temp_daystart += temp_day
  1622. temp_daystart -= daystart_start
  1623. temp_daystart += 1
  1624. if currtimecheck = 1:
  1625. killvar 'currtimecheck'
  1626. if currday ! daystart:
  1627. if currday < daystart:
  1628. temp = (week + daystart - currday) mod 7
  1629. if temp <= 0: week = 7 else week = temp
  1630. else
  1631. temp = week - ((currday - daystart) mod 7)
  1632. if temp <= 0: week = 7 - temp else week = temp
  1633. end
  1634. currday = daystart
  1635. end
  1636. if currhour < (daystart-1) * 24 + hour:femcycloop = (daystart-1) * 24 + hour - currhour
  1637. :femcycloop
  1638. if femcycloop > 0:gs 'femcyc' & femcycloop -= 1 & jump 'femcycloop'
  1639. end
  1640. *clr & cla
  1641. gs 'obj_din', 'cheattabs'
  1642. '<center><h1>Cheat Menu - Manipulate Time and Weather</h1></center>'
  1643. '<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'
  1644. 'you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
  1645. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1646. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  1647. if temp_minut > 9:
  1648. if temp_hour > 9: $temptime = '<b><<temp_hour>>:<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:<<temp_minut>></b>'
  1649. else
  1650. if temp_hour > 9: $temptime = '<b><<temp_hour>>:0<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:0<<temp_minut>></b>'
  1651. end
  1652. if minut > 9:
  1653. if hour > 9: $tempcurtime = '<b><<hour>>:<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:<<minut>></b>'
  1654. else
  1655. if hour > 9: $tempcurtime = '<b><<hour>>:0<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:0<<minut>></b>'
  1656. end
  1657. if temp_daystart > daystart:
  1658. temp = (temp_daystart - daystart) mod 7
  1659. temp_week = (temp + week) mod 7
  1660. if temp_week = 0: temp_week = 7
  1661. elseif temp_daystart < daystart:
  1662. temp = (daystart - temp_daystart) mod 7
  1663. if (week - temp) mod 7 = 0:
  1664. temp_week = 7
  1665. elseif (week - temp) mod 7 < 0:
  1666. temp_week = ((week - temp) mod 7) + 7
  1667. else
  1668. temp_week = week - temp
  1669. end
  1670. else
  1671. temp_week = week
  1672. end
  1673. killvar 'temp'
  1674. 'Current time: <b><<$week[week]>></b>, <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
  1675. 'Target time: <b><<$week[temp_week]>></b>, <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
  1676. 'Daychange: <<temp_daystart - daystart>>'
  1677. *nl
  1678. '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>'
  1679. 'Select <a href="exec:dynamic $cheatmenu[''month'']">Month</a>'
  1680. $daychange = ' <a href="exec:temp_day += 7 & dynamic $cheatmenu[''time'']">+7 Day</a>'
  1681. $daychange += ' <a href="exec:temp_day += 1 & dynamic $cheatmenu[''time'']">+1 Day</a>'
  1682. $daychange += ' <a href="exec:temp_day -= 1 & dynamic $cheatmenu[''time'']">-1 Day</a>'
  1683. $daychange += ' <a href="exec:temp_day -= 7 & dynamic $cheatmenu[''time'']">-7 Day</a>'
  1684. 'Day:' +$daychange
  1685. killvar 'daychange'
  1686. $SS = 'Hour: '
  1687. if temp_hour > 0:$SS += '<a href="exec:temp_hour -= 1 & dynamic $cheatmenu[''time'']">-1</a> ' else $SS += ' '
  1688. if temp_hour > 3:$SS += '<a href="exec:temp_hour -= 4 & dynamic $cheatmenu[''time'']">-4</a> ' else $SS += ' '
  1689. if temp_hour ! 0:$SS += '<a href="exec:temp_hour = 0 & dynamic $cheatmenu[''time'']">0</a> ' else $SS += ' '
  1690. if temp_hour < 23:$SS += '<a href="exec:temp_hour += 1 & dynamic $cheatmenu[''time'']">+1</a> ' else $SS += ' '
  1691. if temp_hour < 20:$SS += '<a href="exec:temp_hour += 4 & dynamic $cheatmenu[''time'']">+4</a>'
  1692. $SS
  1693. $SS = 'Minute: '
  1694. if temp_minut > 14:$SS += '<a href="exec:temp_minut -= 15 & dynamic $cheatmenu[''time'']">-15</a> ' else $SS += ' '
  1695. if temp_minut > 0:$SS += '<a href="exec:temp_minut -= 1 & dynamic $cheatmenu[''time'']">-1</a> ' else $SS += ' '
  1696. if temp_minut ! 0:$SS += '<a href="exec:temp_minut = 0 & dynamic $cheatmenu[''time'']">0</a> ' else $SS += ' '
  1697. if temp_minut < 59:$SS += '<a href="exec:temp_minut += 1 & dynamic $cheatmenu[''time'']">+1</a> '
  1698. if temp_minut < 46:$SS += '<a href="exec:temp_minut += 15 & dynamic $cheatmenu[''time'']">+15</a>'
  1699. $SS
  1700. killvar 'SS'
  1701. *nl
  1702. 'Weather: <a href="exec:sunWeather=iif(sunWeather=0,1,0) & chWeather = 1 & gs ''outdoors'', ''weather'' & dynamic $cheatmenu[''time'']">'+iif(sunWeather=0,'Rain','Sunny')+'</a>'
  1703. *nl
  1704. '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>'
  1705. *nl
  1706. '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'
  1707. *nl
  1708. '<a href="exec:dynamic $cheatmenu[''input_time'']">Direct input time</a>'
  1709. *nl
  1710. '<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>'
  1711. '<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>'
  1712. '</td></tr></table></center>'
  1713. }
  1714. $cheatmenu['week'] = {
  1715. gs'stat'
  1716. *clr & cla
  1717. '<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
  1718. *nl
  1719. 'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
  1720. 'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
  1721. *nl
  1722. '<a href="exec:week = 1 & dynamic $cheatmenu[''time'']">Monday</a>'
  1723. '<a href="exec:week = 2 & dynamic $cheatmenu[''time'']">Tuesday</a>'
  1724. '<a href="exec:week = 3 & dynamic $cheatmenu[''time'']">Wednesday</a>'
  1725. '<a href="exec:week = 4 & dynamic $cheatmenu[''time'']">Thursday</a>'
  1726. '<a href="exec:week = 5 & dynamic $cheatmenu[''time'']">Friday</a>'
  1727. '<a href="exec:week = 6 & dynamic $cheatmenu[''time'']">Saturday</a>'
  1728. '<a href="exec:week = 7 & dynamic $cheatmenu[''time'']">Sunday</a>'
  1729. }
  1730. $cheatmenu['month'] = {
  1731. gs'stat'
  1732. *clr & cla
  1733. '<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
  1734. *nl
  1735. 'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
  1736. 'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
  1737. *nl
  1738. '<a href="exec:temp_month = 1 & $temp_month = ''January'' & dynamic $cheatmenu[''time'']">January</a>'
  1739. '<a href="exec:temp_month = 2 & $temp_month = ''February'' & dynamic $cheatmenu[''time'']">February</a>'
  1740. '<a href="exec:temp_month = 3 & $temp_month = ''March'' & dynamic $cheatmenu[''time'']">March</a>'
  1741. '<a href="exec:temp_month = 4 & $temp_month = ''April'' & dynamic $cheatmenu[''time'']">April</a>'
  1742. '<a href="exec:temp_month = 5 & $temp_month = ''May'' & dynamic $cheatmenu[''time'']">May</a>'
  1743. '<a href="exec:temp_month = 6 & $temp_month = ''June'' & dynamic $cheatmenu[''time'']">June</a>'
  1744. '<a href="exec:temp_month = 7 & $temp_month = ''July'' & dynamic $cheatmenu[''time'']">July</a>'
  1745. '<a href="exec:temp_month = 8 & $temp_month = ''August'' & dynamic $cheatmenu[''time'']">August</a>'
  1746. '<a href="exec:temp_month = 9 & $temp_month = ''September'' & dynamic $cheatmenu[''time'']">September</a>'
  1747. '<a href="exec:temp_month = 10 & $temp_month = ''October'' & dynamic $cheatmenu[''time'']">October</a>'
  1748. '<a href="exec:temp_month = 11 & $temp_month = ''November'' & dynamic $cheatmenu[''time'']">November</a>'
  1749. '<a href="exec:temp_month = 12 & $temp_month = ''December'' & dynamic $cheatmenu[''time'']">December</a>'
  1750. }
  1751. $cheatmenu['magicTable'] = {
  1752. !Build a cheat table for spells with a given Array of spell names.
  1753. ! ARGS[0] = Friendly name for table
  1754. ! ARGS[1] = the name of the arraay to use
  1755. $SpellTabName = $ARGS[0]
  1756. $ThisArrName = $ARGS[1]
  1757. maxArrSizeC = dyneval("result=arrsize('<<$ThisArrName>>')")
  1758. ! make the header for the table
  1759. $SpellListStr = "<center>
  1760. <table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
  1761. <tr><th colspan='4'><b><<$SpellTabName>></b></th></tr>
  1762. <tr>
  1763. <th></th>
  1764. <th>Spell</th>
  1765. <th>Mana</th>
  1766. <th>Description</th>
  1767. </tr>"
  1768. i = 0
  1769. :CheatDinSpell1
  1770. $ThisSpellName = dyneval("$result=<<$ThisArrName>>[<<i>>]")
  1771. if i < maxArrSizeC:
  1772. if spellKnown[$ThisSpellName] = 1:
  1773. $spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
  1774. else
  1775. $spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
  1776. end
  1777. $SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$spellName[$ThisSpellName]>></td><td><<spellMana[$ThisSpellName]>></td><td><<$spellDesc[$ThisSpellName]>></td></tr>"
  1778. i += 1
  1779. jump 'CheatDinSpell1'
  1780. end
  1781. $SpellListStr = $SpellListStr + "
  1782. </table>
  1783. </center>"
  1784. *pl func('cleanHTML',$SpellListStr)
  1785. killvar 'i'
  1786. killvar '$ThisSpellName'
  1787. killvar '$ThisArrName'
  1788. killvar 'maxArrSizeC'
  1789. killvar '$SpellTabName'
  1790. killvar '$spellFlipper'
  1791. killvar '$SpellListStr'
  1792. }
  1793. $cheatmenu['magic'] = {
  1794. gs'stat'
  1795. *clr & cla
  1796. gs 'obj_din', 'cheattabs'
  1797. '<center><h1>Cheat Menu - Magic</h1></center>'
  1798. '<center>Is magical: <a href="exec:pcs_magik += 1 & dynamic $cheatmenu[''magic'']">+1<<pcs_magik>></a></center>'
  1799. if succubusflag = 1:
  1800. '<center><a href="exec:dynamic $cheatmenu[''succubreset'']"><b>Remove & Reset Succubus status</b></a></center>'
  1801. '<center><font color="red"><b>WARNING!</b></font>: Removing succubus status will not restart your menstrual cycle, it will remain permanently disabled!</center>'
  1802. *nl
  1803. end
  1804. !Make sure spell list is initialized
  1805. if spellMana['fog'] = 0:gs 'spellList'
  1806. dynamic $cheatmenu['magicTable'], 'Combat Spells', '$combatSpells'
  1807. dynamic $cheatmenu['magicTable'], 'Non-Combat Spells', '$nonComSpells'
  1808. ! Add in Teleport Location toggles.
  1809. ! make the header for the table
  1810. $SpellListStr = "<center>
  1811. <table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
  1812. <tr><th colspan='2'><b>Known Tree Circle Locations</b></th></tr>
  1813. <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>"
  1814. i = 0
  1815. :CheatDinTP1
  1816. $ThisLocation = $tpLocations[i]
  1817. if i < arrsize('$tpLocations'):
  1818. if tpKnown[$ThisLocation] = 1:
  1819. $spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
  1820. else
  1821. $spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
  1822. end
  1823. $SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$treeCircName[$ThisLocation]>></td></tr>"
  1824. i += 1
  1825. jump 'CheatDinTP1'
  1826. end
  1827. $SpellListStr = $SpellListStr + "
  1828. </table>
  1829. </center>"
  1830. *pl func('cleanHTML',$SpellListStr)
  1831. killvar 'i'
  1832. killvar '$ThisLocation'
  1833. killvar '$spellFlipper'
  1834. killvar '$SpellListStr'
  1835. }
  1836. $cheatmenu['dynamic'] = {
  1837. $dynamicCommand = input("Enter command to execute.")
  1838. if $dynamicCommand = '':exit
  1839. dynamic $dynamicCommand
  1840. }
  1841. $cheatmenu['std_cure'] = {
  1842. venera = 0
  1843. GerpesOnce = 0
  1844. Gerpes = 0
  1845. SifacOnce = 0
  1846. Sifilis = 0
  1847. TriperOnce = 0
  1848. Triper = 0
  1849. TriperOral = 0
  1850. KandidozOnce = 0
  1851. Kandidoz = 0
  1852. }
  1853. $cheatmenu['auto_period'] = {
  1854. if cyccustom = 0:
  1855. cyccustom = 1
  1856. else
  1857. cyccustom = 0
  1858. end
  1859. dynamic $cheatmenu['setting']
  1860. }
  1861. $cheatmenu['force_preg'] = {
  1862. if mesec ! 0: mesec = 0
  1863. if FocH ! 0: FocH = 0
  1864. if EggRH ! 0: EggRH = 0
  1865. if Ovulate ! 0: Ovulate = 0
  1866. if UnfertEgg ! 0: UnfertEgg = 0
  1867. if LutH ! 0: LutH = 0
  1868. if RecovH ! 0: RecovH = 0
  1869. preg = 1
  1870. cycle = 5
  1871. !!Setting implantation date for the due date calculation
  1872. lastovulation = daystart - 5
  1873. PregChem = 150
  1874. $wombthfath = 'A sperm donor'
  1875. babyembryo += 1
  1876. if fertegg = 0:
  1877. Nextbaby = arrsize('$ChildFath')
  1878. Temppolkid = rand(0,1)
  1879. polkid[nextbaby] = Temppolkid
  1880. $kidname[nextbaby] = 'unborn'
  1881. kidage[nextbaby] = 0
  1882. daykid[nextbaby] = 0
  1883. monthkid[nextbaby] = 0
  1884. yearkid[nextbaby] = 0
  1885. Babyptype[nextbaby] = 0
  1886. $ChildFath[nextbaby] = 'A sperm donor'
  1887. $ChildThFath[nextbaby] = 'A sperm donor'
  1888. hairkid[nextbaby] = rand(0, 3)
  1889. eyeskid[nextbaby] = rand(0, 3)
  1890. ChildConType[nextbaby] = 0
  1891. Babyptype[nextbaby] = 1
  1892. else
  1893. fertegg -= 1
  1894. end
  1895. }
  1896. $cheatmenu['remove_preg'] = {
  1897. gs 'medical_din', 'remove_preg'
  1898. knowpregloss = 2
  1899. if FertEgg > 0: FertEgg = 0
  1900. }
  1901. $cheatmenu['cycle'] = {
  1902. *clr
  1903. if cycle ! 5:
  1904. EggRH = 0
  1905. LutH = 0
  1906. Ovulate = 0
  1907. UnfertEgg = 0
  1908. FertEgg = 0
  1909. RecovH = 0
  1910. mesec = 0
  1911. '<a href="exec:daylastperiod = daystart & Cycle = 0 & mesec = 96 & gs ''stat'' & dynamic $cheatmenu[''state'']">Menstration</a>'
  1912. '<a href="exec:Cycle = 1 & gs ''stat'' & dynamic $cheatmenu[''state'']">Follicular</a>'
  1913. '<a href="exec:Cycle = 2 & Ovulate = 24+rand(0,20) & EggRH = 160 + 160+rand(0, 5) & gs ''stat'' & dynamic $cheatmenu[''state'']">Ovulation</a>'
  1914. '<a href="exec:Cycle = 3 & gs ''stat'' & dynamic $cheatmenu[''state'']">Luteal</a>'
  1915. end
  1916. }
  1917. $cheatmenu['setting'] = {
  1918. *clr & cla
  1919. $BACKIMAGE = ''
  1920. if $theme['name'] = 'Custom': gs 'themes', 'check_custom_vars' & gs 'themes', 'set_custom' & gs '$menu_obnovit'
  1921. gs 'obj_din', 'settingtabs'
  1922. '<center><h1>Gameplay Settings</h1></center>'
  1923. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  1924. '<td cellspacing="0" cellpadding="20" valign="top">'
  1925. if Enable_nogameover = 1:
  1926. 'Prevent Non-Drama GAMEOVER: Currently ON - <a href="exec:Enable_nogameover = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1927. else
  1928. 'Prevent Non-Drama GAMEOVER: Currently OFF - <a href="exec:Enable_nogameover = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1929. end
  1930. if music_on = 0:
  1931. 'Music: Currently OFF - <a href="exec:music_on = 1 & music_loop = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1932. else
  1933. 'Music: Currently ON - <a href="exec:music_on = 0 & music_loop = 0 & close all & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1934. end
  1935. *nl
  1936. if disable_autosave = 1:
  1937. 'AutoSave: Currently OFF - <a href="exec:disable_autosave = 0 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1938. else
  1939. 'AutoSave: Currently ON - <a href="exec:disable_autosave = 1 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1940. end
  1941. if autohairbrush = 1:
  1942. 'Auto brush hair on mirror visit: Currently ON - <a href="exec:autohairbrush = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1943. else
  1944. 'Auto brush hair on mirror visit: Currently OFF - <a href="exec:autohairbrush = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1945. end
  1946. if enfullmorrout = 1:
  1947. 'Full morning routine enabled: Currently ON - <a href="exec:enfullmorrout = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1948. else
  1949. 'Full morning routine enabled: Currently OFF - <a href="exec:enfullmorrout = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1950. end
  1951. *nl
  1952. if cyccustom = 1:
  1953. 'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn OFF</a>'
  1954. else
  1955. 'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn ON</a>'
  1956. end
  1957. if cheatKlisma = 1:
  1958. 'Enema realism: Currently ON - <a href="exec:cheatKlisma = 1 & dynamic $cheatmenu[''enema'']">Turn OFF</a>'
  1959. else
  1960. 'Enema realism: Currently OFF - <a href="exec:cheatKlisma = 0 & dynamic $cheatmenu[''enema'']">Turn ON</a>'
  1961. end
  1962. if editpornname = 1:
  1963. 'Editing of the names of the porn movies you stared enabled: Currently ON - <a href="exec:editpornname = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
  1964. else
  1965. 'Renaming porn movies you star in: Currently OFF - <a href="exec:editpornname = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
  1966. end
  1967. *nl
  1968. '<B>Difficulty Setting</B>'
  1969. 'At the moment it only improves rate of skill gain'
  1970. $temp_diff = func('_difficulty', 'getdifficulty')
  1971. 'Difficulty: Currently at <<$temp_diff>>'
  1972. '<ul>'
  1973. '<li>set to ' + iif($temp_diff = 'easy peasy', 'easy peasy', '<a href="exec:FUNC(''_difficulty'',''setdifficulty'',''easy peasy'') & dynamic $cheatmenu[''setting'']">easy peasy</a>') + '</li>'
  1974. '<li>set to ' + iif($temp_diff = 'relaxed', 'relaxed', '<a href="exec:FUNC(''_difficulty'',''setdifficulty'',''relaxed'') & dynamic $cheatmenu[''setting'']">relaxed</a>') + '</li>'
  1975. '<li>set to ' + iif($temp_diff = 'realistic', 'realistic', '<a href="exec:FUNC(''_difficulty'',''setdifficulty'',''realistic'') & dynamic $cheatmenu[''setting'']">realistic</a>') + '</li>'
  1976. '<li>set to ' + iif($temp_diff = 'hardcore', 'hardcore', '<a href="exec:FUNC(''_difficulty'',''setdifficulty'',''hardcore'') & dynamic $cheatmenu[''setting'']">hardcore</a>') + '</li>'
  1977. '</ul>'
  1978. killvar '$temp_diff'
  1979. '</tr></table></b></center>'
  1980. }
  1981. $cheatmenu['display'] = {
  1982. *clr & cla
  1983. gs 'obj_din', 'settingtabs'
  1984. '<center><h1>Display Setting</h1></center>'
  1985. *p '<center><table cellspacing="0" cellpadding="20" valign="top"><tr><td cellspacing="0" cellpadding="20" valign="top">'
  1986. if usePopUps = 1:
  1987. 'Allow Popup Pictures: Currently ON - <a href="exec:usePopUps = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  1988. else
  1989. 'Allow Popup Pictures: Currently OFF - <a href="exec:usePopUps = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  1990. end
  1991. if set_imgh > 0: set_imgw = 0
  1992. if set_imgw > 0: set_imgh = 0
  1993. if set_imgh <= 0 and set_imgw <= 0: $set_imgh = ''
  1994. if set_imgh > 0:
  1995. '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>'
  1996. $set_imgh = 'Height = <<set_imgh>>'
  1997. else
  1998. '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>'
  1999. end
  2000. if set_imgw > 0:
  2001. '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>'
  2002. $set_imgh = 'Width = <<set_imgw>>'
  2003. else
  2004. '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>'
  2005. end
  2006. *nl
  2007. *p 'Girl Life Theme Selection: '
  2008. *p iif($theme['name'] = 'Dynamic', 'Dynamic&nbsp;|&nbsp;', '<a href="exec:gs ''themes'', ''set_dynamic'' & gs ''$menu_obnovit'' & dynamic $cheatmenu[''display'']">Dynamic</a>&nbsp;|&nbsp;')
  2009. *p iif($theme['name'] = 'White', 'White&nbsp;|&nbsp;', '<a href="exec:gs ''themes'', ''set_white'' & gs ''$menu_obnovit'' & dynamic $cheatmenu[''display'']">White</a>&nbsp;|&nbsp;')
  2010. *p iif($theme['name'] = 'Black', 'Pitch Black&nbsp;|&nbsp;', '<a href="exec:gs ''themes'', ''set_black'' & gs ''$menu_obnovit'' & dynamic $cheatmenu[''display'']">Pitch Black</a>&nbsp;|&nbsp;')
  2011. *p iif($theme['name'] = 'Modern Grey', 'Modern Grey&nbsp;|&nbsp;', '<a href="exec:gs ''themes'', ''set_gray'' & gs ''$menu_obnovit'' & dynamic $cheatmenu[''display'']">Modern Grey</a>&nbsp;|&nbsp;')
  2012. *p iif($theme['name'] = 'Custom', 'Custom&nbsp;', '<a href="exec:gs ''themes'', ''set_custom'' & gs ''$menu_obnovit'' & dynamic $cheatmenu[''display'']">Custom</a>&nbsp;')
  2013. *pl '<a href="exec:dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/preferences<<iif(theme[''is_dark''] = 0, ''_b'', ''_w'')>>.png" height="<<fsize*15/10>>"></a>'
  2014. '<font color="grey">Dynamic theme (default) will change colour based on the game hour.</font>'
  2015. *nl
  2016. if Enable_tablemap = 1:
  2017. 'List friends in table: Currently ON - <a href="exec:Enable_tablemap = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  2018. else
  2019. 'List friends in table: Currently OFF - <a href="exec:Enable_tablemap = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  2020. end
  2021. *nl
  2022. if Enable_faceturn = 1:
  2023. 'Always show face: Currently ON - <a href="exec:Enable_faceturn = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  2024. else
  2025. 'Always show face: Currently OFF - <a href="exec:Enable_faceturn = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  2026. end
  2027. *nl
  2028. if Enable_Android = 1:
  2029. 'Set Fontsize for Status: Unsupported'
  2030. 'Android Mode:Currently ON - <a href="exec:Enable_Android = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  2031. ! 'click <a href="exec:*clr & cla & FUNC (''$menu_obnovit'')">refresh</a> to refresh status window.'
  2032. 'click <B>refresh</B> on top of status window to renew.'
  2033. else
  2034. 'Android Mode: Currently OFF - <a href="exec:Enable_Android = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  2035. end
  2036. *nl
  2037. if loadg_show_debug = 0:
  2038. 'Show Debug window on save load: Currently OFF - <a href="exec:loadg_show_debug = 1 & debug_warning_closed = 1 & showobjs 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
  2039. else
  2040. 'Show Debug window on save load: Currently ON - <a href="exec:loadg_show_debug = 0 & debug_warning_closed = 1 & showobjs 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
  2041. end
  2042. *p '</td></tr></table></center>'
  2043. }
  2044. $cheatmenu['theme_customize_input'] = {
  2045. if $ARGS[0] = 'fname':
  2046. $temp_input = $trim($input('Enter Font name:'))
  2047. if $temp_input ! '': $custom_theme['fname'] = $temp_input
  2048. elseif $ARGS[0] = 'fsize':
  2049. $temp_input = $trim($input('Enter Font size:'))
  2050. if $temp_input ! '':
  2051. if isnum($temp_input):
  2052. custom_theme['fsize'] = iif(val($temp_input) <= 9, 9, val($temp_input))
  2053. else
  2054. msg 'invalid input'
  2055. end
  2056. end
  2057. elseif $ARGS[0] = 'increment':
  2058. $temp_input = $trim($input('Enter increment:'))
  2059. if $temp_input ! '':
  2060. if isnum($temp_input):
  2061. custom_theme['increment'] = iif(val($temp_input) <= 1, 1, val($temp_input))
  2062. else
  2063. msg 'invalid input'
  2064. end
  2065. end
  2066. elseif $ARGS[0] = 'rgb':
  2067. result = ARGS[2]
  2068. $temp_input = $ucase($trim($input('Enter <<$ARGS[1]>> color component in 0 - 255 or 00 - FF format')))
  2069. if $temp_input ! '':
  2070. if isnum($temp_input) ! 0:
  2071. if val($temp_input) < 0 or val($temp_input) > 255:
  2072. msg 'invalid input'
  2073. else
  2074. temp_result = val($temp_input)
  2075. end
  2076. else
  2077. if len($temp_input) > 2 or instr('0123456789ABCDEF', $mid($temp_input, 1, 1)) = 0 or instr('0123456789ABCDEF', $mid($temp_input, 2, 1)) = 0:
  2078. msg 'invalid input'
  2079. else
  2080. temp_result = func('shortgs', 'hex_str_to_int', $temp_input)
  2081. end
  2082. end
  2083. end
  2084. if arrsize('temp_result') = 1:
  2085. if $ARGS[1] = 'red':
  2086. result = ((ARGS[2] and (-256)) or temp_result)
  2087. elseif $ARGS[1] = 'green':
  2088. result = ((ARGS[2] and (-65281)) or (temp_result * 256))
  2089. elseif $ARGS[1] = 'blue':
  2090. result = ((ARGS[2] and (-16711681)) or (temp_result * 65536))
  2091. end
  2092. end
  2093. killvar 'temp_result'
  2094. elseif $ARGS[0] = 'hex':
  2095. result = ARGS[1]
  2096. $temp_input = $ucase($trim($input('Enter color in ABC or AABBCC format')))
  2097. if $temp_input ! '':
  2098. $temp_input = $replace($temp_input, '#')
  2099. temp_length = len($temp_input)
  2100. if temp_length = 3 or temp_length = 6:
  2101. temp_index = 1
  2102. :is_hex_loop
  2103. if instr('0123456789ABCDEF', $mid($temp_input, temp_index, 1)) = 0:
  2104. msg 'invalid input' & jump 'invalid_input_exit'
  2105. end
  2106. if temp_index < temp_length: temp_index += 1 & jump 'is_hex_loop'
  2107. killvar 'temp_index'
  2108. if temp_length = 3:
  2109. $temp_red = $mid($temp_input, 1, 1) & $temp_red = $temp_red + $temp_red
  2110. $temp_green = $mid($temp_input, 2, 1) & $temp_green = $temp_green + $temp_green
  2111. $temp_blue = $mid($temp_input, 3, 1) & $temp_blue = $temp_blue + $temp_blue
  2112. else
  2113. $temp_red = $mid($temp_input, 1, 2)
  2114. $temp_green = $mid($temp_input, 3, 2)
  2115. $temp_blue = $mid($temp_input, 5, 2)
  2116. end
  2117. result = rgb(func('shortgs', 'hex_str_to_int', $temp_red), func('shortgs', 'hex_str_to_int', $temp_green), func('shortgs', 'hex_str_to_int', $temp_blue))
  2118. killvar '$temp_red' & killvar '$temp_green' & killvar '$temp_blue'
  2119. else
  2120. msg 'invalid input'
  2121. end
  2122. :invalid_input_exit
  2123. killvar 'temp_length'
  2124. end
  2125. end
  2126. killvar '$temp_input'
  2127. }
  2128. $cheatmenu['extract_color_component'] = {
  2129. if $ARGS[0] = 'red':
  2130. result = (ARGS[1] and 255)
  2131. elseif $ARGS[0] = 'green':
  2132. result = ((ARGS[1] and 65280) / 256)
  2133. elseif $ARGS[0] = 'blue':
  2134. result = ((ARGS[1] and 16711680) / 65536)
  2135. end
  2136. }
  2137. $cheatmenu['theme_customize_increment'] = {
  2138. if $ARGS[0] = 'rgb':
  2139. result = dyneval($cheatmenu['extract_color_component'], $ARGS[1], ARGS[2]) + ARGS[3]
  2140. result = iif(result > 255, result - 256, iif(result < 0, 256 + result, result))
  2141. if $ARGS[1] = 'red':
  2142. result = ((ARGS[2] and (-256)) or result)
  2143. elseif $ARGS[1] = 'green':
  2144. result = ((ARGS[2] and (-65281)) or (result * 256))
  2145. elseif $ARGS[1] = 'blue':
  2146. result = ((ARGS[2] and (-16711681)) or (result * 65536))
  2147. else
  2148. result = ARGS[2]
  2149. end
  2150. end
  2151. }
  2152. $cheatmenu['theme_customize_print_color_line'] = {
  2153. $result = '<a href="exec: <<$ARGS[1]>> = dyneval($cheatmenu[''theme_customize_increment''], ''rgb'', ''<<$ARGS[0]>>'', <<$ARGS[1]>>, -custom_theme[''increment'']) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/less<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2154. $result += '&nbsp;<<dyneval($cheatmenu[''extract_color_component''], ''<<$ARGS[0]>>'', dyneval(''result = <<$ARGS[1]>>''))>>&nbsp;'
  2155. $result += '<a href="exec: <<$ARGS[1]>> = dyneval($cheatmenu[''theme_customize_increment''], ''rgb'', ''<<$ARGS[0]>>'', <<$ARGS[1]>>, custom_theme[''increment'']) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/more<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2156. $result += '&nbsp;'
  2157. $result += '<a href="exec: <<$ARGS[1]>> = dyneval($cheatmenu[''theme_customize_input''], ''rgb'', ''<<$ARGS[0]>>'', <<$ARGS[1]>>) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2158. }
  2159. $cheatmenu['theme_customize'] = {
  2160. *clr
  2161. gs 'themes', 'check_custom_vars'
  2162. if $theme['name'] = 'Custom': gs 'themes', 'set_custom' & gs '$menu_obnovit'
  2163. menu_page = -1
  2164. gs 'obj_din', 'settingtabs'
  2165. cla
  2166. act 'Return': menu_page = 1 & dynamic $cheatmenu['display']
  2167. act 'Presets': dynamic $cheatmenu['theme_presets']
  2168. act 'Export': dynamic $cheatmenu['theme_export']
  2169. act 'Import': killvar 'menu_page' & gt 'initg', 'set_game_set'
  2170. '<center><h1>Customize Theme</h1></center>'
  2171. *p '<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr><td bgcolor="black" width="50%" cellspacing="0" cellpadding="20" valign="top"><font face="Tahoma" size="4" color="white">'
  2172. $icon_selector = '_w'
  2173. icon_height = 13
  2174. !! --- FONT ---
  2175. *p 'Font Family: <<$custom_theme[''fname'']>>&nbsp;'
  2176. *pl '<a href="exec: dynamic $cheatmenu[''theme_customize_input''], ''fname'' & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2177. *p 'Font Size:&nbsp;'
  2178. *p '<a href="exec: custom_theme[''fsize''] = iif(custom_theme[''fsize''] <= 9, 9, custom_theme[''fsize''] - 1) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/less<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2179. *p '&nbsp;<<custom_theme[''fsize'']>>&nbsp;'
  2180. *p '<a href="exec: custom_theme[''fsize''] += 1 & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/more<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2181. *pl '&nbsp;<a href="exec: dynamic $cheatmenu[''theme_customize_input''], ''fsize'' & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2182. !! --- BCOLOR ---
  2183. *nl
  2184. *p 'BG Color: <<func(''shortgs'', ''rgb_to_hex'', custom_theme[''bcolor''])>>&nbsp;'
  2185. *pl '<a href="exec: custom_theme[''bcolor''] = dyneval($cheatmenu[''theme_customize_input''], ''hex'', custom_theme[''bcolor'']) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2186. *p 'R:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'red', 'custom_theme[''bcolor'']') + '&nbsp;|&nbsp;'
  2187. *p 'G:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'green', 'custom_theme[''bcolor'']') + '&nbsp;|&nbsp;'
  2188. *pl 'B:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'blue', 'custom_theme[''bcolor'']')
  2189. !! --- FCOLOR ---
  2190. *nl
  2191. *p 'FG (text) Color: <<func(''shortgs'', ''rgb_to_hex'', custom_theme[''fcolor''])>>&nbsp;'
  2192. *pl '<a href="exec: custom_theme[''fcolor''] = dyneval($cheatmenu[''theme_customize_input''], ''hex'', custom_theme[''fcolor'']) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2193. *p 'R:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'red', 'custom_theme[''fcolor'']') + '&nbsp;|&nbsp;'
  2194. *p 'G:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'green', 'custom_theme[''fcolor'']') + '&nbsp;|&nbsp;'
  2195. *pl 'B:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'blue', 'custom_theme[''fcolor'']')
  2196. !! --- LCOLOR ---
  2197. *nl
  2198. *p 'Link Color: <<func(''shortgs'', ''rgb_to_hex'', custom_theme[''lcolor''])>>&nbsp;'
  2199. *pl '<a href="exec: custom_theme[''lcolor''] = dyneval($cheatmenu[''theme_customize_input''], ''hex'', custom_theme[''lcolor'']) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2200. *p 'R:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'red', 'custom_theme[''lcolor'']') + '&nbsp;|&nbsp;'
  2201. *p 'G:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'green', 'custom_theme[''lcolor'']') + '&nbsp;|&nbsp;'
  2202. *pl 'B:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'blue', 'custom_theme[''lcolor'']')
  2203. !! --- TABLE BG ---
  2204. *nl
  2205. *p 'Table BG: <<func(''shortgs'', ''rgb_to_hex'', custom_theme[''table_bg''])>>&nbsp;'
  2206. *pl '<a href="exec: custom_theme[''table_bg''] = dyneval($cheatmenu[''theme_customize_input''], ''hex'', custom_theme[''table_bg'']) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2207. *p 'R:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'red', 'custom_theme[''table_bg'']') + '&nbsp;|&nbsp;'
  2208. *p 'G:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'green', 'custom_theme[''table_bg'']') + '&nbsp;|&nbsp;'
  2209. *pl 'B:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'blue', 'custom_theme[''table_bg'']')
  2210. !! --- TABLE BG ALT ---
  2211. *nl
  2212. *p 'Alt Table BG: <<func(''shortgs'', ''rgb_to_hex'', custom_theme[''table_bg_alt''])>>&nbsp;'
  2213. *pl '<a href="exec: custom_theme[''table_bg_alt''] = dyneval($cheatmenu[''theme_customize_input''], ''hex'', custom_theme[''table_bg_alt'']) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2214. *p 'R:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'red', 'custom_theme[''table_bg_alt'']') + '&nbsp;|&nbsp;'
  2215. *p 'G:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'green', 'custom_theme[''table_bg_alt'']') + '&nbsp;|&nbsp;'
  2216. *pl 'B:&nbsp;' + dyneval($cheatmenu['theme_customize_print_color_line'], 'blue', 'custom_theme[''table_bg_alt'']')
  2217. !! --- DARK MODE ---
  2218. *nl
  2219. *p 'Dark Mode&nbsp;'
  2220. if $custom_theme['is_dark'] = '0':
  2221. *pl '<a href="exec: $custom_theme[''is_dark''] = ''1'' & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/box<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2222. else
  2223. *pl '<a href="exec: $custom_theme[''is_dark''] = ''0'' & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/check<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2224. end
  2225. !! --- INCREMENT ---
  2226. *nl
  2227. if custom_theme['increment'] = 0: custom_theme['increment'] = 16
  2228. *p 'Increment:&nbsp;'
  2229. *p '<a href="exec: custom_theme[''increment''] = iif(custom_theme[''increment''] <= 1, 1, custom_theme[''increment''] - 1) & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/less<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2230. *p '&nbsp;<<custom_theme[''increment'']>>&nbsp;'
  2231. *p '<a href="exec: custom_theme[''increment''] += 1 & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/more<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2232. *pl '&nbsp;<a href="exec: dynamic $cheatmenu[''theme_customize_input''], ''increment'' & dynamic $cheatmenu[''theme_customize'']"><img src="images/system/ui/pencil<<$icon_selector>>.png" height="<<icon_height>>"></img></a>'
  2233. *p '</font></td>'
  2234. !! --- LOREM IPSUM ---
  2235. $icon_selector = iif(theme['is_dark'] = 0, '_b', '_w')
  2236. icon_height = fsize * 15 / 10
  2237. *p '<td width="50%" cellspacing="0" cellpadding="20" valign="top">'
  2238. *p '"Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt mollit anim id est laborum."'
  2239. *p '<table width="100%" cellspacing="0" cellpadding="20">'
  2240. *p '<tr><td></td></tr>'
  2241. $temp_bgcolor = func('themes', 'alt_color', $temp_bgcolor)
  2242. *p '<tr bgcolor="<<$temp_bgcolor>>"><td>Table Color</td><td align="center" width="6%"><img src="images/system/ui/more<<$icon_selector>>.png" height="<<icon_height>>"></td></tr>'
  2243. $temp_bgcolor = func('themes', 'alt_color', $temp_bgcolor)
  2244. *p '<tr bgcolor="<<$temp_bgcolor>>"><td>Alt Table Color</td><td align="center" width="6%"><img src="images/system/ui/less<<$icon_selector>>.png" height="<<icon_height>>"></td></tr>'
  2245. $temp_bgcolor = func('themes', 'alt_color', $temp_bgcolor)
  2246. *p '<tr bgcolor="<<$temp_bgcolor>>"><td>Table Color</td><td align="center" width="6%"><img src="images/system/ui/preferences<<$icon_selector>>.png" height="<<icon_height>>"></td></tr>'
  2247. *p '</table>'
  2248. *p '</td></tr></table></center>'
  2249. killvar '$icon_selector' & killvar 'icon_height' & killvar '$temp_bgcolor'
  2250. *nl
  2251. '<b>The standard Lorem Ipsum passage, used since the 1500s</b>'
  2252. *nl
  2253. '"Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt mollit anim id est laborum."'
  2254. *nl
  2255. '<b>Section 1.10.32 of "de Finibus Bonorum et Malorum", written by Cicero in 45 BC</b>'
  2256. *nl
  2257. '"Sed ut perspiciatis unde omnis iste natus error sit voluptatem accusantium doloremque laudantium, totam rem aperiam, eaque ipsa quae ab illo inventore veritatis et quasi architecto beatae vitae dicta sunt explicabo. Nemo enim ipsam voluptatem quia voluptas sit aspernatur aut odit aut fugit, sed quia consequuntur magni dolores eos qui ratione voluptatem sequi nesciunt. Neque porro quisquam est, qui dolorem ipsum quia dolor sit amet, consectetur, adipisci velit, sed quia non numquam eius modi tempora incidunt ut labore et dolore magnam aliquam quaerat voluptatem. Ut enim ad minima veniam, quis nostrum exercitationem ullam corporis suscipit laboriosam, nisi ut aliquid ex ea commodi consequatur? Quis autem vel eum iure reprehenderit qui in ea voluptate velit esse quam nihil molestiae consequatur, vel illum qui dolorem eum fugiat quo voluptas nulla pariatur?"'
  2258. *nl
  2259. '<b>1914 translation by H. Rackham</b>'
  2260. *nl
  2261. '"But I must explain to you how all this mistaken idea of denouncing pleasure and praising pain was born and I will give you a complete account of the system, and expound the actual teachings of the great explorer of the truth, the master-builder of human happiness. No one rejects, dislikes, or avoids pleasure itself, because it is pleasure, but because those who do not know how to pursue pleasure rationally encounter consequences that are extremely painful. Nor again is there anyone who loves or pursues or desires to obtain pain of itself, because it is pain, but because occasionally circumstances occur in which toil and pain can procure him some great pleasure. To take a trivial example, which of us ever undertakes laborious physical exercise, except to obtain some advantage from it? But who has any right to find fault with a man who chooses to enjoy a pleasure that has no annoying consequences, or one who avoids a pain that produces no resultant pleasure?"'
  2262. *nl
  2263. '<b>Section 1.10.33 of "de Finibus Bonorum et Malorum", written by Cicero in 45 BC</b>'
  2264. *nl
  2265. '"At vero eos et accusamus et iusto odio dignissimos ducimus qui blanditiis praesentium voluptatum deleniti atque corrupti quos dolores et quas molestias excepturi sint occaecati cupiditate non provident, similique sunt in culpa qui officia deserunt mollitia animi, id est laborum et dolorum fuga. Et harum quidem rerum facilis est et expedita distinctio. Nam libero tempore, cum soluta nobis est eligendi optio cumque nihil impedit quo minus id quod maxime placeat facere possimus, omnis voluptas assumenda est, omnis dolor repellendus. Temporibus autem quibusdam et aut officiis debitis aut rerum necessitatibus saepe eveniet ut et voluptates repudiandae sint et molestiae non recusandae. Itaque earum rerum hic tenetur a sapiente delectus, ut aut reiciendis voluptatibus maiores alias consequatur aut perferendis doloribus asperiores repellat."'
  2266. *nl
  2267. '<b>1914 translation by H. Rackham</b>'
  2268. *nl
  2269. '"On the other hand, we denounce with righteous indignation and dislike men who are so beguiled and demoralized by the charms of pleasure of the moment, so blinded by desire, that they cannot foresee the pain and trouble that are bound to ensue; and equal blame belongs to those who fail in their duty through weakness of will, which is the same as saying through shrinking from toil and pain. These cases are perfectly simple and easy to distinguish. In a free hour, when our power of choice is untrammelled and when nothing prevents our being able to do what we like best, every pleasure is to be welcomed and every pain avoided. But in certain circumstances and owing to the claims of duty or the obligations of business it will frequently occur that pleasures have to be repudiated and annoyances accepted. The wise man therefore always holds in these matters to this principle of selection: he rejects pleasures to secure other greater pleasures, or else he endures pains to avoid worse pains."'
  2270. }
  2271. $cheatmenu['theme_presets'] = {
  2272. cla
  2273. act 'Return': dynamic $cheatmenu['theme_customize']
  2274. act 'White': gs 'themes', 'set_white' & dynamic $cheatmenu['theme_presets_copy']
  2275. act 'Black': gs 'themes', 'set_black' & dynamic $cheatmenu['theme_presets_copy']
  2276. act 'Modern Grey': gs 'themes', 'set_gray' & dynamic $cheatmenu['theme_presets_copy']
  2277. }
  2278. $cheatmenu['theme_presets_copy'] = {
  2279. $custom_theme['fname'] = $theme['fname']
  2280. custom_theme['fsize'] = theme['fsize']
  2281. custom_theme['bcolor'] = theme['bcolor']
  2282. custom_theme['fcolor'] = theme['fcolor']
  2283. custom_theme['lcolor'] = theme['lcolor']
  2284. custom_theme['table_bg'] = theme['table_bg']
  2285. custom_theme['table_bg_alt'] = theme['table_bg_alt']
  2286. $custom_theme['is_dark'] = str(theme['is_dark'])
  2287. gs 'themes', 'set_custom'
  2288. dynamic $cheatmenu['theme_customize']
  2289. }
  2290. $cheatmenu['theme_export'] = {
  2291. *clr & cla
  2292. act 'Return': dynamic $cheatmenu['theme_customize']
  2293. "$custom_theme['fname'] = '<<$custom_theme['fname']>>'"
  2294. "custom_theme['fsize'] = <<custom_theme['fsize']>>"
  2295. ""
  2296. "custom_theme['bcolor'] = <<custom_theme['bcolor']>>"
  2297. "custom_theme['fcolor'] = <<custom_theme['fcolor']>>"
  2298. "custom_theme['lcolor'] = <<custom_theme['lcolor']>>"
  2299. ""
  2300. "custom_theme['table_bg'] = <<custom_theme['table_bg']>>"
  2301. "custom_theme['table_bg_alt'] = <<custom_theme['table_bg_alt']>>"
  2302. ""
  2303. "$custom_theme['is_dark'] = '<<$custom_theme['is_dark']>>'"
  2304. }
  2305. $cheatmenu['status'] = {
  2306. *clr & cla
  2307. gs 'obj_din', 'settingtabs'
  2308. gs 'stat'
  2309. '<center><h1>Status Window Settings</h1></center>'
  2310. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  2311. '<td cellspacing="0" cellpadding="20" valign="top">'
  2312. if disable_LoadSave = 0:
  2313. 'Save/Load Buttons: Currently Image - <a href="exec:disable_LoadSave = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
  2314. elseif disable_LoadSave = 1:
  2315. 'Save/Load Buttons: Currently OFF - <a href="exec:disable_LoadSave = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Image</a>'
  2316. elseif disable_LoadSave = 2:
  2317. 'Save/Load Buttons: Currently Text - <a href="exec:disable_LoadSave = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  2318. end
  2319. *nl
  2320. !disabled inner thought font selection during char creation, as it breaks menu.
  2321. if settingmode = 0:
  2322. '<a href="exec:gs ''shortgs'',''fonts'', ''$cheatmenu[''''display'''']'',''$OpenInnerThought'',''$CloseInnerThought'' ">Set</a> the font style of inner thoughts'
  2323. $OpenInnerThought+'Oh my god, what will the neighbours think of us?'+$CloseInnerThought
  2324. end
  2325. *nl
  2326. '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'
  2327. *nl
  2328. '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>'
  2329. if set_weatherht < 50:
  2330. set_weatherht = 50
  2331. elseif set_weatherht > 100:
  2332. set_weatherht = 100
  2333. end
  2334. '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>'
  2335. if set_miconht < 10:
  2336. set_miconht = 10
  2337. elseif set_miconht > 75:
  2338. set_miconht = 75
  2339. end
  2340. if cheatStatusIcons = 0:
  2341. 'Status icons: Click to <a href="exec:cheatStatusIcons = 1 & disable_show_icons = 1 & gs ''stat'' & dynamic $cheatmenu[''status'']">hide</a> them.'
  2342. '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>'
  2343. elseif cheatStatusIcons = 1:
  2344. 'Status icons: Click to <a href="exec: cheatStatusIcons = 0 & disable_show_icons = 0 & gs ''stat'' & dynamic $cheatmenu[''status'']">show</a> them.'
  2345. end
  2346. if set_siconht < 10:
  2347. set_siconht = 10
  2348. elseif set_siconht > 75:
  2349. set_siconht = 75
  2350. end
  2351. if ETOmenu = 1:
  2352. 'Status Display mode: Currently Text - <a href="exec:ETOmenu = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Scale Bar</a>'
  2353. else
  2354. 'Status Display mode: Currently Scale Bar - <a href="exec:ETOmenu = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
  2355. end
  2356. if Enable_scalepic = 1:
  2357. 'Scalebar is now as <b>Image</b>, you can switch to <a href="exec:Enable_scalepic = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Character</a> or <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
  2358. if Enable_scalewidth > 0:
  2359. '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>'
  2360. else
  2361. '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>'
  2362. end
  2363. if Enable_scaleheight > 0:
  2364. '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>'
  2365. else
  2366. '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>'
  2367. end
  2368. elseif Enable_scalepic = 2:
  2369. '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 = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
  2370. if cheatStatusBars = 1:
  2371. 'Set status bar size: Currently Small - <a href="exec:cheatStatusBars = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Set large</a>'
  2372. else
  2373. 'Set status bar size: Currently Large - <a href="exec:cheatStatusBars = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Set small</a>'
  2374. end
  2375. elseif Enable_scalepic = 0:
  2376. 'Scalebar is now as <b>Table</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''">Character</a>'
  2377. end
  2378. if Enable_statfsize<0:Enable_statfsize=0
  2379. if Enable_statfsize > 0:
  2380. '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>'
  2381. else
  2382. 'Set Fontsize for Status: Currently OFF - <a href="exec:Enable_statfsize=input(''Enter fontsize'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  2383. end
  2384. *nl
  2385. '<center><B>Status Window toolbar</B></center>'
  2386. if Enable_showattr = 1:
  2387. 'Show More attribute: Currently ON - <a href="exec:Enable_showattr = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  2388. else
  2389. 'Show More attribute: Currently OFF - <a href="exec:Enable_showattr = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  2390. end
  2391. if Enable_showskill = 1:
  2392. 'Show skill: Currently ON - <a href="exec:Enable_showskill = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  2393. else
  2394. 'Show skill: Currently OFF - <a href="exec:Enable_showskill = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  2395. end
  2396. if Enable_showrelation = 1:
  2397. 'Show relations: Currently ON - <a href="exec:Enable_showrelation = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  2398. else
  2399. 'Show relations: Currently OFF - <a href="exec:Enable_showrelation = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  2400. end
  2401. if Enable_showstatimg = 1:
  2402. 'Show image toolbar: Currently ON - <a href="exec:Enable_showstatimg = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
  2403. else
  2404. 'Show image toolbar: Currently OFF - <a href="exec:Enable_showstatimg = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
  2405. end
  2406. *nl
  2407. if Enable_showstatimg = 1:
  2408. !control image toolbar position
  2409. '<center><B>Image Toolbar Settings</B></center>'
  2410. $stat_temp_text = '<br>Image toolbar position: <B>'
  2411. if Enable_statimg_loc = 0:
  2412. $stat_temp_text += 'Middle'
  2413. elseif Enable_statimg_loc = 1:
  2414. $stat_temp_text += 'Top'
  2415. elseif Enable_statimg_loc = 2:
  2416. $stat_temp_text += 'Bottom'
  2417. else
  2418. $stat_temp_text += 'ERROR! please reset it'
  2419. end
  2420. $stat_temp_text += '</B>. You can move it to '
  2421. if Enable_statimg_loc ! 0:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Middle</a>'
  2422. if Enable_statimg_loc ! 1:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=1 & dynamic $cheatmenu[''status''] & gs ''stat''">Top</a>'
  2423. if Enable_statimg_loc ! 2:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=2 & dynamic $cheatmenu[''status''] & gs ''stat''">Bottom</a>'
  2424. $stat_temp_text
  2425. killvar 'stat_temp_text'
  2426. !End control image toolbar position
  2427. if set_statimgh > 0: set_statimgw = 0
  2428. if set_statimgw > 0: set_statimgh = 0
  2429. if set_statimgh <= 0 and set_statimgw <= 0: $set_statimgh = ''
  2430. if set_statimgh > 0:
  2431. '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>'
  2432. $set_statimgh = 'height = <<set_statimgh>>'
  2433. else
  2434. '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>'
  2435. end
  2436. if set_statimgw > 0:
  2437. '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>'
  2438. $set_statimgh = 'width = <<set_statimgw>>'
  2439. else
  2440. '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>'
  2441. end
  2442. end
  2443. !<a href="exec:gs ''Cheatmenu_din'' & dynamic $cheatmenu[''status''] & gs ''stat''"><img src="images/system/phone/theme/<<$phonetheme_name[pcs_phonetheme]>>/icon_settings.png"></a>
  2444. '</tr></table></b></center>'
  2445. }
  2446. $cheatmenu['theme'] = {
  2447. *clr & cla
  2448. gs 'obj_din', 'settingtabs'
  2449. '<center><h1>Phone Theme Menu</h1></center>'
  2450. '<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
  2451. *nl
  2452. if pcs_phonetheme = 0: $phoneNameTemp = 'Standard'
  2453. if pcs_phonetheme = 1: $phoneNameTemp = 'Bimbo'
  2454. if pcs_phonetheme = 2: $phoneNameTemp = 'Aluminus'
  2455. if pcs_phonetheme = 3: $phoneNameTemp = 'Bottlecapped'
  2456. if pcs_phonetheme = 4: $phoneNameTemp = 'Galactic'
  2457. if pcs_phonetheme = 5: $phoneNameTemp = 'Vectored'
  2458. if pcs_phonetheme = 6: $phoneNameTemp = 'Veneer'
  2459. if pcs_phonetheme = 7: $phoneNameTemp = 'Voidwalker'
  2460. if pcs_phonetheme = 8: $phoneNameTemp = 'Voidwalker Red'
  2461. if pcs_phonetheme = 9: $phoneNameTemp = 'Voidwalker Toxic'
  2462. if pcs_phonetheme = 10: $phoneNameTemp = 'Gopnik'
  2463. if pcs_phonetheme = 11: $phoneNameTemp = 'Sports'
  2464. if pcs_phonetheme = 12: $phoneNameTemp = 'Succubus'
  2465. if pcs_phonetheme = 13: $phoneNameTemp = 'Woodshop'
  2466. 'Current theme: <b><<$phoneNameTemp>></b>'
  2467. *nl
  2468. 'Choose from the available themes'
  2469. *nl
  2470. i = 0
  2471. :phonethemeloop
  2472. 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>'
  2473. i += 1
  2474. if i <= ARRSIZE('phonetheme') and i <= 3:
  2475. jump 'phonethemeloop'
  2476. elseif i <= ARRSIZE('phonetheme') and i = 4:
  2477. '</tr><tr>'
  2478. jump 'phonethemeloop'
  2479. elseif i <= ARRSIZE('phonetheme') and i > 4 and i <= 7:
  2480. jump 'phonethemeloop'
  2481. elseif i <= ARRSIZE('phonetheme') and i = 8:
  2482. '</tr><tr>'
  2483. jump 'phonethemeloop'
  2484. elseif i <= ARRSIZE('phonetheme') and i > 8 and i <= 11:
  2485. jump 'phonethemeloop'
  2486. elseif i <= ARRSIZE('phonetheme') and i = 12:
  2487. '</tr><tr>'
  2488. jump 'phonethemeloop'
  2489. elseif i <= ARRSIZE('phonetheme') and i > 12 and i <= 15:
  2490. jump 'phonethemeloop'
  2491. end
  2492. '</tr></table></b></center>'
  2493. }
  2494. $cheatmenu['pain'] = {
  2495. if pain['head'] < 0: pain['head'] = 0
  2496. if pain['hair'] < 0: pain['hair'] = 0
  2497. if pain['ears'] < 0: pain['ears'] = 0
  2498. if pain['eyebrows'] < 0: pain['eyebrows'] = 0
  2499. if pain['eyes'] < 0: pain['eyes'] = 0
  2500. if pain['cheeks'] < 0: pain['cheeks'] = 0
  2501. if pain['nose'] < 0: pain['nose'] = 0
  2502. if pain['mouth'] < 0: pain['mouth'] = 0
  2503. if pain['lips'] < 0: pain['lips'] = 0
  2504. if pain['tongue'] < 0: pain['tongue'] = 0
  2505. if pain['throat'] < 0: pain['throat'] = 0
  2506. if pain['neck'] < 0: pain['neck'] = 0
  2507. if pain['back'] < 0: pain['back'] = 0
  2508. if pain['asscheeks'] < 0: pain['asscheeks'] = 0
  2509. if pain['asshole'] < 0: pain['asshole'] = 0
  2510. if pain['hips'] < 0: pain['hips'] = 0
  2511. if pain['thighs'] < 0: pain['thighs'] = 0
  2512. if pain['legL'] < 0: pain['legL'] = 0
  2513. if pain['legR'] < 0: pain['legR'] = 0
  2514. if pain['feet'] < 0: pain['feet'] = 0
  2515. if pain['toes'] < 0: pain['toes'] = 0
  2516. if pain['shoulders'] < 0: pain['shoulders'] = 0
  2517. if pain['armL'] < 0: pain['armL'] = 0
  2518. if pain['armR'] < 0: pain['armR'] = 0
  2519. if pain['hands'] < 0: pain['hands'] = 0
  2520. if pain['fingers'] < 0: pain['fingers'] = 0
  2521. if pain['chest'] < 0: pain['chest'] = 0
  2522. if pain['breasts'] < 0: pain['breasts'] = 0
  2523. if pain['nipples'] < 0: pain['nipples'] = 0
  2524. if pain['ribs'] < 0: pain['ribs'] = 0
  2525. if pain['tummy'] < 0: pain['tummy'] = 0
  2526. if pain['pubic'] < 0: pain['pubic'] = 0
  2527. if pain['vaginal'] < 0: pain['vaginal'] = 0
  2528. if pain['clitoris'] < 0: pain['clitoris'] = 0
  2529. if pain['urethra'] < 0: pain['urethra'] = 0
  2530. if pain['cervix'] < 0: pain['cervix'] = 0
  2531. *clr & cla
  2532. gs 'obj_din', 'cheattabs'
  2533. '<center><h1>Cheat Menu - Pain Management</h1></center>'
  2534. '<center><a href="exec:killvar ''pain'' & dynamic $cheatmenu[''pain'']">No pain</a></center>'
  2535. *nl
  2536. '<center><table width="90%" cellspacing="0" cellpadding="0" valign="top">'
  2537. '<tr><td width="50%" cellpadding="10" valign="top">'
  2538. '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>'
  2539. '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>'
  2540. '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>'
  2541. 'pain[eyebrows] = <<pain[''eyebrows'']>> <a href="exec:pain[''eyebrows''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyebrows''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
  2542. '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>'
  2543. '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>'
  2544. '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>'
  2545. '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>'
  2546. '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>'
  2547. '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>'
  2548. '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>'
  2549. '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>'
  2550. '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>'
  2551. '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>'
  2552. '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>'
  2553. '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>'
  2554. '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>'
  2555. '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>'
  2556. '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>'
  2557. '</td><td width="50%" cellpadding="10" valign="top">'
  2558. '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>'
  2559. '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>'
  2560. '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>'
  2561. '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>'
  2562. '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>'
  2563. '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>'
  2564. '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>'
  2565. '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>'
  2566. '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>'
  2567. '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>'
  2568. '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>'
  2569. '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>'
  2570. '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>'
  2571. '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>'
  2572. '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>'
  2573. '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>'
  2574. '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>'
  2575. '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>'
  2576. '</td></tr></table></center>'
  2577. *nl
  2578. 'You may still have pain from gaping or having been spanked, you can clear these using "Cure all ailments." in "Cheat Menu - Character State Changes"'
  2579. 'You currently have vaginal gaping of <<vgape>>'
  2580. 'You currently have anal gaping of <<agape>>'
  2581. 'You currently have spanked level <<spanked>>'
  2582. }
  2583. $cheatmenu['DNA'] = {
  2584. *clr & cla
  2585. gs 'obj_din', 'cheattabs'
  2586. '<center><h1>Cheat Menu - DNA Generation</h1></center>'
  2587. '<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
  2588. '<td cellspacing="0" cellpadding="20" valign="top">'
  2589. '<center>DNA string generation<br>If parents are not in game, leave the respective IDs empty</center>'
  2590. *nl
  2591. if $cheatDNAC ! '':
  2592. '<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>'
  2593. npctemp = 0
  2594. killvar 'cheatDNAM'
  2595. killvar 'cheatDNAF'
  2596. :npcparentfind
  2597. if $npc_dna['A<<npctemp>>'] ! '':
  2598. if mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
  2599. $cheatDNAM = 'A<<npctemp>>'
  2600. elseif mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
  2601. $cheatDNAF = 'A<<npctemp>>'
  2602. end
  2603. end
  2604. if $npc_dna['B<<npctemp>>'] ! '':
  2605. if mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
  2606. $cheatDNAM = 'B<<npctemp>>'
  2607. elseif mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
  2608. $cheatDNAF = 'B<<npctemp>>'
  2609. end
  2610. end
  2611. if $npc_dna['C<<npctemp>>'] ! '':
  2612. if mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
  2613. $cheatDNAM = 'C<<npctemp>>'
  2614. elseif mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
  2615. $cheatDNAF = 'C<<npctemp>>'
  2616. end
  2617. end
  2618. if ($npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '') and ($cheatDNAM = '' or $cheatDNAF = ''):npctemp += 1 & jump 'npcparentfind'
  2619. killvar 'npctemp'
  2620. else
  2621. '<a href="exec:killvar ''tempDNAC'' & dynamic $cheatmenu[''DNAC'']"><b>ID of child (if it is known)</b></a>'
  2622. end
  2623. if $cheatDNAM ! '':
  2624. '<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>'
  2625. else
  2626. '<br><a href="exec:killvar ''tempDNAM'' & dynamic $cheatmenu[''DNAM'']"><b>ID of mother (if it is known)</b></a>'
  2627. end
  2628. if $cheatDNAF ! '':
  2629. '<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>'
  2630. else
  2631. '<br><a href="exec:killvar ''tempDNAF'' & dynamic $cheatmenu[''DNAF'']"><b>ID of father (if it is known)</b></a>'
  2632. end
  2633. *nl
  2634. if $cheatDNAM ! '' and $cheatDNAF ! '':
  2635. $cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$npc_dna[$cheatDNAF])
  2636. elseif $cheatDNAM ! '':
  2637. if $cheatDNAC ! '':
  2638. $tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
  2639. else
  2640. $tempDNAF = func('DNA','create')
  2641. $cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$tempDNAF)
  2642. end
  2643. elseif $cheatDNAF ! '':
  2644. if $cheatDNAC ! '':
  2645. $tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
  2646. else
  2647. $tempDNAM = func('DNA','create')
  2648. $cheatDNAgenerated = func('DNA','generate',$tempDNAM,$npc_dna[$cheatDNAF])
  2649. end
  2650. else
  2651. if $cheatDNAC = '':
  2652. $tempDNAM = func('DNA','create')
  2653. $tempDNAF = func('DNA','create')
  2654. $cheatDNAgenerated = func('DNA','generate',$tempDNAM,$tempDNAF)
  2655. else
  2656. $tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
  2657. $tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
  2658. end
  2659. end
  2660. if $cheatDNAM = '': '<br><b>Random mother DNA:</b> <<$tempDNAM>>'
  2661. if $cheatDNAF = '': '<br><b>Random father DNA:</b> <<$tempDNAF>>'
  2662. if $cheatDNAC = '': '<br><b>Random child DNA:</b> <<$cheatDNAgenerated>>'
  2663. '<br><a href="exec:dynamic $cheatmenu[''DNA'']">Generate again</a>'
  2664. if $cheatDNAC ! '':
  2665. npctemp = 0
  2666. :npcgparfind
  2667. if $npc_dna['A<<npctemp>>'] ! '':
  2668. 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):
  2669. '<br><b>Grandmother: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2670. 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):
  2671. '<br><b>Grandfather: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2672. end
  2673. end
  2674. if $npc_dna['B<<npctemp>>'] ! '':
  2675. 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):
  2676. '<br><b>Grandmother: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2677. 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):
  2678. '<br><b>Grandfather: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2679. end
  2680. end
  2681. if $npc_dna['C<<npctemp>>'] ! '':
  2682. 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):
  2683. '<br><b>Grandmother: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2684. 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):
  2685. '<br><b>Grandfather: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2686. end
  2687. end
  2688. if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgparfind'
  2689. end
  2690. if $cheatDNAM ! '' or $cheatDNAF ! '':
  2691. npctemp = 0
  2692. :npcchildfind
  2693. if $npc_dna['A<<npctemp>>'] ! '':
  2694. if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
  2695. '<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2696. elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2697. '<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2698. 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):
  2699. '<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2700. end
  2701. end
  2702. if $npc_dna['B<<npctemp>>'] ! '':
  2703. if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
  2704. '<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2705. elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2706. '<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2707. 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):
  2708. '<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2709. end
  2710. end
  2711. if $npc_dna['C<<npctemp>>'] ! '':
  2712. if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
  2713. '<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2714. elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
  2715. '<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2716. 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):
  2717. '<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2718. end
  2719. end
  2720. if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcchildfind'
  2721. npctemp = 0
  2722. :npcgchildfind
  2723. if $npc_dna['A<<npctemp>>'] ! '':
  2724. 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)):
  2725. '<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2726. 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)):
  2727. '<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2728. 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)):
  2729. '<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
  2730. end
  2731. end
  2732. if $npc_dna['B<<npctemp>>'] ! '':
  2733. 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)):
  2734. '<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2735. 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)):
  2736. '<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2737. 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)):
  2738. '<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
  2739. end
  2740. end
  2741. if $npc_dna['C<<npctemp>>'] ! '':
  2742. 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)):
  2743. '<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2744. 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)):
  2745. '<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2746. 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)):
  2747. '<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
  2748. end
  2749. end
  2750. if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgchildfind'
  2751. killvar 'npctemp'
  2752. end
  2753. killvar '$tempDNAF'
  2754. killvar '$tempDNAM'
  2755. killvar '$tempDNAC'
  2756. killvar 'cheatDNAgenerated'
  2757. '</td></tr></table></center>'
  2758. }
  2759. $cheatmenu['DNAM'] = {
  2760. $cheatDNAM = input("Enter genetic mother ID (like A33, without apostrophe)")
  2761. if $cheatDNAM = '':exit
  2762. dynamic $cheatDNAM
  2763. dynamic $cheatmenu['DNA']
  2764. }
  2765. $cheatmenu['DNAF'] = {
  2766. $cheatDNAF = input("Enter genetic father ID (like A34, without apostrophe)")
  2767. if $cheatDNAF = '':exit
  2768. dynamic $cheatDNAF
  2769. dynamic $cheatmenu['DNA']
  2770. }
  2771. $cheatmenu['DNAC'] = {
  2772. $cheatDNAC = input("Enter genetic Child ID (like A34, without apostrophe)")
  2773. if $cheatDNAC = '':exit
  2774. dynamic $cheatDNAC
  2775. dynamic $cheatmenu['DNA']
  2776. }
  2777. $cheatmenu['fame'] = {
  2778. *clr & cla
  2779. gs 'obj_din', 'cheattabs'
  2780. '<center><h1>Display Setting</h1></center>'
  2781. $table['fame'] = '<center><table width="90%" cellspacing="0" cellpadding="5" valign="top" border="1">'
  2782. $table['fame'] += '<th colspan="5"><b>Fame</b></th><tr>'
  2783. $table['fame'] += '<th></th><th>Pavlovsk</th><th>City</th><th>Pushkin</th><th>Gadukino</th><tr>'
  2784. $table['fame'] += '<td>Actor</td>'
  2785. $table['fame'] += '<td> <<fame[''pav_acting'']>> <a href="exec:gs ''fame'', ''pav'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2786. $table['fame'] += '<td><<fame[''city_acting'']>> <a href="exec:gs ''fame'', ''city'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2787. $table['fame'] += '<td><<fame[''pushkin_acting'']>> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2788. $table['fame'] += '<td><<fame[''village_acting'']>> <a href="exec:gs ''fame'', ''village'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2789. $table['fame'] += '<tr>'
  2790. $table['fame'] += '<td>Dancer</td>'
  2791. $table['fame'] += '<td> <<fame[''pav_dance'']>> <a href="exec:gs ''fame'', ''pav'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2792. $table['fame'] += '<td><<fame[''city_dance'']>> <a href="exec:gs ''fame'', ''city'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2793. $table['fame'] += '<td><<fame[''pushkin_dance'']>> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2794. $table['fame'] += '<td><<fame[''village_dance'']>> <a href="exec:gs ''fame'', ''village'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2795. $table['fame'] += '<tr>'
  2796. $table['fame'] += '<td>Glamour model</td>'
  2797. $table['fame'] += '<td> <<fame[''pav_modelling'']>> <a href="exec:gs ''fame'', ''pav'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2798. $table['fame'] += '<td><<fame[''city_modelling'']>> <a href="exec:gs ''fame'', ''city'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2799. $table['fame'] += '<td><<fame[''pushkin_modelling'']>> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2800. $table['fame'] += '<td><<fame[''village_modelling'']>> <a href="exec:gs ''fame'', ''village'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2801. $table['fame'] += '<tr>'
  2802. $table['fame'] += '<td>Painter</td>'
  2803. $table['fame'] += '<td> <<fame[''pav_painting'']>> <a href="exec:gs ''fame'', ''pav'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2804. $table['fame'] += '<td><<fame[''city_painting'']>> <a href="exec:gs ''fame'', ''city'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2805. $table['fame'] += '<td><<fame[''pushkin_painting'']>> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2806. $table['fame'] += '<td><<fame[''village_painting'']>> <a href="exec:gs ''fame'', ''village'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2807. $table['fame'] += '<tr>'
  2808. $table['fame'] += '<td>Musician</td>'
  2809. $table['fame'] += '<td> <<fame[''pav_music'']>> <a href="exec:gs ''fame'', ''pav'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2810. $table['fame'] += '<td><<fame[''city_music'']>> <a href="exec:gs ''fame'', ''city'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2811. $table['fame'] += '<td><<fame[''pushkin_music'']>> <a href="exec:gs ''fame'', ''pushkin'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2812. $table['fame'] += '<td><<fame[''village_music'']>> <a href="exec:gs ''fame'', ''village'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2813. $table['fame'] += '<tr>'
  2814. $table['fame'] += '<td>Ballet dancer</td>'
  2815. $table['fame'] += '<td> <<fame[''pav_ballet'']>> <a href="exec:gs ''fame'', ''pav'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2816. $table['fame'] += '<td><<fame[''city_ballet'']>> <a href="exec:gs ''fame'', ''city'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2817. $table['fame'] += '<td><<fame[''pushkin_ballet'']>> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2818. $table['fame'] += '<td><<fame[''village_ballet'']>> <a href="exec:gs ''fame'', ''village'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2819. $table['fame'] += '<tr>'
  2820. $table['fame'] += '<td>Porn actor</td>'
  2821. $table['fame'] += '<td> <<fame[''pav_porn'']>> <a href="exec:gs ''fame'', ''pav'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2822. $table['fame'] += '<td><<fame[''city_porn'']>> <a href="exec:gs ''fame'', ''city'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2823. $table['fame'] += '<td><<fame[''pushkin_porn'']>> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2824. $table['fame'] += '<td><<fame[''village_porn'']>> <a href="exec:gs ''fame'', ''village'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2825. $table['fame'] += '<tr>'
  2826. $table['fame'] += '<td>Stripper</td>'
  2827. $table['fame'] += '<td> <<fame[''pav_stripping'']>> <a href="exec:gs ''fame'', ''pav'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2828. $table['fame'] += '<td><<fame[''city_stripping'']>> <a href="exec:gs ''fame'', ''city'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2829. $table['fame'] += '<td><<fame[''pushkin_stripping'']>> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2830. $table['fame'] += '<td><<fame[''village_stripping'']>> <a href="exec:gs ''fame'', ''village'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2831. $table['fame'] += '<tr>'
  2832. $table['fame'] += '<td>Sex</td>'
  2833. $table['fame'] += '<td> <<fame[''pav_sex'']>> <a href="exec:gs ''fame'', ''pav'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2834. $table['fame'] += '<td><<fame[''city_sex'']>> <a href="exec:gs ''fame'', ''city'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2835. $table['fame'] += '<td><<fame[''pushkin_sex'']>> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2836. $table['fame'] += '<td><<fame[''village_sex'']>> <a href="exec:gs ''fame'', ''village'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2837. $table['fame'] += '<tr>'
  2838. $table['fame'] += '<td>Prostitution</td>'
  2839. $table['fame'] += '<td> <<fame[''pav_prostitute'']>> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2840. $table['fame'] += '<td><<fame[''city_prostitute'']>> <a href="exec:gs ''fame'', ''city'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2841. $table['fame'] += '<td><<fame[''pushkin_prostitute'']>> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2842. $table['fame'] += '<td><<fame[''village_prostitute'']>> <a href="exec:gs ''fame'', ''village'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2843. $table['fame'] += '<tr>'
  2844. $table['fame'] += '<td>Kickboxer</td>'
  2845. $table['fame'] += '<td> <<fame[''pav_kickboxing'']>> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2846. $table['fame'] += '<td><<fame[''city_kickboxing'']>> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2847. $table['fame'] += '<td><<fame[''pushkin_kickboxing'']>> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2848. $table['fame'] += '<td><<fame[''village_kickboxing'']>> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2849. $table['fame'] += '<tr>'
  2850. $table['fame'] += '<td>Runner</td>'
  2851. $table['fame'] += '<td> <<fame[''pav_running'']>> <a href="exec:gs ''fame'', ''pav'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2852. $table['fame'] += '<td><<fame[''city_running'']>> <a href="exec:gs ''fame'', ''city'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2853. $table['fame'] += '<td><<fame[''pushkin_running'']>> <a href="exec:gs ''fame'', ''pushkin'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2854. $table['fame'] += '<td><<fame[''village_running'']>> <a href="exec:gs ''fame'', ''village'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2855. $table['fame'] += '<tr>'
  2856. $table['fame'] += '<td>Volleyball player</td>'
  2857. $table['fame'] += '<td> <<fame[''pav_volleyball'']>> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2858. $table['fame'] += '<td><<fame[''city_volleyball'']>> <a href="exec:gs ''fame'', ''city'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2859. $table['fame'] += '<td><<fame[''pushkin_volleyball'']>> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2860. $table['fame'] += '<td><<fame[''village_volleyball'']>> <a href="exec:gs ''fame'', ''village'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2861. $table['fame'] += '<tr>'
  2862. $table['fame'] += '<td>Chess player</td>'
  2863. $table['fame'] += '<td> <<fame[''pav_chess'']>> <a href="exec:gs ''fame'', ''pav'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2864. $table['fame'] += '<td><<fame[''city_chess'']>> <a href="exec:gs ''fame'', ''city'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2865. $table['fame'] += '<td><<fame[''pushkin_chess'']>> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2866. $table['fame'] += '<td><<fame[''village_chess'']>> <a href="exec:gs ''fame'', ''village'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2867. $table['fame'] += '<tr>'
  2868. $table['fame'] += '<td>Teacher</td>'
  2869. $table['fame'] += '<td> <<fame[''pav_teaching'']>> <a href="exec:gs ''fame'', ''pav'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2870. $table['fame'] += '<td><<fame[''city_teaching'']>> <a href="exec:gs ''fame'', ''city'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2871. $table['fame'] += '<td><<fame[''pushkin_teaching'']>> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2872. $table['fame'] += '<td><<fame[''village_teaching'']>> <a href="exec:gs ''fame'', ''village'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2873. $table['fame'] += '<tr>'
  2874. $table['fame'] += '<td>Social media</td>'
  2875. $table['fame'] += '<td> <<fame[''pav_media'']>> <a href="exec:gs ''fame'', ''pav'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2876. $table['fame'] += '<td><<fame[''city_media'']>> <a href="exec:gs ''fame'', ''city'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2877. $table['fame'] += '<td><<fame[''pushkin_media'']>> <a href="exec:gs ''fame'', ''pushkin'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2878. $table['fame'] += '<td><<fame[''village_media'']>> <a href="exec:gs ''fame'', ''village'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
  2879. $table['fame'] += '</table></center>'
  2880. $table['fame']
  2881. }
  2882. $cheatmenu['quicktime'] = {
  2883. minut += ARGS[0]
  2884. *clr
  2885. gs 'daystart'
  2886. gs 'outdoors', 'weather'
  2887. gs 'stat'
  2888. gs 'fertility', 'cum_arrcheat'
  2889. }
  2890. $cheatmenu = {
  2891. gs'stat'
  2892. currhour = (daystart-1) * 24 + hour
  2893. currday = daystart
  2894. temp_week = week & temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut
  2895. *clr & cla
  2896. gs 'obj_din', 'cheattabs'
  2897. '<center><h1>Cheat Menu - Index</h1></center>'
  2898. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  2899. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  2900. '<a href="exec:dynamic $cheatmenu[''dynamic'']">Dynamic Input Command</a>'
  2901. '<a href="exec:gs ''fertility'',''cum_arrcheat''">OOX Debug</a>'
  2902. 'Right now <<$week[week]>> <<$month>> <<day>> <<year>> <<hour>>:<<minut>>'
  2903. 'Jump forward <a href="exec:dynamic $cheatmenu[''quicktime''], 15 & dynamic $cheatmenu">+15</a> minutes'
  2904. *nl
  2905. *nl
  2906. '<a href="exec:gt''pav_residential''">Teleport to Pavlovsk</a>'
  2907. '<a href="exec:gt''pushkin''">Teleport to Pushkin</a>'
  2908. '<a href="exec:gt''city_residential''">Teleport to City</a>'
  2909. '<a href="exec:gt''gadukino''">Teleport to Gadukino</a>'
  2910. '<a href="exec:gt''dachi''">Teleport to Suburban Cooperative</a>'
  2911. *nl
  2912. '<font color="red"><b>WARNING!</b></font>: Teleporting while in an event may break your game. Use at your own risk!'
  2913. *nl
  2914. 'Pregnancy speed multiplier: <a href="exec:if pregspeedcheat < 3:pregspeedcheat += 1 & dynamic $cheatmenu else pregspeedcheat = 0 & dynamic $cheatmenu"><b><<pregspeedcheat+1>></b></a>'
  2915. *nl
  2916. '<a href="exec:dynamic $cheatmenu[''vartracker'']"><b>Variable tracker</b></a>'
  2917. '</tr></table></b></center>'
  2918. }
  2919. $cheatmenu['vartracker'] = {
  2920. gs'stat'
  2921. *clr & cla
  2922. act 'Return to cheat index': dynamic $cheatmenu
  2923. '<center><h1>Cheat menu</h1></center>'
  2924. '<center>For testing purposes.<br>If reporting a bug only the lines in red are neccessary.</center>'
  2925. *nl
  2926. '$loc: <<$loc>>'
  2927. '$locM: <<$locM>>'
  2928. '<font color = red>$CURLOC: <<$CURLOC>></font>'
  2929. '$location_type: <<$location_type>>'
  2930. '$home[''current'']: <<$home[''current'']>>'
  2931. '$home[''town'']: <<$home[''town'']>>'
  2932. '$home[''name'']: <<$home[''name'']>>'
  2933. 'daystart: <<daystart>>'
  2934. 'daystart_start: <<daystart_start>>'
  2935. 'month: <<month>>'
  2936. 'week: <<week>>'
  2937. '$temperature: <<$temperature>>'
  2938. 'pfilmday: <<pfilmday>>'
  2939. '$pfname: <<$pfname>>'
  2940. 'modelmon: <<modelmon>>'
  2941. 'min_arousal: <<min_arousal>>'
  2942. 'pcs_nips: <<pcs_nips>>'
  2943. 'clit_size: <<clit_size>>'
  2944. 'steroid_have: <<steroid_have>>'
  2945. 'steroid_counter: <<steroid_counter>>'
  2946. 'steroid_dose: <<steroid_dose>>'
  2947. 'aphrodisiac_have: <<aphrodisiac_have>>'
  2948. 'aphrodisiac_counter: <<aphrodisiac_counter>>'
  2949. 'aphrodisiac_timer: <<aphrodisiac_timer>>'
  2950. 'aphrodisiac_addiction: <<aphrodisiac_addiction>>'
  2951. 'bcream_have: <<bcream_have>>'
  2952. 'motherQW: <<npc_QW[''A29'']>>'
  2953. 'Anastasia quest level: <<npc_QW[''A192'']>>'
  2954. 'sex: <<stat[''vaginal'']>>'
  2955. '$clothingworntype: <<$clothingworntype>>'
  2956. 'PCloQuality: <<PCloQuality>>'
  2957. 'Mira''s Father Quest (npc_QW[''A64'']): <<npc_QW[''A64'']>>'
  2958. 'Mira''s Quest (npc_QW[''A60'']): <<npc_QW[''A60'']>>'
  2959. 'mirasextimes: <<mirasextimes>>'
  2960. 'Mira''s Relationship (npc_rel[''A60'']): <<npc_rel[''A60'']>>'
  2961. 'Mitka''s Quest (npc_QW[''A63'']): <<npc_QW[''A63'']>>'
  2962. 'mirabrosextime: <<mirabrosextime>>'
  2963. 'momslut: <<momslut>>'
  2964. 'Kirill''s Relationship (Kirill): <<Kirill>>'
  2965. 'Kirill''s Corruption (Kirill_Crpt): <<Kirill_Crpt>>'
  2966. 'children: <<kid>>'
  2967. !! BabyEmbryo is for how many unborn babies inside PC.
  2968. 'fetus number: <<BabyEmbryo>>'
  2969. !! preg is your pregnancy state. 0 is not pregnant, 1 is pregnant in general, 2 is in labor.
  2970. 'pregnancy state: <<preg>>'
  2971. !! thinkpreg is if svetka thinks she is pregnant
  2972. 'thinkpreg: <<thinkpreg>>'
  2973. !! knowpreg is for solid proof svetlana is pregnant, like a pregnancy test.
  2974. 'knowpreg: <<knowpreg>>'
  2975. !! knowpregrecover is for Svetlanas knowledge that she just gave birth.
  2976. 'knowpregrecover: <<knowpregrecover>>'
  2977. !! knowpregloss is for Svetlanas knowledge that she lost a baby. 1 is for an abortion, 2 is for a miscarrage.
  2978. 'knowpregloss: <<knowpregloss>>'
  2979. !! cycle is Svetlanas current fertility cycle. 5 is pregnant, 4 is recovering, 3 is luteal, 2 is ovulation, 1 is foccular, 0 is menstration.
  2980. 'cycle: <<cycle>>'
  2981. !! menoage is the age Svetlana will be when she goes through menopause.
  2982. 'menoage: <<menoage>>'
  2983. !! age is how old Svetlana is in years.
  2984. 'age: <<age>>'
  2985. !! mesec is for how many hours of bleeding Svetlana has left in her current fertility cycle
  2986. 'mesec: <<mesec>>'
  2987. !! 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.
  2988. 'FocH: <<FocH>>'
  2989. !! 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.
  2990. 'EggRH: <<EggRH>>'
  2991. !! Ovulate is the amount of hours remaining in Svetlanas ovulation period of her current fertility cycle.
  2992. 'Ovulate: <<Ovulate>>'
  2993. !! 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.
  2994. 'UnfertEgg: <<UnfertEgg>>'
  2995. !! 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.
  2996. 'FertEgg: <<FertEgg>>'
  2997. !! 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
  2998. if FertEgg > 0:
  2999. i = arrpos('$kidname','unborn')
  3000. imax = arrsize('$kidname')-1
  3001. :chlp
  3002. ' <<i+1>>. baby''s pregnancy type: <<babyptype[i]>>'
  3003. if i < imax: i += 1 & jump 'chlp'
  3004. killvar 'i'
  3005. killvar 'imax'
  3006. end
  3007. !! BabyEmbryo is for implanted babies. These are solid pregnancies.
  3008. 'Implanted Embryos: <<BabyEmbryo>>'
  3009. !! ferteggage is for the time since the ovulation event. They last 330 hours before they die if not implanted.
  3010. 'ferteggage: <<ferteggage>>'
  3011. !! PregChem is the level of pregnancy, measured in hour parts.
  3012. 'PregChem: <<PregChem>>'
  3013. !! pillcon is the level of birth control to prevent svetlana from getting pregnant. Higher concentrations increase effectivity until it reaches it''s ideal level.
  3014. 'pillcon: <<pillcon>>'
  3015. !! 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.
  3016. 'Believed pillcon: <<pillcon2>>'
  3017. !! RecovH is the amount of recover hours before Svetlanas fertility cycle resets after having a baby.
  3018. 'RecovH: <<RecovH>>'
  3019. !! daylastperiod is for Svetlanas knowledge on when she began her last period
  3020. 'daylastperiod: <<daylastperiod>> (daystart difference: <<daystart-daylastperiod>>)'
  3021. !! lastmens is for the last day that Svetlana bled during her last cycle.
  3022. 'lastmens: <<lastmens>>'
  3023. !! 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.
  3024. 'firstmens: <<lastmens>> (daystart difference: <<daystart-firstmens>>)'
  3025. 'hypnoTime: <<hypnoTime>>'
  3026. 'hypnoStrength: <<hypnoStrength>>'
  3027. 'hypnoDay: <<hypnoDay>>'
  3028. 'hypnoAddict: <<hypnoAddict>>'
  3029. 'missCum: <<missCum>>'
  3030. if preziktype = 0:
  3031. 'condoms: in use(normal)/damaged/bad condoms: <<mc_inventory[''equipped_condoms'']+mc_inventory[''normal_condoms''] >>/<<mc_inventory[''sabotaged_condoms'']>>/<<mc_inventory[''bad_condoms'']>>'
  3032. elseif preziktype = 1:
  3033. 'condoms: (Not in use) normal/damaged/bad condoms: <<mc_inventory[''normal_condoms'']>>/<<mc_inventory[''sabotaged_condoms'']>>/<<mc_inventory[''bad_condoms'']>>'
  3034. else
  3035. 'condoms: in use (damaged)/normal/bad condoms: <<mc_inventory[''equipped_condoms'']+mc_inventory[''sabotaged_condoms'']>>/<<mc_inventory[''normal_condoms'']>>/<<mc_inventory[''bad_condoms'']>>'
  3036. end
  3037. if mc_inventory['contraceptive_pill'] > 0:
  3038. 'pack(s) of birth control pills: <<mc_inventory[''contraceptive_pill'']>>'
  3039. if tabletkiold > 0: ' <<tabletkiold>> expired pack'
  3040. if tabletkifake > 0: ' <<tabletkifake>> counterfeit pack'
  3041. if tabletkirej > 0: ' <<tabletkirej>> factory rejected pack'
  3042. if tabletkifert > 0: ' <<tabletkifert>> fertility hormones pack'
  3043. if tabletkisug > 0: ' <<tabletkisug>> sugar pills pack'
  3044. end
  3045. if pillsleft[ptype] > 0:
  3046. if ptype = 0: $pilltype = 'normal '
  3047. if ptype = 1: $pilltype = 'expired '
  3048. if ptype = 2: $pilltype = 'counterfeit '
  3049. if ptype = 3: $pilltype = 'factory rejected '
  3050. if ptype = 4: $pilltype = 'sugar '
  3051. if ptype = 5: $pilltype = 'fertility hormone '
  3052. '<<pillsleft[ptype]>> <<$pilltype>>pills left of your currently used pack'
  3053. killvar '$pilltype'
  3054. end
  3055. }
  3056. $cheatmenu['bdimmain'] = {
  3057. gs 'stat'
  3058. *clr & cla
  3059. gs 'obj_din', 'cheattabs'
  3060. '<center><h1>Cheat Menu - Body Image Sets</h1></center>'
  3061. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  3062. '<td width="400" cellspacing="0" cellpadding="20" valign="top">'
  3063. '<center><b>Body Image Controls</b></center>'
  3064. *nl
  3065. 'You are currently using set: <<$bodimgsets[((bodset * 10) + 9)]>>'
  3066. if bdsetlock = 1:
  3067. 'The set used is locked to current.'
  3068. else
  3069. 'The set used is unlocked.'
  3070. end
  3071. *nl
  3072. 'This is the current default and custom (if any) body image sets:'
  3073. *nl
  3074. '<a href="exec:chmbodset = 0 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[9]>></b></a>'
  3075. *nl
  3076. '<a href="exec:chmbodset = 1 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[19]>></b></a>'
  3077. *nl
  3078. '<a href="exec:chmbodset = 2 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[29]>></b></a>'
  3079. *nl
  3080. if bodsetcnt >= 4:
  3081. 'You may edit aspects of a custom image set by clicking on their folder names below.'
  3082. *nl
  3083. '<a href="exec:chmbodset = 4 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[49]>></b></a>'
  3084. *nl
  3085. elseif bodsetcnt = 3:
  3086. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  3087. *nl
  3088. end
  3089. if bodsetcnt >= 5:
  3090. '<a href="exec:chmbodset = 5 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[59]>></b></a>'
  3091. *nl
  3092. elseif bodsetcnt = 4:
  3093. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  3094. *nl
  3095. end
  3096. if bodsetcnt >= 6:
  3097. '<a href="exec:chmbodset = 6 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[69]>></b></a>'
  3098. *nl
  3099. elseif bodsetcnt = 5:
  3100. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  3101. *nl
  3102. end
  3103. if bodsetcnt >= 7:
  3104. '<a href="exec:chmbodset = 7 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[79]>></b></a>'
  3105. *nl
  3106. elseif bodsetcnt = 6:
  3107. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  3108. *nl
  3109. end
  3110. if bodsetcnt >= 8:
  3111. '<a href="exec:chmbodset = 8 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[89]>></b></a>'
  3112. *nl
  3113. elseif bodsetcnt = 7:
  3114. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  3115. *nl
  3116. end
  3117. if bodsetcnt >= 9:
  3118. '<a href="exec:chmbodset = 9 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[99]>></b></a>'
  3119. *nl
  3120. elseif bodsetcnt = 8:
  3121. '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
  3122. *nl
  3123. end
  3124. '</td></tr></table></center>'
  3125. }
  3126. $cheatmenu['bdimdisplay'] = {
  3127. gs 'stat'
  3128. *clr & cla
  3129. '<center><h1>Cheat menu</h1></center>'
  3130. *nl
  3131. '<center><b>Body Image Set Display</b></center>'
  3132. '<a href="exec:killvar ''chmbodset'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
  3133. *nl
  3134. if bdsetlock = 1 and chmbodset = fixbodset:
  3135. 'This is the currently locked set.'
  3136. '<a href="exec:bdsetlock = 0 & bodset = 1 & killvar ''fixbodset'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Clear the lock.</b></a>'
  3137. else
  3138. '<a href="exec:bdsetlock = 1 & bodset = chmbodset & fixbodset = chmbodset & dynamic $cheatmenu[''bdimdisplay'']"><b>Use this set only.</b></a>'
  3139. end
  3140. *nl
  3141. if chmbodset <= 3:
  3142. 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
  3143. 'Descriptors:'
  3144. *nl
  3145. if chmbodset = 3:
  3146. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
  3147. else
  3148. '<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
  3149. end
  3150. *nl
  3151. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a>'
  3152. *nl
  3153. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a>'
  3154. *nl
  3155. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a>'
  3156. *nl
  3157. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a>'
  3158. *nl
  3159. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a>'
  3160. *nl
  3161. if chmbodset = 3:
  3162. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
  3163. else
  3164. '<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
  3165. end
  3166. *nl
  3167. if chmbodset = 3:
  3168. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
  3169. else
  3170. '<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
  3171. end
  3172. *nl
  3173. if chmbodset = 3:
  3174. '<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/8.jpg''"><<$bodimgsets[((chmbodset * 10) + 8)]>></a>'
  3175. end
  3176. *nl
  3177. else
  3178. 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
  3179. 'Descriptors: (Displayed as "You are:")'
  3180. if imgset0ovr[chmbodset] = 1:
  3181. '<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>'
  3182. *nl
  3183. 'You are using a <a href="exec:imgset0ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 0</a> for this set.'
  3184. *nl
  3185. else
  3186. '<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
  3187. *nl
  3188. 'You are using the <a href="exec:imgset0ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 0</a> for this set.'
  3189. *nl
  3190. end
  3191. *nl
  3192. '<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>'
  3193. *nl
  3194. '<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>'
  3195. *nl
  3196. '<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>'
  3197. *nl
  3198. '<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>'
  3199. *nl
  3200. '<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>'
  3201. *nl
  3202. if imgset6ovr[chmbodset] = 1:
  3203. '<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>'
  3204. *nl
  3205. 'You are using a <a href="exec:imgset6ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 6</a> for this set.'
  3206. *nl
  3207. else
  3208. '<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
  3209. *nl
  3210. 'You are using the <a href="exec:imgset6ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 6</a> for this set.'
  3211. *nl
  3212. end
  3213. if imgset7ovr[chmbodset] = 1:
  3214. '<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>'
  3215. *nl
  3216. 'You are using a <a href="exec:imgset7ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 7</a> for this set.'
  3217. *nl
  3218. else
  3219. '<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
  3220. *nl
  3221. 'You are using the <a href="exec:imgset7ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 7</a> for this set.'
  3222. *nl
  3223. end
  3224. '<a href="exec:dynamic $cheatmenu[''bdimcstdel'']">Delete this set.</a>'
  3225. end
  3226. }
  3227. $cheatmenu['bdimcstdel'] = {
  3228. *clr & cla
  3229. '<center><b>Body Image Set Removal</b></center>'
  3230. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
  3231. *nl
  3232. '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.'
  3233. if klsetask = 1:
  3234. '<a href="exec:klsetask = 2 & dynamic $cheatmenu[''bdimcstdel'']"><b>Are you sure you want to remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</b></a>'
  3235. elseif klsetask = 2:
  3236. if chmbodset <= 2:
  3237. 'You have encoutered error 1'
  3238. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
  3239. exit
  3240. end
  3241. if bdsetlock = 1 and fixbodset >= chmbodset: bdsetlock = 0 & killvar 'fixbodset'
  3242. if bodsetcnt > chmbodset:
  3243. cyci1 = 0
  3244. cyci2 = chmbodset
  3245. :overwriter1
  3246. $bodimgsets[((cyci2 * 10) + cyci1)] = $bodimgsets[(((cyci2 + 1) * 10) + cyci1)]
  3247. cyci1 += 1
  3248. if cyci1 < 10: jump 'overwriter1'
  3249. imgset6ovr[cyci2] = imgset6ovr[(cyci2 + 1)]
  3250. imgset7ovr[cyci2] = imgset7ovr[(cyci2 + 1)]
  3251. cyci1 = 0
  3252. cyci2 += 1
  3253. if cyci2 < bodsetcnt: jump 'overwriter1'
  3254. killvar 'cyci1' & killvar 'cyci2'
  3255. elseif bodsetcnt < chmbodset:
  3256. 'You have encoutered error 2'
  3257. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
  3258. exit
  3259. end
  3260. cyci1 = 9
  3261. :poofer1
  3262. killvar 'bodimgsets', ((bodsetcnt * 10) + cyci1)
  3263. cyci1 -= 1
  3264. if cyci1 >= 0: jump 'poofer1'
  3265. killvar 'cyci1'
  3266. killvar 'imgset6ovr', bodsetcnt
  3267. killvar 'imgset7ovr', bodsetcnt
  3268. bodsetcnt -= 1
  3269. killvar 'klsetask'
  3270. dynamic $cheatmenu['bdimmain']
  3271. else
  3272. '<a href="exec:klsetask = 1 & dynamic $cheatmenu[''bdimcstdel'']">Remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</a>'
  3273. end
  3274. }
  3275. $cheatmenu['bdimcstadd'] = {
  3276. *clr & cla
  3277. '<center><b>Body Image Set Addition</b></center>'
  3278. '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
  3279. *nl
  3280. 'This is where you can add a new image set to a game.'
  3281. '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.'
  3282. '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.'
  3283. *nl
  3284. '<a href="exec:dynamic $cheatmenu[''bdimcstaddpro'']">Add Image Set</a>'
  3285. }
  3286. $cheatmenu['bdimcstaddpro'] = {
  3287. $tmpstrg = input("Enter folder name, do not include ''\''")
  3288. if $tmpstrg = '':
  3289. killvar '$tmpstrg'
  3290. dynamic $cheatmenu['bdimcstadd']
  3291. else
  3292. bodsetcnt += 1
  3293. cyci1 = 0
  3294. :addcyc
  3295. $bodimgsets[((bodsetcnt * 10) + cyci1)] = $bodimgsets[(10 + cyci1)]
  3296. cyci1 += 1
  3297. if cyci1 < 9: jump 'addcyc'
  3298. $bodimgsets[((bodsetcnt * 10) + 9)] = $tmpstrg
  3299. imgset6ovr[bodsetcnt] = 0
  3300. imgset7ovr[bodsetcnt] = 0
  3301. killvar '$tmpstrg'
  3302. killvar 'cyci1'
  3303. dynamic $cheatmenu['bdimmain']
  3304. end
  3305. }
  3306. $cheatmenu['bdimcstdesed'] = {
  3307. $tmpstrg = input("Enter a new descriptor")
  3308. if $tmpstrg = '':
  3309. killvar 'chmbddes'
  3310. killvar '$tmpstrg'
  3311. else
  3312. $bodimgsets[((chmbodset * 10) + chmbddes)] = $tmpstrg
  3313. killvar 'chmbddes'
  3314. killvar '$tmpstrg'
  3315. dynamic $cheatmenu['bdimdisplay']
  3316. end
  3317. }
  3318. $cheatmenu['succubreset'] = {
  3319. *clr & cla
  3320. 'Are you sure you want to reset your Succubus status? You will lose all levels, saved power, and succubus skill levels.'
  3321. *nl
  3322. '<a href="exec:dynamic $cheatmenu[''magic'']"><b>No, nevermind.</b></a>'
  3323. *nl
  3324. '<a href="exec:dynamic $cheatmenu[''sucresetdo'']"><b>Yes, remove & reset Succubus status</b></a>'
  3325. }
  3326. $cheatmenu['sucresetdo'] = {
  3327. !! Probably do not need to kill all of these, but better to unload them.
  3328. killvar 'scfwon'
  3329. killvar 'scpopt'
  3330. killvar '$sclocrt'
  3331. killvar '$scargrt'
  3332. killvar '$scsubloc'
  3333. killvar 'suceatinit'
  3334. killvar 'succubusflag'
  3335. killvar 'succubusQW'
  3336. killvar '$sucself1'
  3337. killvar 'succublvl'
  3338. killvar 'succubxp'
  3339. killvar 'sucxpsnapshot'
  3340. killvar 'succhungry'
  3341. killvar 'sucexcess'
  3342. killvar 'sexnutrition'
  3343. killvar 'suclezsex'
  3344. killvar 'sucabslez'
  3345. killvar 'sucabscum'
  3346. killvar '$sucabs1'
  3347. killvar '$sucabs2'
  3348. killvar '$sucabs3'
  3349. killvar 'succonfail'
  3350. killvar 'sucpowzeroed'
  3351. killvar 'suchuntday'
  3352. killvar 'sucpcinfo'
  3353. killvar 'karinsucsex'
  3354. killvar 'karinsucsexday'
  3355. killvar 'karinsucsexask'
  3356. killvar 'tatianasucsex'
  3357. killvar 'tatianasucsexday'
  3358. killvar 'tatianasucsexask'
  3359. killvar 'sucwalkday'
  3360. killvar '$sucgoloc'
  3361. killvar '$sucgometka'
  3362. killvar 'sucskill'
  3363. killvar 'sucstorecap'
  3364. killvar 'sucinfoday'
  3365. killvar 'sctrainprep'
  3366. !! This list will be updated as new variables are added
  3367. dynamic $cheatmenu['magic']
  3368. }
  3369. $cheatmenu['about'] = {
  3370. *clr & cla
  3371. gs 'obj_din', 'settingtabs'
  3372. gs 'stat'
  3373. gs 'saveg'
  3374. gs 'addbuilddate'
  3375. '<center><h1>About Window</h1></center>'
  3376. '<center><table cellspacing="0" cellpadding="20" valign="top">'
  3377. '<tr><td><h3><center>Girl Life version <<version_major+"."+version_minor+"."+version_revision+"."+version_patch+iif($git_hash ! "", "<br>"+$git_hash+" (dev build)", "")>></center></h3></td></tr>'
  3378. '<tr><td><h3><center>built on <<$builddate>></center></h3></td></tr>'
  3379. '<tr><td><h5><center>if loaded so it was the save from</center></h5></td></tr>'
  3380. '<tr><td cellspacing="0" cellpadding="20" valign="top"><center><<$version>></center></td></tr>'
  3381. '</table></center>'
  3382. killvar '$tmp'
  3383. }
  3384. $cheatmenu['items'] = {
  3385. gs'stat'
  3386. *clr & cla
  3387. gs 'obj_din', 'cheattabs'
  3388. '<center><h1>Cheat Menu - Items</h1></center>'
  3389. '<center><h4>Pharmacy items</h4>'
  3390. if showPharmacyItems = 0:
  3391. '<a href = "exec: showPharmacyItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
  3392. end
  3393. if showPharmacyItems = 1:
  3394. '<a href = "exec: showPharmacyItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
  3395. *pl 'Morning after pill: <a href="exec:mc_inventory[''morning_after_pill'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''morning_after_pill'']>> </b></a>'
  3396. *pl 'Condoms: <a href="exec:mc_inventory[''normal_condoms'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''normal_condoms'']>> </b></a>'
  3397. *pl 'Pregnancy test: <a href="exec:mc_inventory[''pregnancy_test'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''pregnancy_test'']>> </b></a>'
  3398. *pl 'Birth control pills: <a href="exec:mc_inventory[''contraceptive_pill'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''contraceptive_pill'']>> </b></a>'
  3399. *pl 'Antibiotics: <a href="exec:mc_inventory[''antibiotics'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''antibiotics'']>> </b></a>'
  3400. *pl 'Vitamins: <a href="exec:mc_inventory[''vitamins'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''vitamins'']>> </b></a>'
  3401. *pl 'Painkillers: <a href="exec:mc_inventory[''painkillers'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''painkillers'']>> </b></a>'
  3402. *pl 'Ointments for chafing: <a href="exec:mc_inventory[''chaffing_cream'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''chaffing_cream'']>> </b></a>'
  3403. *pl 'Lubricants: <a href="exec:mc_inventory[''lubricant'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''lubricant'']>> </b></a>'
  3404. *pl 'Lip balms: <a href="exec:mc_inventory[''lipbalm'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''lipbalm'']>> </b></a>'
  3405. *pl 'Weight loss pill: <a href="exec:mc_inventory[''weight_loss_pill'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''weight_loss_pill'']>> </b></a>'
  3406. *pl 'Tampons: <a href="exec:mc_inventory[''tampons'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''tampons'']>> </b></a>'
  3407. *pl 'Sanitary napkins: <a href="exec:mc_inventory[''sanitary_pads'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''sanitary_pads'']>> </b></a>'
  3408. if mc_inventory['enema_kit'] = 0:
  3409. *pl 'Enema kit: <a href="exec:mc_inventory[''enema_kit''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3410. end
  3411. if mc_inventory['enema_kit'] = 1:
  3412. *pl 'Enema kit: <a href="exec:mc_inventory[''enema_kit''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3413. end
  3414. if mc_inventory['breast_pump'] = 0:
  3415. *pl 'Breast pump: <a href="exec:mc_inventory[''breast_pump''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3416. end
  3417. if mc_inventory['breast_pump'] = 1:
  3418. *pl 'Breast pump: <a href="exec:mc_inventory[''breast_pump''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3419. end
  3420. *pl 'Breastmilk bottle S: <a href="exec:mc_inventory[''bottle_s'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''bottle_s'']>> </b></a>'
  3421. *pl 'Breastmilk bottle M: <a href="exec:mc_inventory[''bottle_m'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''bottle_m'']>> </b></a>'
  3422. end
  3423. '<h4>Food items</h4>'
  3424. if showFoodItems = 0:
  3425. '<a href = "exec: showFoodItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
  3426. end
  3427. if showFoodItems = 1:
  3428. '<a href = "exec: showFoodItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
  3429. *pl 'Regular food: <a href="exec:mc_inventory[''food_basic'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''food_basic'']>> </b></a>'
  3430. *pl 'Diet food: <a href="exec:mc_inventory[''food_diet'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''food_diet'']>> </b></a>'
  3431. *pl 'Tea biscuits: <a href="exec:mc_inventory[''food_biscuits'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''food_biscuits'']>> </b></a>'
  3432. if bag > 0:
  3433. if mc_inventory['food_water'] = 0:
  3434. *pl 'Bottle of water: <a href="exec:mc_inventory[''food_water''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3435. end
  3436. if mc_inventory['food_water'] = 1:
  3437. *pl 'Bottle of water: <a href="exec:mc_inventory[''food_water''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3438. end
  3439. if mc_inventory['food_sandwich'] = 0:
  3440. *pl 'Sandwich: <a href="exec:mc_inventory[''food_sandwich''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3441. end
  3442. if mc_inventory['food_sandwich'] = 1:
  3443. *pl 'Sandwich: <a href="exec:mc_inventory[''food_sandwich''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3444. end
  3445. if mc_inventory['food_wine'] = 0:
  3446. *pl 'Cheap Bottle of wine: <a href="exec:mc_inventory[''food_wine''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3447. end
  3448. if mc_inventory['food_wine'] = 1:
  3449. *pl 'Cheap Bottle of wine: <a href="exec:mc_inventory[''food_wine''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3450. end
  3451. end
  3452. end
  3453. '<h4>Cosmetics items</h4>'
  3454. if showCosmeticsItems = 0:
  3455. '<a href = "exec:showCosmeticsItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
  3456. end
  3457. if showCosmeticsItems = 1:
  3458. '<a href = "exec:showCosmeticsItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
  3459. *pl 'Cosmetics: <a href="exec:mc_inventory[''cosmetics''] =input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''cosmetics'']>> </b></a>'
  3460. *pl 'Moisturiser: <a href="exec:mc_inventory[''moisturiser'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''moisturiser'']>> </b></a>'
  3461. *pl 'Lip balms: <a href="exec:mc_inventory[''lipbalm'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''lipbalm''] >> </b></a>'
  3462. *pl 'Plain false lashes: <a href="exec:mc_inventory[''eyelash_fake'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''eyelash_fake'']>> </b></a>'
  3463. *pl 'Mink false lashes: <a href="exec:mc_inventory[''eyelash_mink'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''eyelash_mink'']>> </b></a>'
  3464. *pl 'Razors: <a href="exec:mc_inventory[''razor'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''razor'']>> </b></a>'
  3465. *pl 'Sunblock: <a href="exec:mc_inventory[''suncream'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> << mc_inventory[''suncream'']>> </b></a>'
  3466. *pl 'Deodorant: <a href="exec:mc_inventory[''deodorant'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''deodorant'']>> </b></a>'
  3467. *pl 'Tampons: <a href="exec:mc_inventory[''tampons'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''tampons'']>> </b></a>'
  3468. *pl 'Sanitary Napkins: <a href="exec:mc_inventory[''sanitary_pads'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''sanitary_pads'']>> </b></a>'
  3469. *pl 'Shampoo: <a href="exec:mc_inventory[''shampoo'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''shampoo'']>> </b></a>'
  3470. *pl 'Hair scrunchies: <a href="exec:mc_inventory[''scrunchies'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''scrunchies'']>> </b></a>'
  3471. *pl 'Hair pins: <a href="exec:mc_inventory[''kirbygrips'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''kirbygrips'']>> </b></a>'
  3472. if bag = 1:
  3473. *pl 'Wipes: <a href="exec:mc_inventory[''makeup_wipes'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''makeup_wipes'']>> </b></a>'
  3474. *pl 'Portable makeup: <a href="exec:mc_inventory[''travel_makeup'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''travel_makeup'']>> </b></a>'
  3475. *pl 'Mouthwash: <a href="exec:mc_inventory[''mouthwash'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''mouthwash'']>> </b></a>'
  3476. if mc_inventory['comb'] = 0:
  3477. *pl 'Comb: <a href="exec:mc_inventory[''comb''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3478. end
  3479. if mc_inventory['comb'] = 1:
  3480. *pl 'Comb: <a href="exec:mc_inventory[''comb''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3481. end
  3482. if mc_inventory['travel_mirror'] = 0:
  3483. *pl 'Compact mirror: <a href="exec:mc_inventory[''travel_mirror''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3484. end
  3485. if mc_inventory['travel_mirror'] = 1:
  3486. *pl 'Compact mirror: <a href="exec:mc_inventory[''travel_mirror''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3487. end
  3488. end
  3489. end
  3490. '<h4>Hardware items</h4>'
  3491. if showHardwareItems = 0:
  3492. '<a href = "exec: showHardwareItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
  3493. end
  3494. if showHardwareItems = 1:
  3495. '<a href = "exec: showHardwareItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
  3496. *pl 'Dishwashing detergent: <a href="exec:mc_inventory[''dish_soap'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''dish_soap'']>> </b></a>'
  3497. *pl 'Clothing detergent: <a href="exec:mc_inventory[''laundry_soap'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''laundry_soap'']>> </b></a>'
  3498. *pl 'Plates: <a href="exec:mc_inventory[''dish_plates'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''dish_plates'']>> </b></a>'
  3499. *pl 'Fabric: <a href="exec:mc_inventory[''sewing_fabric'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''sewing_fabric'']>> </b></a>'
  3500. if mc_inventory['sewing_kit'] = 0:
  3501. *pl 'Sewing kit: <a href="exec:sewing_kit = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3502. end
  3503. if mc_inventory['sewing_kit'] = 1:
  3504. *pl 'Sewing kit: <a href="exec:sewing_kit = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3505. end
  3506. if bag = 1:
  3507. if mc_inventory['umbrella'] = 0:
  3508. *pl 'Umbrella: <a href="exec:mc_inventory[''umbrella''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3509. end
  3510. if mc_inventory['umbrella'] = 1:
  3511. *pl 'Umbrella: <a href="exec:mc_inventory[''umbrella''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3512. end
  3513. end
  3514. end
  3515. '<h4>Narcotics items</h4>'
  3516. if showNarcoticsItems = 0:
  3517. '<a href = "exec: showNarcoticsItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
  3518. end
  3519. if showNarcoticsItems = 1:
  3520. '<a href = "exec: showNarcoticsItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
  3521. *pl 'Cigarettes: <a href="exec:mc_inventory[''cigarettes'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''cigarettes'']>> </b></a>'
  3522. *pl 'Joints: <a href="exec:joint=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<joint>> </b></a>'
  3523. *pl 'Cocaine: <a href="exec:dur=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<dur>> </b></a>'
  3524. *pl 'Amphetamine: <a href="exec:amphetamine=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<amphetamine>> </b></a>'
  3525. *pl 'Neuroboosters: <a href="exec:mentats_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mentats_have>> </b></a>'
  3526. *pl 'Steroids: <a href="exec:steroid_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<steroid_have>> </b></a>'
  3527. *pl 'Breast cream: <a href="exec:bcream_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<bcream_have>> </b></a>'
  3528. *pl 'Aphrodisiacs: <a href="exec:aphrodisiac_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<aphrodisiac_have>> </b></a>'
  3529. end
  3530. '<h4>Sex shop items</h4>'
  3531. if showSexItems = 0:
  3532. '<a href = "exec: showSexItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
  3533. end
  3534. if showSexItems = 1:
  3535. '<a href = "exec: showSexItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
  3536. if mc_inventory['mag_porn'] = 0:
  3537. *pl 'Porn magazine: <a href="exec:mc_inventory[''mag_porn''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3538. end
  3539. if mc_inventory['mag_porn'] = 1:
  3540. *pl 'Porn magazine: <a href="exec:mc_inventory[''mag_porn''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3541. end
  3542. if mc_inventory['vibe'] = 0:
  3543. *pl 'Vibrator: <a href="exec:mc_inventory[''vibe''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3544. end
  3545. if mc_inventory['vibe'] = 1:
  3546. *pl 'Vibrator: <a href="exec:mc_inventory[''vibe''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3547. end
  3548. if mc_inventory['buttplug'] = 0:
  3549. *pl 'Butt plug: <a href="exec:mc_inventory[''buttplug''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3550. end
  3551. if mc_inventory['buttplug'] = 1:
  3552. *pl 'Butt plug: <a href="exec:mc_inventory[''buttplug''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3553. end
  3554. *pl '15cm suction dildo: <a href="exec:mc_inventory[''dildo_suction'']=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mc_inventory[''dildo_suction'']>> </b></a>'
  3555. if mc_inventory['strapon'] = 0:
  3556. *pl 'Strap-on harness: <a href="exec:mc_inventory[''strapon''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3557. end
  3558. if mc_inventory['strapon'] = 1:
  3559. *pl 'Strap-on harness: <a href="exec:mc_inventory[''strapon''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3560. end
  3561. if mc_inventory['dildo_small'] = 0:
  3562. *pl '10cm dildo: <a href="exec:mc_inventory[''dildo_small''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3563. end
  3564. if mc_inventory['dildo_small'] = 1:
  3565. *pl '10cm dildo: <a href="exec:mc_inventory[''dildo_small''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3566. end
  3567. if mc_inventory['dildo_normal'] = 0:
  3568. *pl '15cm dildo: <a href="exec:mc_inventory[''dildo_normal''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3569. end
  3570. if mc_inventory['dildo_normal'] = 1:
  3571. *pl '15cm dildo: <a href="exec:mc_inventory[''dildo_normal''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3572. end
  3573. if mc_inventory['dildo_big'] = 0:
  3574. *pl '20cm dildo: <a href="exec:mc_inventory[''dildo_big''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3575. end
  3576. if mc_inventory['dildo_big'] = 1:
  3577. *pl '20cm dildo: <a href="exec:mc_inventory[''dildo_big''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3578. end
  3579. if mc_inventory['dildo_large'] = 0:
  3580. *pl '25cm dildo: <a href="exec:mc_inventory[''dildo_large''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3581. end
  3582. if mc_inventory['dildo_large'] = 1:
  3583. *pl '25cm dildo: <a href="exec:mc_inventory[''dildo_large''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3584. end
  3585. if mc_inventory['dildo_huge'] = 0:
  3586. *pl '30cm dildo: <a href="exec:mc_inventory[''dildo_huge''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3587. end
  3588. if mc_inventory['dildo_huge'] = 1:
  3589. *pl '30cm dildo: <a href="exec:mc_inventory[''dildo_huge''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3590. end
  3591. if mc_inventory['dildo_enormous'] = 0:
  3592. *pl '35cm dildo: <a href="exec:mc_inventory[''dildo_enormous''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3593. end
  3594. if mc_inventory['dildo_enormous'] = 1:
  3595. *pl '35cm dildo: <a href="exec:mc_inventory[''dildo_enormous''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3596. end
  3597. if mc_inventory['dildo_gigantic'] = 0:
  3598. *pl '40cm dildo: <a href="exec:mc_inventory[''dildo_gigantic''] = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
  3599. end
  3600. if mc_inventory['dildo_gigantic'] = 1:
  3601. *pl '40cm dildo: <a href="exec:mc_inventory[''dildo_gigantic''] = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
  3602. end
  3603. end
  3604. '</center>'
  3605. }
  3606. --- Cheatmenu_din ---------------------------------