mod_addedflavour_SFLA_Bedr3.qsrc 2.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142
  1. # mod_addedflavour_SFLA_Bedr3
  2. if $ARGS[0] = 'start' or $ARGS[0] = '':
  3. CLOSE ALL
  4. $locM = 'mod_addedflavour_SFLA_Bedr3'
  5. $locM_arg = 'start'
  6. $loc = 'mod_addedflavour_SFLA_Bedr3'
  7. $loc_arg = 'start'
  8. $menu_loc = 'mod_addedflavour_SFLA_Bedr3'
  9. $menu_arg = 'start'
  10. menu_off = 0
  11. $location_type = 'private'
  12. gs 'themes', 'indoors'
  13. gs 'mod_addedflavour_charsche' , 'chkschedule'
  14. gs 'stat'
  15. *clr & cla
  16. gs 'mod_addedflavour_SFLA_Functions' , 'whoelse' , 'mod_addedflavour_SFLA_Bedr3' , 'Sex'
  17. if arrsize('modArr_AF_SFLA_SharedActPeopleArray') > 0 : gt 'mod_addedflavour_SFLA_SexFunctions' , 'npcsex' , modArr_AF_SFLA_SharedActPeopleArray[0] , modArr_AF_SFLA_SharedActPeopleArray[1]
  18. if sound = 0 : gs 'mod_addedflavour_SFLA_Functions' , 'soundgen'
  19. if modVar_AF_SFLA_AptRProg['Bedr3'] >= modVar_AF_SFLA_AptRProg['Lv2Req']:
  20. $modVar_AF_TempStr = 'Lv2'
  21. else
  22. $modVar_AF_TempStr = 'Lv1'
  23. end
  24. gs 'mod_addedflavour_SFLA_Functions' , 'whoelse' , 'mod_addedflavour_SFLA_Bedr3' , 'Any'
  25. if arrsize ('modArr_AF_SFLA_SharedActPeopleArray') = 1 and $charsche_character_CurActDesc[arrpos('charsche_charlist',702)] ! 'Sleeping':
  26. gs 'mod_addedflavour_SFLA_SexFunctions' , 'chksextriggers' , 702 , 'Bedr3Alone'
  27. end
  28. '<center><b><font color="<<$npc_fontcolor[''A702'']>>">Janina''s Room</font></b></center>'
  29. '<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/city/citycenter/SharedFLApartment/Bedr3<<$modVar_AF_TempStr>>.jpg"></center>'
  30. gs 'mod_addedflavour_SFLA_Functions' , 'SFLA-UpgradeRoom-Check' , 'Bedr3'
  31. if modVar_AF_SFLA_AptRProg['Bedr3'] >= modVar_AF_SFLA_AptRProg['Lv2Req']:
  32. 'You are in Janina''s Room which is bright and welcoming while looking very comfortable.'
  33. else
  34. 'You are in Janina''s Room which is practical yet plain but with a large bed in the centre.'
  35. end
  36. *nl
  37. gs 'mod_addedflavour_SFLA_Functions' , 'ShowSchedule' , 702
  38. gs 'mod_addedflavour_SFLA_Functions' , 'SFLA-PeoplePresent-Display' , 'mod_addedflavour_SFLA_Bedr3'
  39. act '<b>Go To Living Room</b>' : minut += 1 & gt 'mod_addedflavour_SFLA_Sitr' , 'start'
  40. end
  41. --- mod_addedflavour_SFLA_Bedr3 ---------------------------------