3 / This program will read characters from the serial port and write them
4 / to memory starting at address 0. If you use the sendtape program with
5 / the files sertest.dat you should have the following pattern in memory
21 / 17 16 (Address of characters received)
23 / To run start at 0200.
24 / Program will not halt
26 INAD=030 / Address of serial input, 30 for console
34 OUTAD=040 / Address of serial output, 40 for console
43 BUFLOC, 7777 / Address to store next word received
46 START, CLA CLL CMA / Init all our variables
49 READ, KSF2 / Have character waiting
53 DCA I BUFLOC / Save through auto increment location