;
; S:COMMON
;
TMP      EPZ $F0
TMP0     EPZ TMP
TMP1     EPZ TMP+1
TMP2     EPZ TMP+2
TMP3     EPZ TMP+3
TMP4     EPZ TMP+4
TMP5     EPZ TMP+5
;
TMPLO    EPZ TMP0
TMPHI    EPZ TMP1
;
FLASHLO  EPZ $4E
FLASHHI  EPZ $4F
;
ESC      =   27
;-----------
;
; MAIN MENU routines
;
MM       =   $0800
;
MAINMENU =   MM
FGETMAIN =   MM+3
FGETPSD  =   MM+6
FGETCD   =   MM+9
;
HAS128K  =   $27F
;-----------
;
; Subroutine package
;
SP       =   $E000
;
PRINT    =   SP
CLSCREEN =   SP+3
WITEBORD =   SP+6
ESCBACK  =   SP+9
PICDRAW  =   SP+12
;
DEVICENW =   SP+15
DEVICEON =   SP+18
DEVICEOF =   SP+21
DEVICERD =   SP+24
DEVICEST =   SP+27
SCALING  =   SP+30
;
POLEBTN  =   SP+31
POLEKEY  =   SP+34
GETKEY   =   SP+37
SELECT   =   SP+40
;
SETTYPE  =   SP+43
GETFILE  =   SP+46
SAVEFILE =   SP+49
TYPELEN  =   SP+52
FLSTART  =   SP+53
FLLENGTH =   SP+55
BLOAD    =   SP+57
BSAVE    =   SP+60
DOSCR    =   SP+63
ERROR    =   SP+66
;
MUSIC    =   SP+69
FLSHINIT =   SP+72
JMPVECTS =   SP+75
LINES    =   SP+78
PARSE    =   SP+81
SHOWAROW =   SP+84
NUMBER   =   SP+87
WAITPSD  =   SP+90
WAITCD   =   SP+93
ANYKEY   =   SP+96
CHKPRINT =   SP+99
BOOP     =   SP+102
GETINIT  =   SP+105
GETBYTE  =   SP+108
INPUT    =   SP+111
CLS1     =   SP+114
PRINTGRP =   SP+117
RTOS     =   SP+120
SPACEBAR =   SP+123
GETPDISK =   SP+126
ESCMAIN  =   SP+129
TESTPAPR =   SP+132
GETANUMB =   SP+135
ANYKEY2  =   SP+138
DEVICECH =   SP+141
;
WITE     =   $FF
GRAY     =   $AA
GRAY2    =   $55
BLAK     =   $00
;
PRNORM   =   1
PRINVR   =   2
PRLEFT   =   3
PRRITE   =   4
PRCNTR   =   5
PRLOC    =   6
PRSMAL   =   7
PRBIG    =   8
PRSTR    =   9
PRSPC    =   10
PRHTAB   =   11
PRVTAB   =   12
CR       =   13
NOCR     =   14
RTOSBLAK =   15
RTOSWITE =   16
RTOSANY  =   17
PRCSPACE =   18
PRPIC    =   19
PRRTAB   =   20
PRRTAB2  =   21
PRKERN   =   22
RTOSINV  =   23
;-----------
;
; Monitor routines
;
WAIT     =   $FCA8
RTS      =   $FF58
;-----------
;
; SYSLIB stuff
;
FLIPPER  =   $9080
YBASEHI  =   $9100
YBASELO  =   $91C0
XBYTE    =   $9398
XBIT     =   $94B0
;-----------
;
;
;
         END