230_qwlocdog 606 B

123456789101112131415161718192021222324
  1. # qwlocdog
  2. cls
  3. minut += 3
  4. gs 'stat'
  5. 'You pick up the phone and a female voice tells you. "Hello <<$name>>, this is Margaret.''s Meet today in the cafe?"'
  6. act 'Oh, I have a lot of things, I just can not today.':
  7. cla
  8. qwdogiventday = day
  9. '(You) - Oh, I have a lot of things, I just can not segdnya.'
  10. '(Margarita) - Okay. Then I´ll call in a week.'
  11. act 'Hang up.': gt 'korr'
  12. end
  13. act 'I do not mind.':
  14. cla
  15. QWdogReiq = 3
  16. qwdogiventday = day
  17. '(You) - I do not mind.'
  18. '(Margarita) - Wonderful. Then wait in the cafe.'
  19. act 'Hang up.': gt 'korr'
  20. end
  21. --- qwlocdog ---------------------------------