Ok, I found two different ones. The following is the simplest: 1 FORa=1TO10:READk$:KEYa,k$:NEXT 2 DATA cat1,cat2,cat3,cat4,cat5,cat6,cat7,sysop,steve,gray 10 PRINT"{HOME}{HOME}{CLR}{TEXT}{RVS} Simple Basic Terminal Program -SJG "CHR$(27)"t{CLR}{RVSOFF}"; 20 TRAP100:POKE55296,10:POKE55297,96 30 OPEN1,2,131,CHR$(6)+CHR$(0)+"++ 40 GET#1,a$:PRINTa$;:GETb$:PRINT#1,b$;:PRINTb$;:GOTO40 100 CLOSE1:PRINT:PRINT"Stopped.":END ----So it reads definitions for 10 function keys in lines 1. Change line 2 as you wish.Line 10 prints a simple header on the first line then sets up a window to protect it from scrolling off the screen.Line 20 traps errors and sets the cursor to blinking via CRTC registersLine 30 opens the RS-232 channel.- 131 tells it to convert ASCII to/from PETSCII- CHR$(6) is 300 baud, 8 bit, 1 stop bit.- The "++" is needed for B-series but not used (see transactor's CCISA page 105 for RS-232 parameters).Line 40 accepts keyboard/modem input as prints to the screen.Line 100 closes things if there is an error. That's it.Steve From: Steve Gray <sjgray@rogers.com> To: "cbm-hackers@musoftware.de" <cbm-hackers@musoftware.de> Sent: Friday, January 2, 2015 1:53 PM Subject: Re: CBM720 heads up I wrote a simple CBM-II terminal program in BASIC. If anyone is interested I can dig it out and post it. Steve From: A. Fachat <afachat@gmx.de> To: cbm-hackers@musoftware.de Sent: Friday, January 2, 2015 11:43 AM Subject: Re: CBM720 heads up Hi Michau, Du you have instructions how to use the RS232 from BASIC? I tried with a program copied from the C64, but did not succeed. Many thanks André On Friday 02 January 2015 15:30:55 you wrote: > Hello! > > A. Fachat wrote: > > However, I'm looking for a working program to test the RS232 interface. I > > found the (two) CBM TERM program(s) - but unfortunately I have no idea how > > they work. > > You can use BASIC to open a channel and print to the RS-232 port, and > use Hyperterminal on the PC side to see if the received characters > match. The BASIC syntax for the RS-232 port is very similar to the C64 > syntax. > > Regards, > Michau. > > Message was sent through the cbm-hackers mailing list Message was sent through the cbm-hackers mailing list Message was sent through the cbm-hackers mailing listReceived on 2015-01-03 04:00:04
Archive generated by hypermail 2.2.0.