home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Exec 5 / CD_Magazyn_EXEC_nr_5.iso / Programy / Programowanie / AmigaE / yaec.lha / testsrc / t.e < prev    next >
Encoding:
Text File  |  2001-02-23  |  127 b   |  10 lines
  1. EXTERN div:code/eeh7/dos.ext
  2. PROC main()
  3.    DEF a
  4.    a := 10
  5.    WHILE a > 1
  6.       PutStr('OK\n')
  7.       a--
  8.    ENDWHILE
  9. ENDPROC
  10.