mod_addedflavour_Functions.qsrc 60 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208
  1. # mod_addedflavour_Functions
  2. !! Code to change all the Mod Variables back to their starting states !!
  3. if $ARGS[0] = 'resetmodvars':
  4. if $ARGS[1] = 'Shared City Apartment' or $ARGS[1] = 'All':
  5. KILLVAR 'modVar_AF_SFLA_DayTracker'
  6. KILLVAR 'modVar_AF_SFLA_AptPerishables'
  7. KILLVAR 'modVar_AF_SFLA_AptContributions'
  8. KILLVAR 'modVar_AF_SFLA_AptState'
  9. modVar_AF_LocBlock['SFLA_Bedr1'] = 999999999
  10. KILLVAR 'modVar_AF_LocBlock' , arrpos('modVar_AF_LocBlock',999999999)
  11. modVar_AF_LocBlock['SFLA_Bedr2'] = 999999999
  12. KILLVAR 'modVar_AF_LocBlock' , arrpos('modVar_AF_LocBlock',999999999)
  13. modVar_AF_LocBlock['SFLA_Bedr3'] = 999999999
  14. KILLVAR 'modVar_AF_LocBlock' , arrpos('modVar_AF_LocBlock',999999999)
  15. KILLVAR 'modVar_AF_RelLock'
  16. KILLVAR 'modVar_AF_NPCGreetingDay'
  17. KILLVAR '$modVar_AF_NPCMessage'
  18. KILLVAR 'modVar_AF_SexProg'
  19. KILLVAR 'modVar_AF_SFLA_AptRProg'
  20. KILLVAR '$modArr_AF_A700_ImagesLoc'
  21. KILLVAR '$modArr_AF_A701_ImagesLoc'
  22. KILLVAR '$modArr_AF_A702_ImagesLoc'
  23. KILLVAR '$modArr_AF_A34_ImagesLoc'
  24. KILLVAR '$modArr_AF_A700_ImagesDesc'
  25. KILLVAR '$modArr_AF_A701_ImagesDesc'
  26. KILLVAR '$modArr_AF_A702_ImagesDesc'
  27. KILLVAR '$modArr_AF_A34_ImagesDesc'
  28. KILLVAR '$modArr_AF_A700_SexVideoLoc'
  29. KILLVAR '$modArr_AF_A701_SexVideoLoc'
  30. KILLVAR '$modArr_AF_A702_SexVideoLoc'
  31. KILLVAR '$modArr_AF_A34_SexVideoLoc'
  32. KILLVAR '$modArr_AF_A700_SexVideoDesc'
  33. KILLVAR '$modArr_AF_A701_SexVideoDesc'
  34. KILLVAR '$modArr_AF_A702_SexVideoDesc'
  35. KILLVAR '$modArr_AF_A34_SexVideoDesc'
  36. modVar_AF_EventOpen['SFLA-AptInvEv-PhoneCall'] = 999999999
  37. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  38. modVar_AF_EventOpen['SFLA-AptInvEv'] = 999999999
  39. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  40. modVar_AF_EventLock['SFLA-AptInvEv'] = 999999999
  41. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  42. modVar_AF_EventProgress['SFLA-AptLive'] = 999999999
  43. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  44. modVar_AF_EventLock['SFLA-ClubActive'] = 999999999
  45. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  46. modVar_AF_EventOpen['SFLA-ClubActive'] = 999999999
  47. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  48. if strpos($loc,'SFLA') > 0:
  49. $menu_loc = 'city_center'
  50. $menu_arg = ''
  51. end
  52. gs 'mod_addedflavour_A700_Functions' , 'config'
  53. gs 'mod_addedflavour_A701_Functions' , 'config'
  54. gs 'mod_addedflavour_A702_Functions' , 'config'
  55. end
  56. if $ARGS[1] = 'Mother' or $ARGS[1] = 'All':
  57. modVar_AF_EventProgress['A29-MotherConfidence'] = 999999999
  58. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  59. modVar_AF_EventProgress['A29-NightOutEv'] = 999999999
  60. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  61. modVar_AF_EventGates['A29-MotherConfidence-1'] = 999999999
  62. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  63. modVar_AF_EventGates['A29-MotherConfidence-2'] = 999999999
  64. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  65. modVar_AF_EventGates['A29-MotherConfidence-3'] = 999999999
  66. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  67. modVar_AF_EventGates['A29-MotherConfidence-4'] = 999999999
  68. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  69. modVar_AF_EventGates['A29-MotherConfidence-5'] = 999999999
  70. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  71. modVar_AF_EventGates['A29-MotherConfidence-6'] = 999999999
  72. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  73. modVar_AF_EventOpen['A29-WorkOutEv'] = 999999999
  74. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  75. modVar_AF_EventOpen['A29-NightOutEv'] = 999999999
  76. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  77. modVar_AF_EventOpen['A29-AptStayEv'] = 999999999
  78. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  79. modVar_AF_EventOpen['A29-AptStayEv'] = 999999999
  80. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  81. modVar_AF_EventOpen['A29-NightOutEv-DancePartner'] = 999999999
  82. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  83. modVar_AF_EventLock['A29-WorkOutEv'] = 999999999
  84. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  85. modVar_AF_EventLock['A29-YogaEv'] = 999999999
  86. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  87. modVar_AF_EventLock['A29-AptStayEv-Interacted'] = 999999999
  88. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  89. modVar_AF_EventLock['A29-AptStayEv-Clothed'] = 999999999
  90. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  91. modVar_AF_EventLock['A29-AptStayEv-Bathed'] = 999999999
  92. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  93. modVar_AF_EventOpen['A29-PregRedemption'] = 999999999
  94. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  95. modVar_AF_EventProgress['A29-PregRedemption'] = 999999999
  96. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  97. modVar_AF_EventTriggered['A29-AptStayEv'] = 999999999
  98. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  99. modVar_AF_EventLock['A29-HomeFlash'] = 999999999
  100. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  101. KILLVAR '$modArr_AF_A29_NightOutConvChoices'
  102. KILLVAR '$modArr_AF_A29_NightOutWalkChoices'
  103. KILLVAR '$modArr_AF_A29_NightOutTrainChoices'
  104. KILLVAR '$modArr_AF_A29_NightOutMealChoices'
  105. gs 'mod_addedflavour_A29_Functions' , 'config'
  106. end
  107. if $ARGS[1] = 'Stepfather' or $ARGS[1] = 'All':
  108. KILLVAR 'modVar_AF_DeliveryJob'
  109. KILLVAR 'modVar_AF_DepotJobArrpos'
  110. KILLVAR '$modArr_AF_DeliveryVanOptions'
  111. KILLVAR '$modArr_AF_DeliveryVanOptionsDaily'
  112. KILLVAR 'modVar_AF_DeliveryVanSetup'
  113. KILLVAR 'modVar_AF_DeliveryVanHour'
  114. KILLVAR '$modArr_AF_DeliveryFootOptions'
  115. KILLVAR '$modArr_AF_DeliveryLocName'
  116. KILLVAR 'modArr_AF_DeliveryLocEarn'
  117. KILLVAR 'modArr_AF_DeliveryLocActive'
  118. modVar_AF_EventLock['A28-WorkEv-Interact'] = 999999999
  119. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  120. modVar_AF_EventLock['A704-WorkEv-Interact'] = 999999999
  121. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  122. modVar_AF_EventLock['A28-WorkEv-SeenWorking'] = 999999999
  123. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  124. modVar_AF_EventLock['A704-WorkEv-SeenWorking'] = 999999999
  125. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  126. modVar_AF_EventLock['A28-WorkEv-Caught'] = 999999999
  127. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  128. gs 'mod_addedflavour_A28_Functions' , 'config'
  129. end
  130. if $ARGS[1] = 'Grandfather' or $ARGS[1] = 'All':
  131. modVar_AF_EventGates['A32-BathroomSexEv-1'] = 999999999
  132. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  133. modVar_AF_EventGates['A32-BathroomSexEv-2'] = 999999999
  134. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  135. modVar_AF_EventGates['A32-BathroomSexEv-3'] = 999999999
  136. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  137. modVar_AF_EventGates['A32-BathroomSexEv-4'] = 999999999
  138. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  139. modVar_AF_EventGates['A32-BathroomSexEv-5'] = 999999999
  140. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  141. modVar_AF_EventGates['A32-BathroomSexEv-6'] = 999999999
  142. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  143. modVar_AF_EventGates['A32-BathroomSexEv-7'] = 999999999
  144. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  145. modVar_AF_LocBlock['GrandparentsYard'] = 999999999
  146. KILLVAR 'modVar_AF_LocBlock' , arrpos('modVar_AF_LocBlock',999999999)
  147. modVar_AF_EventProgress['A32-BathroomSexEv'] = 999999999
  148. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  149. modVar_AF_EventLock['A32-BathroomSexEv'] = 999999999
  150. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  151. gs 'mod_addedflavour_A32_Functions' , 'config'
  152. end
  153. if $ARGS[1] = 'Sister' or $ARGS[1] = 'All':
  154. modVar_AF_EventGates['A33-SibSexEv-1'] = 999999999
  155. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  156. modVar_AF_EventGates['A33-SibSexEv-2'] = 999999999
  157. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  158. modVar_AF_EventGates['A33-SibSexEv-3'] = 999999999
  159. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  160. modVar_AF_EventGates['A33-SibSexEv-4'] = 999999999
  161. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  162. modVar_AF_EventGates['A33-SibSexEv-5'] = 999999999
  163. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  164. modVar_AF_EventLock['A33-SibSexEv'] = 999999999
  165. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  166. modVar_AF_EventOpen['A33-BroSexTalk-1'] = 999999999
  167. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  168. modVar_AF_EventOpen['A33-BroSexTalk-2'] = 999999999
  169. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  170. modVar_AF_EventOpen['A33-SibSexEv'] = 999999999
  171. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  172. modVar_AF_EventProgress['A33-SibThreesomeEv-SisInv'] = 999999999
  173. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  174. modVar_AF_EventProgress['A33-SibThreesomeEv-BroInv'] = 999999999
  175. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  176. KILLVAR '$modArr_AF_A33_SibActChoices'
  177. gs 'mod_addedflavour_A33_Functions' , 'config'
  178. end
  179. if $ARGS[1] = 'Viola' or $ARGS[1] = 'All':
  180. modVar_AF_EventTriggered['A205-ShopSexEv'] = 999999999
  181. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  182. modVar_AF_EventLock['A205-ShopSexEv'] = 999999999
  183. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  184. gs 'mod_addedflavour_A205_Functions' , 'config'
  185. end
  186. if $ARGS[1] = 'Timothy' or $ARGS[1] = 'All':
  187. modVar_AF_EventGates['A77-AptInvEv-1'] = 999999999
  188. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  189. modVar_AF_EventGates['A77-AptInvEv-2'] = 999999999
  190. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  191. modVar_AF_EventGates['A77-AptInvEv-3'] = 999999999
  192. KILLVAR 'modVar_AF_EventGates' , arrpos('modVar_AF_EventGates',999999999)
  193. modVar_AF_EventOpen['A77-AptInvEv'] = 999999999
  194. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  195. modVar_AF_EventOpen['A77-AptInvEv-InviteFriend'] = 999999999
  196. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  197. modVar_AF_EventProgress['A77-AptInvEv'] = 999999999
  198. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  199. modVar_AF_EventProgress['A77-AptInvSexEv'] = 999999999
  200. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  201. $modVar_AF_EventOption['A77-AptInvEv'] = '999999999'
  202. KILLVAR '$modVar_AF_EventOption' , arrpos('$modVar_AF_EventOption','999999999')
  203. gs 'mod_addedflavour_A77_Functions' , 'config'
  204. end
  205. if $ARGS[1] = 'Kseniya' or $ARGS[1] = 'All':
  206. modVar_AF_EventTriggered['KSY-ParkOrgyEv'] = 999999999
  207. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  208. modVar_AF_EventLock['KSY-ParkOrgyEv'] = 999999999
  209. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  210. modVar_AF_EventOpen['KSY-ShopMessage-1'] = 999999999
  211. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  212. gs 'mod_addedflavour_KSY_Functions' , 'config'
  213. end
  214. if $ARGS[1] = 'Viola' or $ARGS[1] = 'All':
  215. modVar_AF_EventTriggered['A205-ShopSexEv'] = 999999999
  216. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  217. modVar_AF_EventLock['A205-ShopSexEv'] = 999999999
  218. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  219. gs 'mod_addedflavour_A205_Functions' , 'config'
  220. end
  221. if $ARGS[1] = 'Savva' or $ARGS[1] = 'All':
  222. modVar_AF_EventTriggered['A204-ShopSexEv'] = 999999999
  223. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  224. modVar_AF_EventLock['A204-ShopSexEv'] = 999999999
  225. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  226. gs 'mod_addedflavour_A204_Functions' , 'config'
  227. end
  228. if $ARGS[1] = 'Anushka' or $ARGS[1] = 'All':
  229. modVar_AF_EventOpen['A144-UniversityEv'] = 999999999
  230. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  231. modVar_AF_EventLock['A144-DormSexEv'] = 999999999
  232. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  233. modVar_AF_EventTriggered['A144-FirstMeet'] = 999999999
  234. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  235. modVar_AF_EventLock['A144-FirstMeet'] = 999999999
  236. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  237. end
  238. if $ARGS[1] = 'Mr Yenotin' or $ARGS[1] = 'All':
  239. modVar_AF_EventProgress['A130-CoercionRating'] = 999999999
  240. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  241. modVar_AF_EventProgress['A130-SubmissiveRating'] = 999999999
  242. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  243. modVar_AF_EventProgress['A130-DominatedRating'] = 999999999
  244. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  245. $modVar_AF_EventOption['A130-Status'] = '999999999'
  246. KILLVAR '$modVar_AF_EventOption' , arrpos('$modVar_AF_EventOption','999999999')
  247. modVar_AF_EventOpen['A130-SubmissiveSexEv'] = 999999999
  248. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  249. modVar_AF_EventLock['A130-TriggerEv'] = 999999999
  250. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  251. modVar_AF_EventLock['A130-RegistrationEv'] = 999999999
  252. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  253. modVar_AF_EventLock['A130-ClubEv'] = 999999999
  254. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  255. modVar_AF_EventLock['A130-SubmissiveSexEv'] = 999999999
  256. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  257. modVar_AF_EventLock['A130-DominatedSexEv'] = 999999999
  258. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  259. modVar_AF_EventLock['A130-CoercionSexEv'] = 999999999
  260. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  261. modVar_AF_EventTriggered['A130-DomSexEv'] = 999999999
  262. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  263. modVar_AF_EventTriggered['A130-SubSexEv'] = 999999999
  264. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  265. modVar_AF_EventTriggered['A130-CoeSexEv'] = 999999999
  266. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  267. modVar_AF_BlockEvents['A130'] = 999999999
  268. KILLVAR 'modVar_AF_BlockEvents' , arrpos('modVar_AF_BlockEvents',999999999)
  269. gs 'mod_addedflavour_A130_Functions' , 'config'
  270. end
  271. if $ARGS[1] = 'Igor / Igora' or $ARGS[1] = 'All':
  272. modVar_AF_EventLock['A4-MeetEva'] = 999999999
  273. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  274. modVar_AF_EventLock['A4-PreConfidentEv'] = 999999999
  275. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  276. modVar_AF_EventLock['A4-DormSexEv'] = 999999999
  277. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  278. modVar_AF_EventTriggered['A4-MeetEva'] = 999999999
  279. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  280. modVar_AF_EventTriggered['A4-EvaSex'] = 999999999
  281. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  282. modVar_AF_EventTriggered['A4-DaySex'] = 999999999
  283. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  284. modVar_AF_EventTriggered['A4-Threesome'] = 999999999
  285. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  286. modVar_AF_EventOpen['A4-KnowIgor'] = 999999999
  287. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  288. modVar_AF_EventOpen['A4-IgoraInteract'] = 999999999
  289. KILLVAR 'modVar_AF_EventOpen' , arrpos('modVar_AF_EventOpen',999999999)
  290. modVar_AF_EventProgress['A4-PreConfidentEv'] = 999999999
  291. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  292. modVar_AF_LocBlock['A4-Dorm'] = 999999999
  293. KILLVAR 'modVar_AF_LocBlock' , arrpos('modVar_AF_LocBlock',999999999)
  294. end
  295. if $ARGS[1] = 'Zinaida' or $ARGS[1] = 'All':
  296. modVar_AF_EventLock['A142-MeetEv'] = 999999999
  297. KILLVAR 'modVar_AF_EventLock' , arrpos('modVar_AF_EventLock',999999999)
  298. modVar_AF_EventProgress['A142-Relationship'] = 999999999
  299. KILLVAR 'modVar_AF_EventProgress' , arrpos('modVar_AF_EventProgress',999999999)
  300. modVar_AF_EventTriggered['A142-HomeEv'] = 999999999
  301. KILLVAR 'modVar_AF_EventTriggered' , arrpos('modVar_AF_EventTriggered',999999999)
  302. end
  303. if $ARGS[1] = 'All':
  304. KILLVAR 'modVar_AF_EventOpen'
  305. KILLVAR 'modVar_AF_EventLock'
  306. KILLVAR 'modVar_AF_EventTriggered'
  307. KILLVAR '$modVar_AF_EventOption'
  308. KILLVAR 'modVar_AF_EventGates'
  309. KILLVAR 'modVar_AF_EventProgress'
  310. KILLVAR 'modVar_AF_LocBlock'
  311. KILLVAR 'modVar_AF_InitialConfigRun'
  312. KILLVAR 'modVar_AF_Inhib'
  313. KILLVAR '$modVar_AF_SaveVersion'
  314. KILLVAR '$charsche_character_ID'
  315. KILLVAR '$charsche_character_HomeLoc'
  316. KILLVAR '$charsche_character_CurActLoc'
  317. KILLVAR '$charsche_character_CurActDesc'
  318. KILLVAR 'charsche_character_CurActTime'
  319. KILLVAR 'charsche_character_CurActPriority'
  320. KILLVAR '$charsche_character_PrevActLoc'
  321. KILLVAR '$charsche_character_PrevActDesc'
  322. KILLVAR 'charsche_character_LastCheck'
  323. KILLVAR '$charsche_sleepcycle_Name'
  324. KILLVAR 'charsche_sleepcycle_ID'
  325. KILLVAR 'charsche_sleepcycle_StartTime'
  326. KILLVAR 'charsche_sleepcycle_EndTime'
  327. KILLVAR '$charsche_sleepcycle_Days'
  328. KILLVAR '$charsche_workcycle_Name'
  329. KILLVAR '$charsche_workcycle_Location'
  330. KILLVAR 'charsche_workcycle_StartTime'
  331. KILLVAR 'charsche_workcycle_EndTime'
  332. KILLVAR '$charsche_workcycle_Chars'
  333. KILLVAR '$charsche_workcycle_Days'
  334. KILLVAR '$charsche_activity_Name'
  335. KILLVAR '$charsche_activity_Location'
  336. KILLVAR '$charsche_activity_Action'
  337. KILLVAR 'charsche_activity_StartTime'
  338. KILLVAR 'charsche_activity_EndTime'
  339. KILLVAR 'charsche_activity_MinLen'
  340. KILLVAR 'charsche_activity_MaxLen'
  341. KILLVAR 'charsche_activity_Priority'
  342. KILLVAR 'charsche_activity_Active'
  343. KILLVAR 'charsche_activity_LocConflict'
  344. KILLVAR '$charsche_activity_Chars'
  345. KILLVAR '$charsche_activity_Days'
  346. gt $menu_loc, $menu_arg
  347. end
  348. end
  349. if $ARGS[0] = 'saveupdate':
  350. !! Forces any Save Files that are using Old Mod Version content to reset all Questlines as everything has been changed !!
  351. if $modVar_AF_SaveVersion = 'Ver1.0' or $modVar_AF_SaveVersion = 'Ver1.0.1' or $modVar_AF_SaveVersion = 'Ver1.1' or $modVar_AF_SaveVersion = 'Ver1.1.1' or $modVar_AF_SaveVersion = 'Ver1.2':
  352. karta += modVar_AF_SFLA_AptContributions['PCS']
  353. gt 'mod_addedflavour_Functions' , 'areyousure' , 'All'
  354. end
  355. if $modVar_AF_SaveVersion = 'Ver1.3':
  356. $modVar_AF_SaveVersion = 'Ver1.4'
  357. !! Changed how Variable works for Cat Event !!
  358. if modVar_AF_EventOpen['GadCat-SleepEv'] = 1 : modVar_AF_EventOpen['GadCat-SleepEv'] = daystart
  359. !! Changed how the Charsche works !!
  360. KILLVAR '$charsche_character_ID'
  361. KILLVAR '$charsche_character_Workplace' &! Permanently deleted
  362. KILLVAR '$charsche_character_HomeLoc'
  363. KILLVAR '$charsche_character_CurActLoc'
  364. KILLVAR '$charsche_character_CurActDesc'
  365. KILLVAR 'charsche_character_CurActTime'
  366. KILLVAR 'charsche_character_CurActPriority'
  367. KILLVAR '$charsche_character_PrevActLoc'
  368. KILLVAR '$charsche_character_PrevActDesc'
  369. KILLVAR 'charsche_character_LastCheck'
  370. KILLVAR 'charsche_sleepcycle_ID'
  371. KILLVAR 'charsche_sleepcycle_StartTime'
  372. KILLVAR 'charsche_sleepcycle_EndTime'
  373. KILLVAR '$charsche_sleepcycle_Days'
  374. KILLVAR 'charsche_workcycle_Char'
  375. KILLVAR 'charsche_workcycle_StartTime'
  376. KILLVAR 'charsche_workcycle_EndTime'
  377. KILLVAR '$charsche_workcycle_Days'
  378. KILLVAR '$charsche_activity_Name'
  379. KILLVAR '$charsche_activity_Location'
  380. KILLVAR '$charsche_activity_Action'
  381. KILLVAR 'charsche_activity_StartTime'
  382. KILLVAR 'charsche_activity_EndTime'
  383. KILLVAR 'charsche_activity_MinLen'
  384. KILLVAR 'charsche_activity_MaxLen'
  385. KILLVAR 'charsche_activity_Priority'
  386. KILLVAR 'charsche_activity_Active'
  387. KILLVAR 'charsche_activity_LocConflict'
  388. KILLVAR '$charsche_activity_Chars'
  389. KILLVAR '$charsche_activity_Days'
  390. gs 'mod_addedflavour_charscheconf' , 'configure'
  391. !! Improved Image Generation Function !!
  392. gs 'mod_addedflavour_Functions' , 'UpdateMediaFiles'
  393. !! No longer needed; changed method of image generation to match NPC Interact !!
  394. KILLVAR 'modVar_AF_SFLA_ActImageAmount'
  395. gs 'mod_addedflavour_SFLA_Functions' , 'ActivityImage-Config'
  396. !! Adds Savva Config !!
  397. gs 'mod_addedflavour_A204_Functions' , 'config'
  398. !! Updated SFLA Variables !!
  399. modVar_AF_NPCGreetingDay['A144'] = 0
  400. modVar_AF_RelLock['A34'] = npc_rel['A34']
  401. modVar_AF_RelLock['A144'] = npc_rel['A144']
  402. !! Created function to allow player to Message a NPC who uses Charsche so you can find out where they are !!
  403. $modVar_AF_NPCLastKnownLocation['A700'] = ''
  404. $modVar_AF_NPCLastKnownLocation['A701'] = ''
  405. $modVar_AF_NPCLastKnownLocation['A702'] = ''
  406. $modVar_AF_NPCLastKnownLocation['A144'] = ''
  407. $modVar_AF_NPCLastKnownLocation['A34'] = ''
  408. $modVar_AF_NPCLastKnownLocation['A28'] = ''
  409. $modVar_AF_NPCLastKnownLocation['A704'] = ''
  410. $modVar_AF_NPCLastKnownLocation['DayTracker'] = daystart
  411. end
  412. if $modVar_AF_SaveVersion = 'Ver1.4':
  413. $modVar_AF_SaveVersion = 'Ver1.4.1'
  414. !! Fixes faults in Activities !!
  415. $charsche_activity_Location[arrpos('$charsche_actlist','CityAptSittingRoom - Resting')] = 'sitr'
  416. charsche_activity_StartTime[arrpos('$charsche_actlist','CityAptBathroom - Bathing')] = 300
  417. charsche_activity_LocConflict[arrpos('$charsche_actlist','CityAptBathroom - Bathing')] = 1
  418. end
  419. if $modVar_AF_SaveVersion = 'Ver1.4.1':
  420. $modVar_AF_SaveVersion = 'Ver1.4.2'
  421. !! Fixes faults in Activities !!
  422. if modVar_AF_EventOpen['A29-AptStayEv'] = 0:
  423. gs 'mod_addedflavour_charsche' , 'acttools' , 'actchars' , 'CityAptBathroom - Bathing' , 'Remove' , 29
  424. gs 'mod_addedflavour_charsche' , 'acttools' , 'forceact' , 29 , 'Void' , 'Idle' , 5
  425. end
  426. end
  427. if $modVar_AF_SaveVersion = 'Ver1.4.2':
  428. $modVar_AF_SaveVersion = 'Ver1.5'
  429. !! Adds Ilya (Teacher) Configuration !!
  430. if Storyline = 1 : gs 'mod_addedflavour_A130_Functions' , 'config'
  431. end
  432. if $modVar_AF_SaveVersion = 'Ver1.5':
  433. $modVar_AF_SaveVersion = 'Ver1.5.1'
  434. !! Adds new Photos to find if portfolio already setup !!
  435. if (arrsize('$modVar_AF_PhotoName') = 16 and Storyline ! 1) or (arrsize('$modVar_AF_PhotoName') = 18 and Storyline = 1):
  436. if Storyline = 1:
  437. $modVar_AF_TempStr = $modVar_AF_PhotoName[16]
  438. $modVar_AF_PhotoName[16] = 'autotraidF'
  439. $modVar_AF_PhotoName[] = $modVar_AF_TempStr
  440. $modVar_AF_TempStr = $modVar_AF_PhotoDetailsSubtle[16]
  441. $modVar_AF_PhotoDetailsSubtle[16] = 'Carriages of Chrome for the Privileged who roam'
  442. $modVar_AF_PhotoDetailsSubtle[] = $modVar_AF_TempStr
  443. $modVar_AF_TempStr = $modVar_AF_PhotoDetailsDetailed[16]
  444. $modVar_AF_PhotoDetailsDetailed[16] = 'St. Petersburg Car Dealership'
  445. $modVar_AF_PhotoDetailsDetailed[] = $modVar_AF_TempStr
  446. modVar_AF_Temp = modVar_AF_PhotoTaken[16]
  447. modVar_AF_PhotoTaken[16] = 0
  448. modVar_AF_PhotoTaken[] = modVar_AF_Temp
  449. modVar_AF_PhotoReveal[] = 0
  450. $modVar_AF_TempStr = $modVar_AF_PhotoName[17]
  451. $modVar_AF_PhotoName[17] = 'gadforest'
  452. $modVar_AF_PhotoName[] = $modVar_AF_TempStr
  453. $modVar_AF_TempStr = $modVar_AF_PhotoDetailsSubtle[17]
  454. $modVar_AF_PhotoDetailsSubtle[17] = 'Sentinels of the Old World hidden away from the Concrete Harbingers of the New'
  455. $modVar_AF_PhotoDetailsSubtle[] = $modVar_AF_TempStr
  456. $modVar_AF_TempStr = $modVar_AF_PhotoDetailsDetailed[17]
  457. $modVar_AF_PhotoDetailsDetailed[17] = 'Gadukino Forest'
  458. $modVar_AF_PhotoDetailsDetailed[] = $modVar_AF_TempStr
  459. modVar_AF_Temp = modVar_AF_PhotoTaken[17]
  460. modVar_AF_PhotoTaken[17] = 0
  461. modVar_AF_PhotoTaken[] = modVar_AF_Temp
  462. modVar_AF_PhotoReveal[] = 0
  463. else
  464. $modVar_AF_PhotoName[] = 'autotraidF'
  465. $modVar_AF_PhotoDetailsSubtle[] = 'Carriages of Chrome for the Privileged who roam'
  466. $modVar_AF_PhotoDetailsDetailed[] = 'St. Petersburg Car Dealership'
  467. modVar_AF_PhotoTaken[] = 0
  468. modVar_AF_PhotoReveal[] = 0
  469. $modVar_AF_PhotoName[] = 'gadforest'
  470. $modVar_AF_PhotoDetailsSubtle[] = 'Sentinels of the Old World hidden away from the Concrete Harbingers of the New'
  471. $modVar_AF_PhotoDetailsDetailed[] = 'Gadukino Forest'
  472. modVar_AF_PhotoTaken[] = 0
  473. modVar_AF_PhotoReveal[] = 0
  474. end
  475. end
  476. !! Found Serious Fault with Add Sleep Function in Character Scheduler - This forces a redo !!
  477. KILLVAR '$charsche_sleeplist'
  478. KILLVAR '$charsche_sleepcycle_Name'
  479. KILLVAR 'charsche_sleepcycle_ID'
  480. KILLVAR 'charsche_sleepcycle_StartTime'
  481. KILLVAR 'charsche_sleepcycle_EndTime'
  482. $charsche_Name = 'A34_Weekdays'
  483. charsche_ID = 34
  484. charsche_StartTime = 1380
  485. charsche_EndTime = 390
  486. $charsche_Days = '1234'
  487. gs 'mod_addedflavour_charsche' , 'addsleep'
  488. $charsche_Name = 'A34_Weekends'
  489. charsche_ID = 34
  490. charsche_StartTime = 30
  491. charsche_EndTime = 480
  492. $charsche_Days = '567'
  493. gs 'mod_addedflavour_charsche' , 'addsleep'
  494. $charsche_Name = 'A700_Weekdays'
  495. charsche_ID = 700
  496. charsche_StartTime = 1350
  497. charsche_EndTime = 330
  498. $charsche_Days = '1234'
  499. gs 'mod_addedflavour_charsche' , 'addsleep'
  500. $charsche_Name = 'A700_Weekends'
  501. charsche_ID = 700
  502. charsche_StartTime = 1410
  503. charsche_EndTime = 430
  504. $charsche_Days = '567'
  505. gs 'mod_addedflavour_charsche' , 'addsleep'
  506. $charsche_Name = 'A701_Weekdays'
  507. charsche_ID = 701
  508. charsche_StartTime = 1380
  509. charsche_EndTime = 360
  510. $charsche_Days = '1234'
  511. gs 'mod_addedflavour_charsche' , 'addsleep'
  512. $charsche_Name = 'A701_Weekends'
  513. charsche_ID = 701
  514. charsche_StartTime = 20
  515. charsche_EndTime = 465
  516. $charsche_Days = '567'
  517. gs 'mod_addedflavour_charsche' , 'addsleep'
  518. $charsche_Name = 'A702_Weekdays'
  519. charsche_ID = 702
  520. charsche_StartTime = 1410
  521. charsche_EndTime = 345
  522. $charsche_Days = '1234'
  523. gs 'mod_addedflavour_charsche' , 'addsleep'
  524. $charsche_Name = 'A702_Weekends'
  525. charsche_ID = 702
  526. charsche_StartTime = 35
  527. charsche_EndTime = 500
  528. $charsche_Days = '567'
  529. gs 'mod_addedflavour_charsche' , 'addsleep'
  530. end
  531. if $modVar_AF_SaveVersion = 'Ver1.5.1':
  532. $modVar_AF_SaveVersion = 'Ver1.5.2'
  533. !! Had a photo that shouldnt be available for Non-Schoolgirls Starts, this removes it or moves it to the end of the list !!
  534. if arrsize('$modVar_AF_PhotoName') > 0 and Storyline ! 1:
  535. modVar_AF_Temp = arrpos('$modVar_AF_PhotoName','gschool_grounds')
  536. KILLVAR '$modVar_AF_PhotoName' , modVar_AF_Temp
  537. KILLVAR '$modVar_AF_PhotoDetailsSubtle' , modVar_AF_Temp
  538. KILLVAR '$modVar_AF_PhotoDetailsDetailed' , modVar_AF_Temp
  539. KILLVAR 'modVar_AF_PhotoTaken' , modVar_AF_Temp
  540. KILLVAR 'modVar_AF_PhotoReveal' , modVar_AF_Temp
  541. elseif arrsize('$modVar_AF_PhotoName') > 0 and Storyline = 1:
  542. modVar_AF_Temp = arrpos('$modVar_AF_PhotoName','gschool_grounds')
  543. $modVar_AF_TempStr = $modVar_AF_PhotoName[modVar_AF_Temp]
  544. KILLVAR '$modVar_AF_PhotoName' , modVar_AF_Temp
  545. $modVar_AF_PhotoName[] = $modVar_AF_TempStr
  546. $modVar_AF_TempStr = $modVar_AF_PhotoDetailsSubtle[modVar_AF_Temp]
  547. KILLVAR '$modVar_AF_PhotoDetailsSubtle' , modVar_AF_Temp
  548. $modVar_AF_PhotoDetailsSubtle[] = $modVar_AF_TempStr
  549. $modVar_AF_TempStr = $modVar_AF_PhotoDetailsDetailed[modVar_AF_Temp]
  550. KILLVAR '$modVar_AF_PhotoDetailsDetailed' , modVar_AF_Temp
  551. $modVar_AF_PhotoDetailsDetailed[] = $modVar_AF_TempStr
  552. modVar_AF_Temp2 = modVar_AF_PhotoTaken[modVar_AF_Temp]
  553. KILLVAR 'modVar_AF_PhotoTaken' , modVar_AF_Temp
  554. modVar_AF_PhotoTaken[] = modVar_AF_Temp2
  555. modVar_AF_Temp2 = modVar_AF_PhotoReveal[modVar_AF_Temp]
  556. KILLVAR 'modVar_AF_PhotoReveal' , modVar_AF_Temp
  557. modVar_AF_PhotoReveal[] = modVar_AF_Temp2
  558. end
  559. end
  560. if $modVar_AF_SaveVersion = 'Ver1.5.2':
  561. $modVar_AF_SaveVersion = 'Ver1.5.3'
  562. !! No Changes required; the update just fixes the Dolls name change !!
  563. end
  564. if $modVar_AF_SaveVersion = 'Ver1.5.3':
  565. $modVar_AF_SaveVersion = 'Ver1.5.4'
  566. !! No Changes required; the update just fixes the Clothing Mother Detection !!
  567. end
  568. if $modVar_AF_SaveVersion = 'Ver1.5.4':
  569. $modVar_AF_SaveVersion = 'Ver1.6'
  570. !! Forces an update of Media Files to apply fix !!
  571. gs 'mod_addedflavour_Functions' , 'UpdateMediaFiles'
  572. !! Realised that Anushkas fixed sleep cycles didnt get added when fixed before !!
  573. if modVar_AF_EventOpen['A144-UniversityEv'] = 1:
  574. $charsche_Name = 'A144_Weekdays'
  575. charsche_ID = 144
  576. charsche_StartTime = 1350
  577. charsche_EndTime = 405
  578. $charsche_Days = '12347'
  579. gs 'mod_addedflavour_charsche' , 'addsleep'
  580. $charsche_Name = 'A144_Weekends'
  581. charsche_ID = 144
  582. charsche_StartTime = 1425
  583. charsche_EndTime = 435
  584. $charsche_Days = '56'
  585. gs 'mod_addedflavour_charsche' , 'addsleep'
  586. end
  587. !! Adjusts Kazumis Wake Time !!
  588. charsche_sleepcycle_EndTime[arrpos('$charsche_sleeplist','A700_Weekdays')] = 420
  589. !! Fixes Sleep Cycles to see Sunday as a Weekday !!
  590. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A34_Weekdays')] = '12347'
  591. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A700_Weekdays')] = '12347'
  592. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A701_Weekdays')] = '12347'
  593. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A702_Weekdays')] = '12347'
  594. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A34_Weekends')] = '56'
  595. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A700_Weekends')] = '56'
  596. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A701_Weekends')] = '56'
  597. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A702_Weekends')] = '56'
  598. !! Friday Afternoon University Slot errornously given to Janina instead of Kazumi - Fix !!
  599. $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Friday Late')] = 'A144XA700XA701X'
  600. !! Replaced Errorloc Variable !!
  601. KILLVAR '$charsche_errorloc'
  602. !! Made League Vars relevant to Volleyball so Football can have similar !!
  603. if arrsize('$modArr_AF_LeagueA_TeamName') > 0 : copyarr '$modArr_AF_VLeagueA_TeamName' , '$modArr_AF_LeagueA_TeamName' & KILLVAR '$modArr_AF_LeagueA_TeamName'
  604. if arrsize('modArr_AF_LeagueA_Wins') > 0 : copyarr 'modArr_AF_VLeagueA_Wins' , 'modArr_AF_LeagueA_Wins' & KILLVAR 'modArr_AF_LeagueA_Wins'
  605. if arrsize('modArr_AF_LeagueA_PointsFor') > 0 : copyarr 'modArr_AF_VLeagueA_PointsFor' , 'modArr_AF_LeagueA_PointsFor' & KILLVAR 'modArr_AF_LeagueA_PointsFor'
  606. if arrsize('modArr_AF_LeagueA_PointsAgainst') > 0 : copyarr 'modArr_AF_VLeagueA_PointsAgainst' , 'modArr_AF_LeagueA_PointsAgainst' & KILLVAR 'modArr_AF_LeagueA_PointsAgainst'
  607. if arrsize('$modArr_AF_LeagueA_Games') > 0 : copyarr '$modArr_AF_VLeagueA_Games' , '$modArr_AF_LeagueA_Games' & KILLVAR '$modArr_AF_LeagueA_Games'
  608. if arrsize('$modArr_AF_LeagueB_TeamName') > 0 : copyarr '$modArr_AF_VLeagueB_TeamName' , '$modArr_AF_LeagueB_TeamName' & KILLVAR '$modArr_AF_LeagueB_TeamName'
  609. if arrsize('modArr_AF_LeagueB_Wins') > 0 : copyarr 'modArr_AF_VLeagueB_Wins' , 'modArr_AF_LeagueB_Wins' & KILLVAR 'modArr_AF_LeagueB_Wins'
  610. if arrsize('modArr_AF_LeagueB_PointsFor') > 0 : copyarr 'modArr_AF_VLeagueB_PointsFor' , 'modArr_AF_LeagueB_PointsFor' & KILLVAR 'modArr_AF_LeagueB_PointsFor'
  611. if arrsize('modArr_AF_LeagueB_PointsAgainst') > 0 : copyarr 'modArr_AF_VLeagueB_PointsAgainst' , 'modArr_AF_LeagueB_PointsAgainst' & KILLVAR 'modArr_AF_LeagueB_PointsAgainst'
  612. if arrsize('$modArr_AF_LeagueB_Games') > 0 : copyarr '$modArr_AF_VLeagueB_Games' , '$modArr_AF_LeagueB_Games' & KILLVAR '$modArr_AF_LeagueB_Games'
  613. !! Removes large array as it is only used when setting up the tournament !!
  614. if arrsize('$modArr_AF_FNamePool') > 0 : KILLVAR '$modArr_AF_FNamePool'
  615. if arrsize('$modArr_AF_LNamePool') > 0 : KILLVAR '$modArr_AF_LNamePool'
  616. !! Alters Rent for Shared Apartment !!
  617. if modVar_AF_SFLA_AptState['Rent'] > 0 : modVar_AF_SFLA_AptState['Rent'] = 1000 * difficulty
  618. !! Sets Night Club Activity to be available on Sundays as well as bring it forward !!
  619. $charsche_activity_Days[arrpos('$charsche_actlist','cityNightClub - Partying')] = '567'
  620. charsche_activity_StartTime[arrpos('$charsche_actlist','cityNightClub - Partying')] = 1080
  621. !! Although Variables arent used yet, they are wrong so replaced them !!
  622. modVar_AF_SexProg['A34XA700'] = modVar_AF_SexProg['A700XA34']
  623. modVar_AF_SexProg['A34XA701'] = modVar_AF_SexProg['A701XA34']
  624. modVar_AF_SexProg['A34XA702'] = modVar_AF_SexProg['A702XA34']
  625. modVar_AF_SexProg['A700XA34'] = 999999999
  626. KILLVAR 'modVar_AF_SexProg' , arrpos('modVar_AF_SexProg',999999999)
  627. modVar_AF_SexProg['A701XA34'] = 999999999
  628. KILLVAR 'modVar_AF_SexProg' , arrpos('modVar_AF_SexProg',999999999)
  629. modVar_AF_SexProg['A702XA34'] = 999999999
  630. KILLVAR 'modVar_AF_SexProg' , arrpos('modVar_AF_SexProg',999999999)
  631. !! Anushka University Time Table might not be correct - wasnt for my save - this corrects it !!
  632. if strpos($charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Monday Early')],'A144X') <= 0 : $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Monday Early')] += 'A144X'
  633. if strpos($charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Monday Late')],'A144X') <= 0 : $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Monday Late')] += 'A144X'
  634. if strpos($charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Tuesday Late')],'A144X') <= 0 : $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Tuesday Late')] += 'A144X'
  635. if strpos($charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Wednesday Early')],'A144X') <= 0 : $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Wednesday Early')] += 'A144X'
  636. if strpos($charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Thursday Early')],'A144X') <= 0 : $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Thursday Early')] += 'A144X'
  637. if strpos($charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Friday Early')],'A144X') <= 0 : $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Friday Early')] += 'A144X'
  638. if strpos($charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Friday Late')],'A144X') <= 0 : $charsche_workcycle_Chars[arrpos('$charsche_worklist','CityUniversity - Student - Friday Late')] += 'A144X'
  639. !! Anushka Sleep Cycles were the wrong way round !!
  640. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A144_Weekdays')] = '12347'
  641. $charsche_sleepcycle_Days[arrpos('$charsche_sleeplist','A144_Weekends')] = '56'
  642. !! Found these werent on my Save, might be same for others !!
  643. $charsche_Name = 'CityPatchworkDolls - PartTimeWork'
  644. $charsche_Location = 'dolls'
  645. $charsche_Action = 'Working'
  646. charsche_StartTime = 480
  647. charsche_EndTime = 1320
  648. charsche_MinLen = 30
  649. charsche_MaxLen = 60
  650. charsche_Priority = 2
  651. charsche_Active = 1
  652. charsche_LocConflict = 0
  653. $charsche_Chars = 'A144X'
  654. $charsche_Days = '1234567'
  655. gs 'mod_addedflavour_charsche' , 'addact'
  656. $charsche_Name = 'Aphrodite - Modelling'
  657. $charsche_Location = 'foto'
  658. $charsche_Action = 'Modelling'
  659. charsche_StartTime = 540
  660. charsche_EndTime = 1080
  661. charsche_MinLen = 60
  662. charsche_MaxLen = 120
  663. charsche_Priority = 2
  664. charsche_Active = 1
  665. charsche_LocConflict = 0
  666. $charsche_Chars = 'A144X'
  667. $charsche_Days = '1234567'
  668. gs 'mod_addedflavour_charsche' , 'addact'
  669. !! Makes a Mandatory Work Event for Anushka at Patchwork Dolls !!
  670. if modVar_AF_EventOpen['A144-UniversityEv'] = 1:
  671. $charsche_Name = 'CityPatchworkDolls - PartTimeWork'
  672. $charsche_Location = 'dolls'
  673. charsche_StartTime = 720
  674. charsche_EndTime = 1080
  675. $charsche_Chars = 'A144X'
  676. $charsche_Days = '67'
  677. gs 'mod_addedflavour_charsche' , 'addwork'
  678. end
  679. end
  680. if $modVar_AF_SaveVersion = 'Ver1.6':
  681. $modVar_AF_SaveVersion = 'Ver1.6.1'
  682. !! Lowers Apartment Rent !!
  683. modVar_AF_SFLA_AptState['Rent'] = 500 * difficulty
  684. end
  685. if $modVar_AF_SaveVersion = 'Ver1.6.1':
  686. $modVar_AF_SaveVersion = 'Ver1.6.2'
  687. !! Runs Zinaidas config !!
  688. gs 'mod_addedflavour_A142_Functions' , 'config'
  689. end
  690. end
  691. !! Code provides a clarification before erasing Mod variables !!
  692. if $ARGS[0] = 'areyousure':
  693. *clr & cla
  694. $modVar_AF_TempStr = $ARGS[1]
  695. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/system/stop.jpg"></center>'
  696. *nl
  697. '<center>Are you sure you want to remove all variables and progress regarding <<$modVar_AF_TempStr>> Mod Content?</center>'
  698. *nl
  699. '<center><a href="exec: gs ''mod_addedflavour_Functions'', ''resetmodvars'' , $modVar_AF_TempStr & gt ''mod_addedflavour_options'' ">Yes</a> or <a href="exec: gt ''mod_addedflavour_options'' ">No</a>'
  700. end
  701. if $ARGS[0] = 'textsubcom':
  702. if $ARGS[1] = 'prep':
  703. KILLVAR '$modVar_AF_Txt1'
  704. KILLVAR '$modVar_AF_Txt2'
  705. KILLVAR '$modVar_AF_Txt3'
  706. KILLVAR '$modVar_AF_Txt4'
  707. $modVar_AF_Txt1 = 'No Event Name Recorded'
  708. $modVar_AF_Txt2 = 'No ID Used'
  709. $modVar_AF_Txt3 = 'No Existing Text submitted'
  710. $modVar_AF_Txt4 = 'No Alternative Text submitted'
  711. end
  712. if $ARGS[1] = 'txt1':
  713. $modVar_AF_Txt1 = input("NPC Event (Name or Description of Event you are wishing to change)")
  714. end
  715. if $ARGS[1] = 'txt2':
  716. $modVar_AF_Txt2 = input("Linear Tracer ID (Just in case you are writing multiple suggestion but need an ID to indicate they are all part of the same theme)")
  717. end
  718. if $ARGS[1] = 'txt3':
  719. $modVar_AF_Txt3 = input("Existing Text (Copy and Paste Existing Text you have alternative writing for)")
  720. end
  721. if $ARGS[1] = 'txt4':
  722. $modVar_AF_Txt4 = input("Alternative Text (Your alternative text that would replace what you have included as Existing Test)")
  723. end
  724. end
  725. if $ARGS[0] = 'textsub':
  726. *clr & cla
  727. *nl
  728. '<center><b>Text Submission</b></center>'
  729. *nl
  730. '<a href="exec: gs ''mod_addedflavour_Functions'' , ''textsubcom'' , ''txt1'' & gt ''mod_addedflavour_Functions'' , ''textsub'' ">NPC Event</a>: [<<$modVar_AF_Txt1>>]'
  731. *nl
  732. '<a href="exec: gs ''mod_addedflavour_Functions'' , ''textsubcom'' , ''txt2'' & gt ''mod_addedflavour_Functions'' , ''textsub'' ">Linear Tracer</a>: [<<$modVar_AF_Txt2>>]'
  733. *nl
  734. '<a href="exec: gs ''mod_addedflavour_Functions'' , ''textsubcom'' , ''txt3'' & gt ''mod_addedflavour_Functions'' , ''textsub'' ">Existing Text</a>: [<<$modVar_AF_Txt3>>]'
  735. *nl
  736. '<a href="exec: gs ''mod_addedflavour_Functions'' , ''textsubcom'' , ''txt4'' & gt ''mod_addedflavour_Functions'' , ''textsub'' ">Alternative Text</a>: [<<$modVar_AF_Txt4>>]'
  737. *nl
  738. 'In the above format you can suggest a re-write of any existing text that is part of the Mod Content and submit on the forums. There is no guarantee that it will be taken on board but if it is good and/or popular they''ll probably be no harm in using it. You''ll be aware that some events have text only visible under certain conditions but that''ll be taken into account, just make sure the existing text is exactly what you would like replaced.'
  739. *nl
  740. 'Once filled out all you will need to do is copy and paste it directly from QSP.'
  741. act 'Return to Mod Options' : gt 'mod_addedflavour_options'
  742. end
  743. if $ARGS[0] = 'ErrorReportInput':
  744. if $ARGS[1] = 'prep':
  745. KILLVAR '$modVar_AF_Txt1'
  746. KILLVAR '$modVar_AF_Txt2'
  747. $modVar_AF_Txt1 = 'A Description of the Problem'
  748. $modVar_AF_Txt2 = 'The QSP Player being used'
  749. end
  750. if $ARGS[1] = 'txt1':
  751. $modVar_AF_Txt1 = input("Type out a Description of the Problem in as much Detail as you feel is relevant")
  752. end
  753. if $ARGS[1] = 'txt2':
  754. $modVar_AF_Txt2 = input("Type out the QSP Application you are using")
  755. end
  756. end
  757. if $ARGS[0] = 'ErrorReport':
  758. *clr & cla
  759. *nl
  760. '<center><b>Error Submission</b></center>'
  761. *nl
  762. 'Main Game Version: <<$version>>'
  763. *nl
  764. 'Modification Code Version: <<$modVar_AF_ModVersion>>'
  765. *nl
  766. 'Modification Save Version: <<$modVar_AF_SaveVersion>>'
  767. *nl
  768. '<a href="exec: gs ''mod_addedflavour_Functions'' , ''ErrorReportInput'' , ''txt2'' & gt ''mod_addedflavour_Functions'' , ''ErrorReport'' ">QSP Player in use</a>: [<<$modVar_AF_Txt2>>]'
  769. *nl
  770. '<a href="exec: gs ''mod_addedflavour_Functions'' , ''ErrorReportInput'' , ''txt1'' & gt ''mod_addedflavour_Functions'' , ''ErrorReport'' ">Description of Error</a>: [<<$modVar_AF_Txt1>>]'
  771. *nl
  772. 'Variable String : #Bug <<day>>#<<month>>#<<week>>#<<year>>#<<$loc>>#<<$loc_arg>>#<<$modVar_AF_CurLoc>>#<<modVar_AF_Rand>>#<<modVar_AF_Temp>>#<<modVar_AF_Temp2>>#<<$modVar_AF_TempStr>>'
  773. *nl
  774. 'Once filled out all you will need to do is copy and paste it directly from QSP into the Forum Thread.'
  775. act 'Return to Mod Options' : gt 'mod_addedflavour_options'
  776. end
  777. !! Function for Horny and Inhib Actions !!
  778. !! Expected Procedure Call - gs 'mod_addedflavour_Functions' , 'pcs_reticence' , [Action] , [ActionVar] !!
  779. if $ARGS[0] = 'pcs_reticence':
  780. modVar_AF_Inhib['Result'] = 0
  781. if $ARGS[1] = 'chkpossible':
  782. if ARGS[2] = 3:
  783. if pcs_inhib >= modVar_AF_Inhib['lv3']:
  784. modVar_AF_Inhib['Result'] = 1
  785. elseif pcs_horny >= 50 and pcs_inhib >= modVar_AF_Inhib['lv2']:
  786. modVar_AF_Inhib['Result'] = 1
  787. elseif pcs_horny >= 90 and pcs_inhib >= modVar_AF_Inhib['lv1']:
  788. modVar_AF_Inhib['Result'] = 1
  789. else
  790. modVar_AF_Inhib['Result'] = 0
  791. end
  792. elseif ARGS[2] = 2:
  793. if pcs_inhib >= modVar_AF_Inhib['lv2']:
  794. modVar_AF_Inhib['Result'] = 1
  795. elseif pcs_horny >= 50 and pcs_inhib >= modVar_AF_Inhib['lv1']:
  796. modVar_AF_Inhib['Result'] = 1
  797. elseif pcs_horny >= 90:
  798. modVar_AF_Inhib['Result'] = 1
  799. else
  800. modVar_AF_Inhib['Result'] = 0
  801. end
  802. elseif ARGS[2] = 1:
  803. if pcs_inhib >= modVar_AF_Inhib['lv1']:
  804. modVar_AF_Inhib['Result'] = 1
  805. elseif pcs_horny >= 50:
  806. modVar_AF_Inhib['Result'] = 1
  807. else
  808. modVar_AF_Inhib['Result'] = 0
  809. end
  810. elseif ARGS[2] = 0:
  811. if pcs_inhib >= modVar_AF_Inhib['lv3']:
  812. modVar_AF_Inhib['Result'] = 3
  813. elseif pcs_horny >= 50 and pcs_inhib >= modVar_AF_Inhib['lv2']:
  814. modVar_AF_Inhib['Result'] = 3
  815. elseif pcs_horny >= 90 and pcs_inhib >= modVar_AF_Inhib['lv1']:
  816. modVar_AF_Inhib['Result'] = 3
  817. elseif pcs_inhib >= modVar_AF_Inhib['lv2']:
  818. modVar_AF_Inhib['Result'] = 2
  819. elseif pcs_horny >= 50 and pcs_inhib >= modVar_AF_Inhib['lv1']:
  820. modVar_AF_Inhib['Result'] = 2
  821. elseif pcs_horny >= 90:
  822. modVar_AF_Inhib['Result'] = 2
  823. elseif pcs_inhib >= modVar_AF_Inhib['lv1']:
  824. modVar_AF_Inhib['Result'] = 1
  825. elseif pcs_horny >= 50:
  826. modVar_AF_Inhib['Result'] = 1
  827. else
  828. modVar_AF_Inhib['Result'] = 0
  829. end
  830. end
  831. end
  832. if $ARGS[1] = 'Player_ShowBody':
  833. modVar_AF_HornGain = 10
  834. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  835. CLOSE ALL
  836. pcs_horny += modVar_AF_HornGain
  837. if pcs_Inhib < modVar_AF_Inhib['lv1'] : inhib_exp += rand(2,4)
  838. minut += rand(2,8)
  839. elseif $ARGS[1] = 'Player_Voyeur':
  840. modVar_AF_HornGain = 15
  841. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  842. CLOSE ALL
  843. pcs_horny += modVar_AF_HornGain
  844. if pcs_Inhib < modVar_AF_Inhib['lv1'] : inhib_exp += rand(2,4)
  845. minut += rand(2,8)
  846. elseif $ARGS[1] = 'Player_Touch_Recv':
  847. modVar_AF_HornGain = 50
  848. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  849. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'FSMoan1' , 'FSMoan2' , 'FSMoan3'
  850. pcs_horny += modVar_AF_HornGain
  851. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  852. minut += rand(2,8)
  853. elseif $ARGS[1] = 'Player_Touch_Give':
  854. modVar_AF_HornGain = 20
  855. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  856. CLOSE ALL
  857. pcs_horny += modVar_AF_HornGain
  858. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  859. minut += rand(2,8)
  860. elseif $ARGS[1] = 'Player_Kiss':
  861. modVar_AF_HornGain = 60
  862. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  863. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'Kiss1' , 'Kiss2' , 'Kiss3'
  864. pcs_horny += modVar_AF_HornGain
  865. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  866. minut += rand(2,8)
  867. elseif $ARGS[1] = 'Player_TitPlay_Recv':
  868. modVar_AF_HornGain = 60
  869. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  870. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'FSMoan1' , 'FSMoan2' , 'FSMoan3'
  871. pcs_horny += modVar_AF_HornGain
  872. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  873. minut += rand(2,8)
  874. elseif $ARGS[1] = 'Player_TitPlay_Give':
  875. modVar_AF_HornGain = 25
  876. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  877. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'FSMoan1' , 'FSMoan2' , 'FSMoan3'
  878. pcs_horny += modVar_AF_HornGain
  879. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  880. minut += rand(2,8)
  881. elseif $ARGS[1] = 'Player_VagPlay_Recv':
  882. modVar_AF_HornGain = 80
  883. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  884. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'FMoan1' , 'FMoan2' , 'FMoan3'
  885. pcs_horny += modVar_AF_HornGain
  886. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  887. minut += rand(2,8)
  888. elseif $ARGS[1] = 'Player_VagPlay_Give':
  889. modVar_AF_HornGain = 30
  890. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  891. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'FMoan1' , 'FMoan2' , 'FMoan3'
  892. pcs_horny += modVar_AF_HornGain
  893. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  894. minut += rand(2,8)
  895. elseif $ARGS[1] = 'Player_HandJob_Give':
  896. modVar_AF_HornGain = 30
  897. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  898. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'HJ1' , 'HJ1' , 'HJ1'
  899. pcs_horny += modVar_AF_HornGain
  900. if pcs_Inhib < modVar_AF_Inhib['lv2'] : inhib_exp += rand(3,8)
  901. minut += rand(2,8)
  902. elseif $ARGS[1] = 'Player_Oral_Recv':
  903. modVar_AF_HornGain = 90
  904. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  905. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'FMoan1' , 'FMoan2' , 'FMoan3'
  906. pcs_horny += modVar_AF_HornGain
  907. if pcs_Inhib < modVar_AF_Inhib['lv3'] : inhib_exp += rand(4,12)
  908. minut += rand(2,8)
  909. elseif $ARGS[1] = 'Player_Cuni_Give':
  910. modVar_AF_HornGain = 35
  911. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  912. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'FMoan1' , 'FMoan2' , 'FMoan3'
  913. pcs_horny += modVar_AF_HornGain
  914. if pcs_Inhib < modVar_AF_Inhib['lv3'] : inhib_exp += rand(4,12)
  915. minut += rand(2,8)
  916. elseif $ARGS[1] = 'Player_BlowJob_Give':
  917. modVar_AF_HornGain = 40
  918. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  919. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'BJ1' , 'BJ2' , 'BJ3'
  920. pcs_horny += modVar_AF_HornGain
  921. if pcs_Inhib < modVar_AF_Inhib['lv3'] : inhib_exp += rand(4,12)
  922. minut += rand(2,8)
  923. elseif $ARGS[1] = 'Player_VagSex':
  924. modVar_AF_HornGain = 100
  925. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  926. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'Sex1' , 'Sex2' , 'Sex3'
  927. pcs_horny += modVar_AF_HornGain
  928. if pcs_Inhib < modVar_AF_Inhib['lv3'] : inhib_exp += rand(4,12)
  929. minut += rand(2,8)
  930. elseif $ARGS[1] = 'Player_AnalSex':
  931. modVar_AF_HornGain = 80
  932. gs 'mod_addedflavour_Functions' , 'horngaincalc'
  933. gs 'mod_addedflavour_Functions' , 'sexsoundgen' , 'Sex1' , 'Sex2' , 'Sex3'
  934. pcs_horny += modVar_AF_HornGain
  935. if pcs_Inhib < modVar_AF_Inhib['lv3'] : inhib_exp += rand(4,12)
  936. minut += rand(2,8)
  937. end
  938. end
  939. if $ARGS[0] = 'horngaincalc':
  940. modVar_AF_RandLower = (modVar_AF_HornGain - pcs_horny) - ((100 - pcs_inhib) / 2)
  941. if modVar_AF_RandLower < 1 : modVar_AF_RandLower = 1
  942. modVar_AF_RandUpper = modVar_AF_RandLower + ((100 - pcs_horny) - (100 - pcs_inhib))
  943. if modVar_AF_RandUpper <= modVar_AF_RandLower : modVar_AF_RandUpper = modVar_AF_RandLower + 1
  944. modVar_AF_HornGain = rand(modVar_AF_RandLower,modVar_AF_RandUpper)
  945. end
  946. if $ARGS[0] = 'sexsoundgen':
  947. if sound ! 1 and modVar_AF_SexSounds ! 1:
  948. CLOSE ALL
  949. modVar_AF_Rand = rand(1,3)
  950. $mod_addedflavour_TempStr = $ARGS[modVar_AF_Rand]
  951. PLAY 'mod/addedflavour/sound/<<$mod_addedflavour_TempStr>>.mp3' , 50
  952. end
  953. end
  954. if $ARGS[0] = 'npchorncalc':
  955. if $ARGS[1] = 'Gain':
  956. npc_horny['A<<ARGS[2]>>'] += ARGS[3]
  957. if npc_horny['A<<ARGS[2]>>'] > 100 : npc_horny['A<<ARGS[2]>>'] = 100
  958. elseif $ARGS[1] = 'Loss':
  959. npc_horny['A<<ARGS[2]>>'] -= ARGS[3]
  960. if npc_horny['A<<ARGS[2]>>'] < 0 : npc_horny['A<<ARGS[2]>>'] = 0
  961. end
  962. end
  963. if $ARGS[0] = 'MediaTest':
  964. *clr & cla
  965. if $ARGS[1] = 'Video':
  966. if $ARGS[2] = '':
  967. if modVar_AF_QSPVer = 1:
  968. $modVar_AF_TempStr = '.mp4'
  969. else
  970. $modVar_AF_TempStr = '.webm'
  971. end
  972. else
  973. $modVar_AF_TempStr = $ARGS[2]
  974. end
  975. '<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/system/TestVideo<<$modVar_AF_TempStr>>"></video></center>'
  976. $modVar_AF_TempStr = 'The Above Window should be displaying a Video in the <<$modVar_AF_TempStr>> format with the Set Size Restrictions (Size Restrictions available for Sonnix QSP Player Only). If it does not display then either the version of files it is looking for are not in the Mod Folder or a different QSP Player is required.'
  977. elseif $ARGS[1] = 'Image':
  978. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/system/TestImage.webp"></center>'
  979. $modVar_AF_TempStr = 'The Above Window should be displaying a Image with the Set Size Restrictions (Sonnix QSP Player Only).'
  980. end
  981. '<<$modVar_AF_TempStr>>'
  982. act 'Return' : gt 'mod_addedflavour_options'
  983. end
  984. if $ARGS[0] = 'MediaSizeChange':
  985. if $ARGS[1] = 'Setup':
  986. modVar_AF_ImageHeight = 60
  987. modVar_AF_VideoHeight = 70
  988. if $ARGS[2] = 'Image' or $ARGS[2] = '' : $modVar_AF_ImageRestrictions = 'max-width:95vh;max-height:<<modVar_AF_ImageHeight>>vh;'
  989. if $ARGS[2] = 'Video' or $ARGS[2] = '' : $modVar_AF_VideoRestrictions = 'max-width:100vh;max-height:<<modVar_AF_VideoHeight>>vh;'
  990. elseif $ARGS[1] = 'Image':
  991. if $ARGS[2] = 'Increase':
  992. modVar_AF_ImageHeight += 10
  993. if modVar_AF_ImageHeight > 100 : modVar_AF_ImageHeight = 100
  994. $modVar_AF_ImageRestrictions = 'max-width:95vh;max-height:<<modVar_AF_ImageHeight>>vh;'
  995. elseif $ARGS[2] = 'Decrease':
  996. modVar_AF_ImageHeight -= 10
  997. if modVar_AF_ImageHeight < 20 : modVar_AF_ImageHeight = 20
  998. $modVar_AF_ImageRestrictions = 'max-width:95vh;max-height:<<modVar_AF_ImageHeight>>vh;'
  999. end
  1000. elseif $ARGS[1] = 'Video':
  1001. if $ARGS[2] = 'Increase':
  1002. modVar_AF_VideoHeight += 10
  1003. if modVar_AF_VideoHeight > 100 : modVar_AF_VideoHeight = 100
  1004. $modVar_AF_VideoRestrictions = 'max-width:95vh;max-height:<<modVar_AF_VideoHeight>>vh;'
  1005. elseif $ARGS[2] = 'Decrease':
  1006. modVar_AF_VideoHeight -= 10
  1007. if modVar_AF_VideoHeight < 20 : modVar_AF_VideoHeight = 20
  1008. $modVar_AF_VideoRestrictions = 'max-width:95vh;max-height:<<modVar_AF_VideoHeight>>vh;'
  1009. end
  1010. end
  1011. end
  1012. if $ARGS[0] = 'InitialConfig':
  1013. modVar_AF_InitialConfigRun = 1
  1014. modVar_AF_Inhib['lv1'] = 30
  1015. modVar_AF_Inhib['lv2'] = 50
  1016. modVar_AF_Inhib['lv3'] = 80
  1017. $modVar_AF_NPCLastKnownLocation['DayTracker'] = daystart
  1018. $modVar_AF_ImageRestrictions = 'max-width:95vh;max-height:60vh;'
  1019. $modVar_AF_VideoRestrictions = 'max-width:100vh;max-height:70vh;'
  1020. if Storyline = 1:
  1021. gs 'mod_addedflavour_A28_Functions' , 'config'
  1022. gs 'mod_addedflavour_A29_Functions' , 'config'
  1023. gs 'mod_addedflavour_A32_Functions' , 'config'
  1024. gs 'mod_addedflavour_A33_Functions' , 'config'
  1025. gs 'mod_addedflavour_A34_Functions' , 'config'
  1026. gs 'mod_addedflavour_A130_Functions' , 'config'
  1027. gs 'mod_addedflavour_A704_Functions' , 'config'
  1028. end
  1029. gs 'mod_addedflavour_A77_Functions' , 'config'
  1030. gs 'mod_addedflavour_A142_Functions' , 'config'
  1031. gs 'mod_addedflavour_A204_Functions' , 'config'
  1032. gs 'mod_addedflavour_A205_Functions' , 'config'
  1033. gs 'mod_addedflavour_A700_Functions' , 'config'
  1034. gs 'mod_addedflavour_A701_Functions' , 'config'
  1035. gs 'mod_addedflavour_A702_Functions' , 'config'
  1036. gs 'mod_addedflavour_KSY_Functions' , 'config'
  1037. gs 'mod_addedflavour_charscheconf' , 'configure'
  1038. end
  1039. if $ARGS[0] = 'UpdateMediaFiles':
  1040. if arrsize('$modArr_AF_A700_ImagesLoc') > 0 : gs 'mod_addedflavour_A700_Functions' , 'A700-FileRepository-Config' , 'Images'
  1041. if arrsize('$modArr_AF_A700_SexVideoLoc') > 0 : gs 'mod_addedflavour_A700_Functions' , 'A700-FileRepository-Config' , 'Videos'
  1042. if arrsize('$modArr_AF_A701_ImagesLoc') > 0 : gs 'mod_addedflavour_A701_Functions' , 'A701-FileRepository-Config' , 'Images'
  1043. if arrsize('$modArr_AF_A701_SexVideoLoc') > 0 : gs 'mod_addedflavour_A701_Functions' , 'A701-FileRepository-Config' , 'Videos'
  1044. if arrsize('$modArr_AF_A702_ImagesLoc') > 0 : gs 'mod_addedflavour_A702_Functions' , 'A702-FileRepository-Config' , 'Images'
  1045. if arrsize('$modArr_AF_A702_SexVideoLoc') > 0 : gs 'mod_addedflavour_A702_Functions' , 'A702-FileRepository-Config' , 'Videos'
  1046. if arrsize('$modArr_AF_A34_ImagesLoc') > 0 : gs 'mod_addedflavour_A34_Functions' , 'A34-FileRepository-Config' , 'Images'
  1047. if arrsize('$modArr_AF_A34_SexVideoLoc') > 0 : gs 'mod_addedflavour_A34_Functions' , 'A34-FileRepository-Config' , 'Videos'
  1048. if arrsize('$modArr_AF_A144_ImagesLoc') > 0 : gs 'mod_addedflavour_A144_Functions' , 'A144-FileRepository-Config' , 'Images'
  1049. if arrsize('$modArr_AF_A4_ImagesLoc') > 0 : gs 'mod_addedflavour_A4_Functions' , 'A4-FileRepository-Config' , 'Images'
  1050. if arrsize('$modArr_AF_Activity_ImagesLoc') > 0 : gs 'mod_addedflavour_SFLA_Functions' , 'ActivityImage-Config'
  1051. end
  1052. if $ARGS[0] = 'takephotograph':
  1053. *clr & cla
  1054. CLOSE ALL
  1055. minut += rand(1,3)
  1056. $modVar_AF_TempStr = $ARGS[1]
  1057. modVar_AF_Temp = arrpos('$modVar_AF_PhotoName',$modVar_AF_TempStr)
  1058. modVar_AF_PhotoTaken[modVar_AF_Temp] = 1
  1059. if sound ! 1 : PLAY 'mod/addedflavour/sound/Camera.mp3' , 50
  1060. gs 'stat'
  1061. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/city/citycenter/mall/photoshop/Pictures/<<$modVar_AF_TempStr>>.jpg"></center>'
  1062. *nl
  1063. '<center>You take the photograph; "<<$modVar_AF_PhotoDetailsSubtle[modVar_AF_Temp]>>" and add it to your portfolio.</center>'
  1064. act 'Return' : gt $loc, $loc_arg
  1065. end
  1066. if $ARGS[0] = 'addtosgt':
  1067. addtosgtloopcount = 0
  1068. :addtosgtloopstart
  1069. if addtosgtloopcount >= arrsize('$modArr_AF_SUTItemName') : jump 'addtosgtloopend'
  1070. if $modArr_AF_SUTItemName[addtosgtloopcount] ! '':
  1071. addtosgtloopcount += 1
  1072. jump 'addtosgtloopstart'
  1073. end
  1074. if modArr_AF_SUTItemCost[addtosgtloopcount] ! 0:
  1075. addtosgtloopcount += 1
  1076. jump 'addtosgtloopstart'
  1077. end
  1078. :addtosgtloopend
  1079. $modArr_AF_SUTItemName[addtosgtloopcount] = $ARGS[1]
  1080. modArr_AF_SUTItemCost[addtosgtloopcount] = ARGS[2]
  1081. end
  1082. if $ARGS[0] = 'removefromsgt':
  1083. modVar_AF_Temp = arrpos('$modArr_AF_SUTItemName',$ARGS[1])
  1084. KILLVAR '$modArr_AF_SUTItemName' , modVar_AF_Temp
  1085. KILLVAR 'modArr_AF_SUTItemCost' , modVar_AF_Temp
  1086. end
  1087. if $ARGS[0] = 'setcardetails':
  1088. if $ARGS[1] = 'car6' : $modVar_AF_TempStr = 'Kalina Vaz (Vehicle)' & modVar_AF_Temp = 400000
  1089. if $ARGS[1] = 'car7' : $modVar_AF_TempStr = 'WHA Priora (Vehicle)' & modVar_AF_Temp = 450000
  1090. if $ARGS[1] = 'car8' : $modVar_AF_TempStr = 'Chevrolet Niva (Vehicle)' & modVar_AF_Temp = 500000
  1091. if $ARGS[1] = 'car9' : $modVar_AF_TempStr = 'UAZ Hunter (Vehicle)' & modVar_AF_Temp = 500000
  1092. if $ARGS[1] = 'car10' : $modVar_AF_TempStr = 'UAZ Patriot (Vehicle)' & modVar_AF_Temp = 600000
  1093. if $ARGS[1] = 'car13' : $modVar_AF_TempStr = 'Ford Focus 2 (Vehicle)' & modVar_AF_Temp = 500000
  1094. if $ARGS[1] = 'car102' : $modVar_AF_TempStr = 'Renault Logan (Vehicle)' & modVar_AF_Temp = 700000
  1095. if $ARGS[1] = 'car110' : $modVar_AF_TempStr = 'Ford Mondeo (Vehicle)' & modVar_AF_Temp = 85000
  1096. if $ARGS[1] = 'car104' : $modVar_AF_TempStr = 'Toyota Celica (Vehicle)' & modVar_AF_Temp = 1000000
  1097. if $ARGS[1] = 'car95' : $modVar_AF_TempStr = 'Mitsubishi l200 (Vehicle)' & modVar_AF_Temp = 1000000
  1098. if $ARGS[1] = 'car103' : $modVar_AF_TempStr = 'Toyota Corolla (Vehicle)' & modVar_AF_Temp = 1100000
  1099. if $ARGS[1] = 'car105' : $modVar_AF_TempStr = 'Mazda 6 (Vehicle)' & modVar_AF_Temp = 1200000
  1100. if $ARGS[1] = 'car106' : $modVar_AF_TempStr = 'Mercedes-Benz E212 (Vehicle)' & modVar_AF_Temp = 1700000
  1101. if $ARGS[1] = 'car109' : $modVar_AF_TempStr = 'Audi A6 (Vehicle)' & modVar_AF_Temp = 1900000
  1102. if $ARGS[1] = 'car97' : $modVar_AF_TempStr = 'Cadillac Escalade (Vehicle)' & modVar_AF_Temp = 2000000
  1103. if $ARGS[1] = 'car101' : $modVar_AF_TempStr = 'BMW Z4 (Vehicle)' & modVar_AF_Temp = 3000000
  1104. if $ARGS[1] = 'car107' : $modVar_AF_TempStr = 'BMW M5 (Vehicle)' & modVar_AF_Temp = 4500000
  1105. if $ARGS[1] = 'car99' : $modVar_AF_TempStr = 'BMW X6 (Vehicle)' & modVar_AF_Temp = 4500000
  1106. if $ARGS[1] = 'car96' : $modVar_AF_TempStr = 'Audi Q7 (Vehicle)' & modVar_AF_Temp = 5000000
  1107. if $ARGS[1] = 'car98' : $modVar_AF_TempStr = 'Porsche Cayenne (Vehicle)' & modVar_AF_Temp = 5000000
  1108. if $ARGS[1] = 'car108' : $modVar_AF_TempStr = 'Jaguar XKR-S (Vehicle)' & modVar_AF_Temp = 7000000
  1109. if $ARGS[1] = 'car100' : $modVar_AF_TempStr = 'Mercedes-Benz S600 (Vehicle)' & modVar_AF_Temp = 8000000
  1110. if $ARGS[1] = 'car111' : $modVar_AF_TempStr = 'Bentley Continental Gt (Vehicle)' & modVar_AF_Temp = 10000000
  1111. if $ARGS[1] = 'car112' : $modVar_AF_TempStr = 'Ferrari 458 Italia (Vehicle)' & modVar_AF_Temp = 20000000
  1112. end
  1113. if $ARGS[0] = 'CharscheRecords':
  1114. *clr & cla
  1115. $modVar_AF_TempStr = $ARGS[1]
  1116. gs 'mod_addedflavour_charsche' , 'acttools' , 'listrecords' , $modVar_AF_TempStr
  1117. act 'Return' : gt 'mod_addedflavour_options'
  1118. end
  1119. if $ARGS[0] = 'PregBall':
  1120. *clr & cla
  1121. menu_off = 1
  1122. minut += rand(25,35)
  1123. gs 'stat'
  1124. if (pcs_stam >= 50 or (pcs_stam >= 30 and rand(1,5) = 1)) and modVar_AF_EventLock['PregnancyBall'] ! daystart:
  1125. modVar_AF_EventLock['PregnancyBall'] = daystart
  1126. fat -= 3
  1127. pcs_energy -= 5
  1128. pcs_mood += 5
  1129. pcs_hydra -= 4
  1130. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/shared/Pregnancy/ball1.jpg"></center>'
  1131. *nl
  1132. 'You sit on your Pregnancy Ball and start doing your best to do some exercise. It is difficult moving your body around but the ball takes a lot of the strain away from your movements and you feel better for it at the end.'
  1133. else
  1134. pcs_mood += 5
  1135. pcs_stam += 5
  1136. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/shared/Pregnancy/ball2.jpg"></center>'
  1137. 'You sit on your Pregnancy Ball and think about doing some Exercise. Ultimately you give up on that plan and just lay back, letting the ball distribute your weight across it and providing comfort and relaxation as your muscles finally get some time off.'
  1138. end
  1139. act 'Get up' : gt $loc, $loc_arg
  1140. end
  1141. if $ARGS[0] = 'PregBrace':
  1142. *clr & cla
  1143. menu_off = 1
  1144. modVar_AF_EventOpen['PregnancyBrace'] = daystart
  1145. minut += rand(3,5)
  1146. gs 'stat'
  1147. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/shared/Pregnancy/brace<<rand(1,2)>>.jpg"></center>'
  1148. *nl
  1149. 'You grab your Pregnancy Brace and put it on, letting it shift more of the weight into a more balanced distribution.'
  1150. act 'Return' : gt $loc, $loc_arg
  1151. end
  1152. if $ARGS[0] = 'PregPillow':
  1153. *clr & cla
  1154. menu_off = 1
  1155. minut += rand(55,65)
  1156. pcs_mood += 15
  1157. pcs_stam += 10
  1158. pcs_energy += 5
  1159. gs 'stat'
  1160. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/shared/Pregnancy/pillow.jpg"></center>'
  1161. *nl
  1162. 'You slump down and wrap the Pregnancy Pillow around yourself, letting yourself sink down as it hugs you and takes the weight off your frame.'
  1163. act 'Get up' : gt $loc, $loc_arg
  1164. end
  1165. if $ARGS[0] = 'PregPills':
  1166. *clr & cla
  1167. menu_off = 1
  1168. minut += 2
  1169. modArr_AF_MaternityItemOwned[arrpos('$modArr_AF_MaternityItemName','Morning Sickness Pills')] -= 1
  1170. modVar_AF_EventLock['PregnancyPills'] = daystart
  1171. if pcs_hydra >= 100:
  1172. pcs_hydra += 25
  1173. else
  1174. pcs_hydra += 50
  1175. end
  1176. pcs_mood += 20
  1177. pcs_health += 10
  1178. gs 'stat'
  1179. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/city/citycenter/SharedFLApartment/Medication.jpg"></center>'
  1180. *nl
  1181. 'You take a Morning Sickness Pill and swig it back with a glass of water.'
  1182. act 'Move away': gt $loc, $loc_arg
  1183. end
  1184. --- mod_addedflavour_Functions ---------------------------------