home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: Amiga Extras 1.3 Amiga Basic 1.2 / Lowe_AmigaExtras1_3AmigaBasic1_2.adf / BasicDemos / Terminal (.txt) < prev   
Encoding:
AmigaBASIC Source Code  |  1988-09-06  |  274 b   |  16 lines
  1. REM - Terminal - simple terminal
  2. REM - emulation program which demonstrates
  3. REM - how to access the Amiga RS-232
  4. REM - port from BASIC
  5.  
  6. OPEN "com1:9600,n,8,1" AS 1
  7. WHILE 1
  8.   WHILE LOC(1)<>0
  9.     PRINT INPUT$(1,1);
  10.   WEND
  11.   i$=INKEY$
  12.   IF i$<>"" THEN PRINT #1,i$;
  13. WEND
  14.  
  15.  
  16.