husb.qsrc 2.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. # husb
  2. !2021/05/02
  3. if $ARGS[0] = 'start':
  4. CLOSE ALL
  5. cla & *clr
  6. gs'stat'
  7. '<center><B><font color = maroon><<$husName>></font></B></center>'
  8. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_generic/<<HusbPic>>.jpg"></center>'
  9. gs 'husb', 'husb_discription'
  10. gs 'husb', 'husb_action'
  11. if $clothingworntype = 'nude':
  12. if $braworntype = 'none' and $pantyworntype = 'none':
  13. 'Your husband, seeing you naked, says - "You are very beautiful."'
  14. else
  15. 'Your husband smiles, "It''s always nice to see you in your underwear honey."'
  16. end
  17. end
  18. act '<B>Move away</B>':gt $loc, $loc_arg
  19. if husbandsexday < 4:
  20. act 'Sex with your husband':gt'husbsex','room'
  21. end
  22. end
  23. if $ARGS[0] = 'husb_discription':
  24. if birthyear < husb_birth_year:
  25. age_diff = husbAge - age
  26. $h_age = '<<$husName>> was born in <<husb_birth_year>>, he is <<husbAge>> years old. He is <<age_diff>> years older than you.'
  27. elseif birthyear = husb_birth_year:
  28. $h_age = '<<$husName>> was born in <<husb_birth_year>>, he is <<husbAge>> years old. Same as you.'
  29. else
  30. age_diff = age - husbAge
  31. $h_age = '<<$husName>> was born in <<husb_birth_year>>, he is <<husbAge>> years old. You are <<age_diff>> years older than him.'
  32. end
  33. 'Your husband <<$husName>>, <<$h_age>> It <<$husBody>> <<$husFat>> <<$husHair>>.'
  34. if husband<20:'You have a terrible row with your husband.'
  35. if husband>=20 and husband<40:'There are tension between you and your husband.'
  36. if husband>=40 and husband<60:'You have a normal relationship with your husband.'
  37. if husband>=60 and husband<80:'You have a good relationship with your husband.'
  38. if husband>=80:'You have a great relationship with your husband.'
  39. ''
  40. end
  41. if $ARGS[0] = 'husb_action':
  42. if $loc = 'korr':$husb_action = ''
  43. if $loc = 'bedr':
  44. if hour > 22 or hour < 7: $husb_action = 'Your husband <<$husName>> is lying in bed, eyes open. "What do you want? It is late, go to sleep."'
  45. end
  46. if $loc = 'sitr':
  47. if hour > 7 and hour < 17 and week >= 6: $husb_action = '<<$husName>> is sitting on the couch and watching TV.'
  48. if hour > 17 and hour <= 22: $husb_action = '<<$husName>> is sitting on the couch and watching TV.'
  49. end
  50. if $loc = 'vanr':$husb_action = ''
  51. if $loc = 'kuhr':
  52. if hour = 17 or hour = 7:$husb_action = '<<$husName>> is sitting at the kitchen table.'
  53. end
  54. '<<$husb_action>>'
  55. end
  56. --- husb ---------------------------------