165 lines
2.3 KiB
PHP
165 lines
2.3 KiB
PHP
; ===================================================
|
|
; Microsoft BASIC v2 for MSX System v3.0
|
|
;
|
|
; Initial values for variables
|
|
; Disassembled by Romychs @ 2026-09-03
|
|
; ===================================================
|
|
|
|
|
|
|
|
MODULE INIVAL
|
|
|
|
START EQU $
|
|
|
|
OUT (PSSR), A
|
|
LD E, (HL)
|
|
JR PSSR_OUT_D
|
|
WRPRIM:
|
|
OUT (PSSR), A
|
|
LD (HL), E
|
|
PSSR_OUT_D:
|
|
LD A, D
|
|
OUT (PSSR), A
|
|
RET
|
|
CLPRIM:
|
|
OUT (PSSR), A
|
|
EX AF, AF
|
|
CALL CLPRM1
|
|
EX AF, AF
|
|
POP AF
|
|
OUT (PSSR), A
|
|
EX AF, AF
|
|
RET
|
|
JP (IX)
|
|
|
|
; --------------------------------------------------
|
|
MB_USRTAB:
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
DW MB_FCERR
|
|
|
|
; --------------------------------------------------
|
|
MB_LINL40:
|
|
DB 39
|
|
MB_LINL32:
|
|
DB 29
|
|
MB_LINLEN:
|
|
DB 29
|
|
MB_CRTCNT:
|
|
DB 24
|
|
MB_CLMLST:
|
|
DB 14
|
|
TXTNAM:
|
|
DW 0x00
|
|
TXTCOL:
|
|
DW 0x00
|
|
TXTCGP:
|
|
DW 0x800
|
|
TXTATR:
|
|
DW 0x00
|
|
TXTPAT:
|
|
DW 0x00
|
|
T32NAM:
|
|
DW 0x1800
|
|
T32COL:
|
|
DW 0x2000
|
|
T32CGP:
|
|
DW 0x00
|
|
T32ATR:
|
|
DW 0x1B00
|
|
T32PAT:
|
|
DW 0x3800
|
|
GRPNAM:
|
|
DW 0x1800
|
|
GRPCOL:
|
|
DW 0x2000
|
|
GRPCGP:
|
|
DW 0x00
|
|
GRPATR:
|
|
DW 0x1B00
|
|
GRPPAT:
|
|
DW 0x3800
|
|
MLTNAM:
|
|
DW 0x800
|
|
MLTCOL:
|
|
DW 0x00
|
|
MLTCGP:
|
|
DW 0x00
|
|
MLTATR:
|
|
DW 0x1B00
|
|
MLTPAT:
|
|
DW 0x3800
|
|
CLIKSW:
|
|
DB 1
|
|
CSRY:
|
|
DB 1
|
|
CSRX:
|
|
DB 1
|
|
CNSDFG:
|
|
DB 0
|
|
RG0SAV:
|
|
DB 0
|
|
RG1SAV:
|
|
DB 0xE0
|
|
RG2SAV:
|
|
DB 0
|
|
RG3SAV:
|
|
DB 0
|
|
RG4SAV:
|
|
DB 0
|
|
RG5SAV:
|
|
DB 0
|
|
RG6SAV:
|
|
DB 0
|
|
RG7SAV:
|
|
DB 0
|
|
STATFL:
|
|
DB 0
|
|
TRGFLG:
|
|
DB 0xFF
|
|
FORCLR:
|
|
DB 0x0F
|
|
BAKCLR:
|
|
DB 4
|
|
BDRCLR:
|
|
DB 7
|
|
MAXUPD:
|
|
JP RST0
|
|
MINUPD:
|
|
JP RST0
|
|
ATRBYT:
|
|
DB 0x0F
|
|
QUEUES:
|
|
DW MB_QUETAB
|
|
FRCNEW:
|
|
DB 0xFF
|
|
SCNCNT:
|
|
DB 1
|
|
REPCNT:
|
|
DB 50
|
|
PUTPNT:
|
|
DW MB_KEYBUF
|
|
GETPNT:
|
|
DW MB_KEYBUF
|
|
CS1200:
|
|
DB 0x53, 0x5C, 0x26, 0x2D, 0x0F
|
|
CS2400:
|
|
DB 0x25, 0x2D, 0x0E, 0x16, 0x1F
|
|
DB 0x53, 0x5C, 0x26, 0x2D, 0x0F
|
|
ASPCT1:
|
|
DW 0x0100
|
|
ASPCT2:
|
|
DW 0x0100
|
|
ENDPRG:
|
|
DB ':'
|
|
|
|
SIZE EQU $ - START ; Size of initval block
|
|
|
|
ENDMODULE |