crossfit_north_girlmeet.qsrc 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354
  1. # crossfit_north_girlmeet
  2. if $ARGS[0] = 'start':
  3. menu_off = 1
  4. !! generate a girlfriend
  5. gs 'girl'
  6. $boydesc = $previous_record_holder
  7. $boyClo = 'wearing workout clothes'
  8. killvar '$previous_record_holder'
  9. *clr & cla
  10. minut += 5
  11. gs 'stat'
  12. '<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picrand+'.jpg"></center>'
  13. 'As you enter the crossfit box, you notice a girl of <<$boybody>> height with a <<$boybod>> body and <<$boyface>> hair.
  14. She is <<$boyClo>>'
  15. 'As she notices you, she greets you "Hi. My name is <<$boydesc>>. I heard you beat my old record, very impressive!"'
  16. act 'Thank her':
  17. cla
  18. 'You reply: "Oh thank you. That is a tough workout and your score was not easy to beat."'
  19. act 'Ask her if she comes around often':
  20. cla
  21. '"Do you visit this box often?", you ask.'
  22. 'She replies: "Yeah, I am here two or three times a week."'
  23. '<<$boydesc>> looks at you and asks: "I just got finished with my workout for today, would you like to hang out afterwards?"'
  24. act 'Agree to a date':
  25. cla
  26. '"Sure, sounds like fun, I would love to."'
  27. '"Great!" answers <<$boydesc>> "So, what do you want to do?".'
  28. gs 'dateF', 'date_choice'
  29. end
  30. act 'Decline':
  31. *clr & cla
  32. '<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picrand+'.jpg"></center>'
  33. '"I''m sorry but I don''t feel myself attracted to you enough and I don''t want to lead you on."'
  34. '<<$boydesc>> looks at you disappointed. "Oh well, I didn''t know if I had a chance but you can''t blame me for trying."'
  35. 'The two of you say goodbye to each other.'
  36. act 'Return': gt $loc, $metka
  37. end
  38. end
  39. act 'Say goodbye':
  40. cla
  41. 'You check your watch and tell her: "Sorry, I got to run now, see you around!"'
  42. act 'Leave': gt $loc, $metka
  43. end
  44. end
  45. act 'Pretend you''re busy':
  46. cla
  47. 'You check your watch and pack your things, ignoring the girl.'
  48. act 'Leave': gt $loc, $metka
  49. end
  50. end
  51. --- crossfit_north_girlmeet ---------------------------------