gtelefon 1.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. # gtelefon
  2. boyinday[numnpcboy] = day
  3. Gcall = 0
  4. minut += 3
  5. gs 'stat'
  6. 'You take the phone, "Hello."'
  7. if boyvstre[numnpcboy] > 0:
  8. 'Male voice on the phone says "Hello <<$name>> is I <<$nameBoyfrend[numnpcboy]>>, let''s go to somewhere to walk."'
  9. else
  10. 'In the tube, a male voice says "Hello Can <<$name>>?"'
  11. 'You answer the caller that you are the <<$name>>. Stranger delighted "I <<$nameBoyfrend[numnpcboy]>>, we''re met at a disco. Remember? Let''s go for a walk."'
  12. end
  13. act 'I''m busy today':
  14. cls
  15. minut += 3
  16. if boyvstre[numnpcboy] = 0:otnBoyFrend[numnpcboy] -= 10
  17. if boyvstre[numnpcboy] > 0:otnBoyFrend[numnpcboy] -= 5
  18. gs 'stat'
  19. ''
  20. if otnBoyFrend[numnpcboy] > 20:
  21. !!otnBoyFrend[numnpcboy] = 0
  22. '<<$nameBoyfrend[numnpcboy]>> upset. "Well, then, as something next time."'
  23. else
  24. otnBoyFrend[numnpcboy] = 0
  25. '<<$nameBoyfrend[numnpcboy]>> angry. "Well, if you went to the dick." And hung up.'
  26. end
  27. act 'Hangup':gt 'korrPar'
  28. end
  29. if GvstreBoy = 0:
  30. act 'Meet me in the park':
  31. cls
  32. minut += 3
  33. GvstreBoy = 1
  34. GvstreBoyAfter[numnpcboy] = 1
  35. SkverBoy = numnpcboy
  36. gs 'stat'
  37. 'You are invited to meet in the park.'
  38. act 'Hangup':gt 'korrPar'
  39. end
  40. end
  41. --- gtelefon ---------------------------------