You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
00Bl-<br />
00B7-<br />
DAFB<br />
D61A<br />
ED34-<br />
D858-<br />
DA0C<br />
D7D2-<br />
DBSC<br />
DEC9-<br />
DB3A-<br />
FDED-<br />
0024-<br />
009D-<br />
0085-<br />
0050-<br />
009B-<br />
002 l-<br />
C000-<br />
C010-<br />
6003- 00<br />
6004- 00<br />
1540 *<br />
1550 *<br />
1560 *<br />
1570 *<br />
1580 *<br />
appearing past column 12<br />
causes a line break. The':'<br />
is listed in column 4 of the<br />
new output line.<br />
1590 * = Tokens * and A are not<br />
1600 * surrounded by blanks.<br />
1610 *<br />
1620 * = A blank will not be listed<br />
1630 * before a token if the<br />
previous char was a blank<br />
or left parenthesis.<br />
1640 *<br />
1650 *<br />
1660 *<br />
1670 * = A blank will not be listed<br />
1680 * after a token ending in"(".<br />
1690 *<br />
1700 * =<br />
1710 *<br />
1720 *<br />
1730 *<br />
Control characters are listed<br />
as normal capitals enclosed<br />
in brackets (e.g. [J]).<br />
1740 *--------------------------------<br />
1750 *<br />
1760 * APPLESOFT/MONITOR ROUTINES<br />
1770 *<br />
1780 CHRGET .EQ<br />
1790 CHRGOT .EQ<br />
1800 CRDO .EQ<br />
1810 FNDLIN .EQ<br />
1820 FOUT .EQ<br />
1830 ISCNTC .EQ<br />
1840 LINGET .EQ<br />
1850 NEWSTT .EQ<br />
1860 OUTDO .EQ<br />
1870 SNERR .EQ<br />
1880 STROUT .EQ<br />
1890 *<br />
$00Bl<br />
$00B7<br />
$DAFB<br />
$D61A<br />
$ED34<br />
$D858<br />
$DA0C<br />
$D7D2<br />
$DBSC<br />
$DEC9<br />
$DB3A<br />
1900 COUT .EQ $FDED<br />
1910 *--------------------------------<br />
1920 *<br />
1930 * SYSTEM VARIABLES<br />
1940 *<br />
1950 CH .EQ $24<br />
1960 DSCTMP .EQ $9D<br />
1970 FORPNT .EQ $85<br />
1980 LINNUM .EQ $50<br />
1990 LOWTR .EQ $9B<br />
2000 WNDWTH .EQ $21<br />
2010 *<br />
2020 KBD .EQ $C000 KEYBOARD<br />
2030 KBDSTR .EQ $C010 KBD STROBE<br />
2040 *--------------------------------<br />
2050 *<br />
2060 * LOCAL VARIABLES<br />
2070 *<br />
2080 CONFLG .DA #0<br />
2090 PREVCH .DA #0<br />
40 Apple Orchard