072_dima 395 B

123456789101112131415161718192021
  1. # dima
  2. if $ARGS[0] = 'start':
  3. cla
  4. *clr
  5. set minut += 5
  6. '<center><B><font color = maroon>Entrance where he lives Dima</font></B></center>'
  7. '<center><img src="images\etogame\podezdhr.jpg"></center>'
  8. clr
  9. gs 'stat'
  10. fcolor = rgb(0,0,0)
  11. bcolor = rgb(255,255,255)
  12. LCOLOR = rgb(106,90,205)
  13. act 'QUIT':
  14. cla
  15. set minut += 5
  16. gt 'street'
  17. end
  18. end
  19. --- dima ---------------------------------