subkid.qsrc 2.3 KB

1234567891011121314151617181920212223242526272829303132333435
  1. # subkid
  2. gs 'stat'
  3. rkidloc = rand(0,10)
  4. if kid > 0:
  5. kidI = 0
  6. :loop
  7. kidSelected[kidLoops] = kidI
  8. if kidage[kidI] < 1 and ($locclass = 'bedr' or $locclass = 'singleroom') and ( hour < 12 or hour > 18 ):
  9. '<a href="exec:gt ''kid'',''start'' ">In the crib lies <<$kidname[kidI]>>.</a>'
  10. elseif kidage[kidI] < 1 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 12 and hour <= 18 ):
  11. '<a href="exec:gt ''kid'',''start'' ">On a blanket lies <<$kidname[kidI]>>.</a>'
  12. elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'bedr' or $locclass = 'singleroom') and ( hour < 7 or hour > 21):
  13. '<a href="exec:gt ''kid'',''start'' ">Asleep in bed lies <<$kidname[kidI]>>.</a>'
  14. elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 21) and rkidloc < 8:
  15. '<a href="exec:gt ''kid'',''start'' "><<$kidname[kidI]>> is playing with toys on the floor.</a>'
  16. elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 21) and rkidloc >= 8:
  17. '<a href="exec:gt ''kid'',''start'' "><<$kidname[kidI]>> is watching TV.</a>'
  18. elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 9):
  19. '<a href="exec:gt ''kid'',''start'' "><<$kidname[kidI]>> is getting ready for school.</a>'
  20. elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass = 'singleroom' or $locclass = 'bedr') and ( hour >= 9 and hour <= 16):
  21. '<<$kidname[kidI]>> is at school'
  22. elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 16 and hour <= 18):
  23. '<a href="exec:gt ''kid'', ''start''"><<$kidname[kidi]>> is working on homework.</a>'
  24. elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 18 and hour <= 21):
  25. '<a href="exec:gt ''kid'',''start'' "><<$kidname[kidi]>> is watching TV.</a>'
  26. elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'bedr' or $locclass = 'singleroom') and ( hour < 7 or hour > 21):
  27. '<a href="exec:gt ''kid'',''start'' ">Asleep in bed lies <<$kidname[kidI]>>.</a>'
  28. end
  29. kidI += 1
  30. if kidI < kid:jump 'loop'
  31. end
  32. --- subkid ---------------------------------