crossfit_north_girlmeet.qsrc 1.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455
  1. # crossfit_north_girlmeet
  2. if $ARGS[0] = 'start':
  3. !! generate a girlfriend
  4. gs 'girl'
  5. $boydesc = $previous_record_holder
  6. $boyClo = 'wearing workout clothes'
  7. killvar '$previous_record_holder'
  8. *clr
  9. 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
  32. cla
  33. '<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picrand+'.jpg"></center>'
  34. '"I''m sorry but I don''t feel myself attracted to you enough and I don''t want to lead you on."'
  35. '<<$boydesc>> looks at you disappointed. "Oh well, I didn''t know if I had a chance but you can''t blame me for trying."'
  36. 'The two of you say goodbye to each other.'
  37. act 'Return': gt $loc, $metka
  38. end
  39. end
  40. act 'Say goodbye':
  41. cla
  42. 'You check your watch and tell her: "Sorry, I got to run now, see you around!"'
  43. act 'Leave': gt $loc, $metka
  44. end
  45. end
  46. act 'Pretend you''re busy':
  47. cla
  48. 'You check your watch and pack your things, ignoring the girl.'
  49. act 'Leave': gt $loc, $metka
  50. end
  51. end
  52. --- crossfit_north_girlmeet ---------------------------------