home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / MM2_DEV / S / TEST / FT.M < prev    next >
Encoding:
Text File  |  1989-06-12  |  762 b   |  11 lines
  1. MODULE FT;
  2. IMPORT InOut;
  3. VAR ch: CHAR;
  4. BEGIN
  5.   ASSEMBLER
  6.         BREAK END;InOut.WriteFix (1.1, 10, 5);
  7.   InOut.Read(ch)
  8. END FT.
  9. ə
  10. (* $FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$0000006B$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950Ç$00000050T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......$00000089$00000050$00000089$00000008$0000007E$0000002A$0000006B$00000050$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950áÇÇ*)
  11.