fix uppercase command

diff --git a/asminc/telestrat.inc b/asminc/telestrat.inc
index c4dc509a31f50ab1b017076c80220798d9b055e6..14e686d19e63466b5858a2653417baf10a9318d1 100644 (file)
--- a/asminc/telestrat.inc
+++ b/asminc/telestrat.inc
@@ -468,59 +468,6 @@ XPBUF1           := $FFA4
 XPMAP            := $FFA7
 XRWTS            := $FFAA
 
-; ---------------------------------------------------------------------------
-; 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