:titlescreen
#loadbkg title
 
/i
#clearbkg
(!   -  -  !)
/i
(      .)
/i
(        .)
/i
(-      .       .)
/i
(!     ,   !)
/i
(,        ...  ,   ?)
/i
#goto firstquestion
 
:firstquestion
!toflirt;  .
!continuetowork;  .
/i

:toflirt
(  ,     .)
/i
(   - ,    .)
/i
(  ,     ...)
/i
#goto talkwithmodel
:continuetowork
(     .)
/i
#goto talkwithmodel

:talkwithmodel
(   .    -     .)
/i
(   ,      .)
/i
     - , , ,  ,   ...
/i
(, !     -?)
/i
!offer;, .
!notoffer;,   .
/i

:offer
(      ,     .)
/i
??    ?  ,  ,      ?!
/i
(,     .     .)
/i
( ,       ! , ...)
/i
#goto gameover
:notoffer
( ,    -    .  ,   ,    .)
/i
( ,      ,           .)
/i
(   ...?)
/i
:wheretogo
!park; .
!club; .
!cafe; .
/i

: gameover
GAME OVER