;
-; Oric Telemon definition
-; Telemon 2.4 & Telemon 3.0
-; For telemon 3.0 check http://orix.oric.org
+; Oric TELEMON definition
+; TELEMON 2.4 & TELEMON 3.x
+; For TELEMON 3.x check http://orix.oric.org
;
-
; ---------------------------------------------------------------------------
; Constants
-SCREEN_XSIZE = 40 ; screen columns
-SCREEN_YSIZE = 28 ; screen rows
+SCREEN_XSIZE = 40 ; Screen columns
+SCREEN_YSIZE = 28 ; Screen rows
FUNCTKEY = $A5
-FNAME_LEN = 11 ; maximum length of file-name
+FNAME_LEN = 11 ; Maximum length of file-name
+
+; ---------------------------------------------------------------------------
+; I/O Identifier
+; Theses identifers are used for channel management
+;
+XKBD = $80 ; Keyboard
+XRSE = $83 ; RS232 in
+XSCR = $88 ; Screen
+XRSS = $90 ; RS232 out
; ---------------------------------------------------------------------------
; Zero page
RES := $00
RESB := $02
+DECDEB := $04
+DECFIN := $06
+DECCIB := $08
+DECTRV := $0A
+
TR0 := $0C
TR1 := $0D
+TR2 := $0E
+TR3 := $0F
+TR4 := $10
+TR5 := $11
+TR6 := $12
+TR7 := $13
+
+DEFAFF := $14
-PTR_READ_DEST := $2C ; used for XFREAD and XWRITE only in telemon 3.0
+IRQSVA := $21 ; Used to save A when a BRK call occurs
+IRQSVX := $22 ; Used to save X when a BRK call occurs
+IRQSVY := $23 ; Used to save Y when a BRK call occurs
+IRQSVP := $24 ; Used to save P when a BRK call occurs
+
+ADSCR := $26
+
+PTR_READ_DEST := $2C ; Used for XFREAD and XWRITE only in TELEMON 3.x
HRSX := $46
HRSY := $47
+XLPRBI := $48 ; Printer flag (b7)
+
+HRSX40 := $49
+HRSX6 := $4A
HRS1 := $4D
HRS2 := $4F
HRS3 := $51
HRS4 := $53
HRS5 := $55
-
+HRSFB := $57
+
+; RS232T
+; b0-b3 : speed
+; 1111 => 19200 bps (please note that telestrat can't handle this speed without stopping all IRQ except ACIA's one)
+; 1100 => 9600 bps (default from TELEMON)
+; 1110 => 4800 bps
+; 1010 => 2400 bps
+; 1000 => 1200 bps
+; 0111 => 600 bps
+; 0110 => 300 bps
+; 0101 => 150 bps
+; 0010 => 75 bps
+
+; b4 : 0 external clock, 1 internal clock
+; b6-b5 : 00 8 bits
+; 01 7 bits
+; 10 6 bits
+; 11 5 bits
+; b7 : 0 a stop
+
+RS232T := $59
+
+; RS232C
+; b0-b3 : 0
+; b4 : 1 if echo
+; b5 : 1 if parity
+; b7-b6 : 00 in/out parity odd
+; : 01 on/out parity even
+; : 10 parity sent, answer not tested
+; : 11 SPACE SENT, reception not tested
+
+RS232C := $5A
+
+VARLNG := $8C
+VARAPL := $D0
; ---------------------------------------------------------------------------
; Low memory
-
-
-
+IRQVec := $02FB ; "fast" interrupt vector
; ---------------------------------------------------------------------------
; I/O locations
.endstruct
-.struct VIA2 ; Versatile Interface Adapter
+.struct VIA2 ; Versatile Interface Adapter
.res $0320
PRB .byte ; Port Register B
PRA .byte ; Port Register A
; ---------------------------------------------------------------------------
; ROM entries
-; primitives telemon 2.4
+; TELEMON primitives (2.4 & 3.x)
+
+; all values are used to call bank 7 of telestrat cardridge. It works with 'brk value'
+XOP0 = $00 ; Open device on channel 0
+XOP1 = $01 ; Open device on channel 1
+XOP2 = $02 ; Open device on channel 2
+XOP3 = $03 ; Open device on channel 3
+
+XCL0 = $04 ; Close channel 0
+XCL1 = $05 ; Close channel 1
+XCL2 = $06 ; Close channel 2
+XCL3 = $07 ; Close channel 3
+
XRD0 = $08
XRDW0 = $0C
-XWR0 = $10
-XWSTR0 = $14
+
+XWR0 = $10 ; Write a char in channel 0
+XWR1 = $11 ; Write a char in channel 1
+XWR2 = $12 ; Write a char in channel 2
+XWR3 = $13 ; Write a char in channel 3
+
+XWSTR0 = $14 ; Write a string in text mode channel 0
+XWSTR1 = $15 ; Write a string in text mode channel 1
+XWSTR2 = $16 ; Write a string in text mode channel 2
+XWSTR3 = $17 ; Write a string in text mode channel 3
+
+XDECAL = $18
+
XTEXT = $19
XHIRES = $1A
XFILLM = $1C
XMINMA = $1F
-XFREAD = $27 ; only in TELEMON 3.0
-XOPEN = $30 ; only in TELEMON 3.0
-XCOSCR = $34 ; switch off cursor
-XCSSCR = $35 ; switch on cursor
-XCLOSE = $3A ; only in TELEMON 3.0 Close file
-XFWRITE = $3B ; only in TELEMON 3.0 write file
-XSONPS = $40
-XOUPS = $42
-XPLAY = $43
+XVARS = $24 ; Only in TELEMON 3.x, in TELEMON 2.4, it's XNOMFI ($24)
+XCRLF = $25 ; Jump a line and return to the beginning of the line
+XFREAD = $27 ; Only in TELEMON 3.x (bank 7 of Orix)
+XBINDX = $28 ; Convert a number into hex and displays on channel 0
+XDECIM = $29
+XHEXA = $2A ; Convert a number into hex
+XSCELG = $2F ; Search a line in editor mode
+XOPEN = $30 ; Only in TELEMON 3.x (bank 7 of Orix)
+XECRPR = $33 ; Displays prompt
+XCOSCR = $34 ; Switch off cursor
+XCSSCR = $35 ; Switch on cursor
+XSCRSE = $36
+XSCRNE = $39 ; Load charset from rom to ram
+XCLOSE = $3A ; Only in TELEMON 3.x close file (bank 7 of Orix)
+XFWRITE = $3B ; Only in TELEMON 3.x write file (bank 7 of Orix)
+XWRCLK = $3E ; Update clock
+XSONPS = $40 ; Send data to PSG register (14 values)
+XOUPS = $42 ; Send Oups sound into PSG
+XPLAY = $43 ; Play a sound
XSOUND = $44
XMUSIC = $45
-XZAP = $46
+XZAP = $46 ; Send Zap sound to PSG
XSHOOT = $47
-XCIRCL = $8F
-XCURSE = $90
+XMKDIR = $4B ; Create a folder. Only available in TELEMON 3.x (bank 7 of Orix)
+XRM = $4D ; Remove a folder or a file. Only available in TELEMON 3.x (bank 7 of Orix)
+XGOKBD = $52
+XMALLOC = $5B ; Only in TELEMON 3.x (bank 7 of Orix)
+XFREE = $62 ; Only in TELEMON 3.x (bank 7 of Orix)
+XSOUT = $67 ; Send accumulator value (A) to RS232, available in TELEMON 2.4 & 3.x : if RS232 buffer is full, the Oric Telestrat freezes
+XHRSSE = $8C ; Set hires position cursor
+XDRAWA = $8D ; Draw a line absolute
+XDRAWR = $8E ; Draw a line (relative)
+XCIRCL = $8F ; Draw a circle
+XCURSE = $90 ; Plot a pixel
+XCURMO = $91 ; Move to x,y pos in Hires
XPAPER = $92
XINK = $93
-XEXPLO = $9C
-XPING = $9D
+XBOX = $94 ; Draw a box
+XABOX = $95
+XFILL = $96
+XCHAR = $97 ; Display a char on the screen in Hires
+XSCHAR = $98 ; Draw a string in hires
+XEXPLO = $9C ; Send Explode sound to PSG
+XPING = $9D ; Send Ping sound to PSG
+
+; ---------------------------------------------------------------------------
+; ROM entries variables
+
+PWD_PTR = $00
+
+; ---------------------------------------------------------------------------
+;
+BUFTRV := $100
+
; ---------------------------------------------------------------------------
; Page $200
-SCRX := $220
-SCRY := $224
+BNKST := $200 ; Used to store signature of 8 bank (length : 8 bytes)
+TABDRV := $208
+FLGTEL := $20D
+KOROM := $20E ; Used to compute the size of all rom bank. The result is store here. The value is in KB
+KORAM := $20F ; Used to compute the size of all ram bank. The result is store here. The value is in KB
+TIMED := $210
+TIMES := $211
+TIMEM := $212
ADSCRL := $218
ADSCRH := $21C
+SCRX := $220
+SCRY := $224
+KBDVRL := $273
+FLGKBD := $275
+KBDFCT := $276
+KBDSHT := $278
+KBDCTC := $27E
+LPRFX := $288
+LPRFY := $289
+HRSPAT := $2AA ; Hires pattern : it's used to draw pattern for a line or a circle
+ADIOB := $2BE
+FLGRST := $2EE
+CSRND := $2EF
+VNMI := $2F4
+IRQVECTOR := $2FA
+VAPLIC := $2FD
+; ---------------------------------------------------------------------------
+; Page $400
+EXBNK := $40C
+VEXBNK := $414
+BNKCIB := $417
; ---------------------------------------------------------------------------
; Page $500
+DRIVE := $500
+ERRNB := $512
+SAVES := $513
BUFNOM := $517
-BUFEDT := $590
+VSALO0 := $528
+VSALO1 := $529
+FTYPE := $52C ; File type
+DESALO := $52D
+FISALO := $52F
+EXSALO := $531
+EXTDEF := $55D ; Default extension. At the start of telemon, it's set to ".COM"
+BUFEDT := $590 ; Buffer edition
MAX_BUFEDT_LENGTH=110
+; ---------------------------------------------------------------------------
; Hardware
-CH376_DATA :=$340
-CH376_COMMAND :=$341
+CH376_DATA := $340
+CH376_COMMAND := $341
+
+; ---------------------------------------------------------------------------
+; Stratsed vectors
+; Stratsed is the main OS for Telestrat
+XMERGE := $FF0E
+XFST := $FF11
+XSPUT := $FF14
+XSTAKE := $FF17
+XTAKE := $FF20
+XOPENS := $FF1A ; XOPEN from Stratsed
+XCLOSES := $FF1D ; XCLOSE from Stratsed
+XPUT := $FF23
+XREWIN := $FF29
+XJUMP := $FF2C
+XLGBUF := $FF2F
+XERVEC := $FF32
+XESAVE := $FF35
+XCOPY := $FF38
+XDNAME := $FF3B
+XSTATU := $FF3E
+XUPDAT := $FF41
+XFORMA := $FF44
+XDELBK := $FF4A
+XDELN := $FF4D
+XPROT := $FF50
+XUNPRO := $FF53
+XDIRN := $FF56
+XBKP := $FF59
+XINITI := $FF5C
+XERREU := $FF5F
+XLOAD := $FF62
+XDEFSA := $FF65
+XDEFLO := $FF68
+XSAVE := $FF6B
+XNOMDE := $FF6E
+XCREAY := $FF71
+XDETSE := $FF74
+XLIBSE := $FF77
+XTRVCA := $FF7A
+XTRVNM := $FF7D
+XTRVNX := $FF80
+XBUCA := $FF86
+XVBUF1 := $FF89
+XSVSEC := $FF8C
+XSAY := $FF8F
+XSBUF1 := $FF92
+XSBUF2 := $FF95
+XSBUF3 := $FF98
+XSCAT := $FF9B
+XPRSEC := $FFA1
+XPBUF1 := $FFA4
+XPMAP := $FFA7
+XRWTS := $FFAA
+; ---------------------------------------------------------------------------
; MACRO
.macro BRK_TELEMON value
- .byte $00,value
+ .byte $00,value
.endmacro
projects / cc65 / blobdiff