Commodore C-NET 128 v7.0 User Manual page 106

4906 300BAUD
4909 1200BAUD
4912 2400BAUD
4916 Startup
program
4919 Flush
since
4922 L80
4925 L81
4928 Putc0
to
4931 Putd0
to
4936 Screenbeep Flash the screen.
4939 SwiftInit
7171 Output
7174 ResetMCI
7177 Put1
7180 DoSecs
7183 Onechar
screen,
7186 Input
Used
7189 Password
7192 Dotm1
7195 Chatmode
7198 Cmpdates
7201 Diskina
7204 Readfilec
first, see
7207 Readfile
7210 Getdate
1989
7213 Figline2
Initialize Swiftlink and Wedge NMI Handler.
Set baud rate 300.
Set baud rate 1200.
Set baud rate 2400.
Used to load 'prg.ram' at
Remove all added variables
RAM expander, load SEQ to bank 1.
RAM expander, reset this to bank 0.
Move what's at c0 real memory
d0.
Move what's at d0 real memory
c0.
Those of you who don't like this, maybe
inserting an RTS ($60) at the
appropriate place here will appease!
(Then re-save the file).
-- ml --
Print a$ to screen.
Return all MCI things back to
default (in most cases off).
Output the single character ASCII
found at location 254.
Wait for 1 character to be pressed,
don't print anything to the
Wait for a line to be entered.
with line 2100 routine.
inputs: at 7276, the # of chars to
enter.
returns: Note that the 'output' is
placed on an internal 'stack'
and to retrieve it, INPUT#6,
(ar) must be used.
Wait for a password to be entered
(mask the output to hide the
password).
Enter chat mode (line 7000).
Compare the LD$ ML variable to
what's in a$, see line 10000.
Read a line from the open file #2,
returns: stack variable.
Read the open file #5 from disk, or
from RAMEX, clear screen
Same as above, but don't clear
screen.
Convert 11 digit date to verbose
form
input:an$=date like 18912030110
output:
1:10a
start.
3590.
used with gosub2200.
gosub15000.
stack var like 3-Dec-