Instruction manual

)
****************
* 1 o'clock - 31 * 7 o'clock 31 *
* 2
o'clock - 30 * 8 o'clock 30 *
* 3
o'clock 1 * 9 o'clock - 1 *
* 4
o'clock 34 * 10 o'clock - 34 *
* 5
o'clock 33 * 11 o'clock - 33 *
*6 o'clock 32 *12 0'clock-32*
**.**************
To run this' routine place the
number which you wish merged to the
display in register A. Load the starting
video address in register
B. Put the video
incrementing factor in register
C. Gosub
50000. Once
A, B, and C are loaded they
remain
intact after program execution.
A picture is worth a thousand words
(2K bytes?). Load and run the program in
figure
(4) to see both how all the dif-
ferent display angles look and what hap-
pens when a
scientific notation display
is caused to overlap the edge of the
display when run
at a steep angle. Make
sure you load figure
(3) or it will try and
call a non-existant subroutine.
On-Screen Expose'
Did you know
that there is a
graphics/control character
that you can
print on the screen by
just pressing two
keys? There is! Control G will create the
character
that you see when you try to
type in a line that's a bit too long. You
can type
it into a string just like it was a
letter or symbol. As an added bonus,
if
you have a printer tied in, it will ring its
bell. .. instant prompt.
I have one more thing of interest for
you before
I return to bury myself in my
favorite world
of semiconductors and
software. The location (in page zero)
of
the on screen text begins at 19 decimal
and continues up
to 90 decimal which
always contains a zero when examined.
Therefore
71 bytes can be defined, the
72nd is a zero. To see what
I mean do the
following in command mode:
1) Press Return (to make sure
everything is terminated).
2) Hold down the space bar until the
screen starts to show the control G
characters mentioned earlier.
3)Press Return (this clears the on
screen text internally).
4) Type
perfectly:FORS =19T090:?CHR$
(PEEK(S));:N
EXTS.
5) Press Return.
Now
do you see what I mean? Hap-
py computing,
that's all for now. Would
anyone want
to hear about a Superboard
speedup?
Almost 2MHZ or double speed
and
it doesn't alter the I/O baud rates,
however, none
of the OSI RAM chips
could cut the mustard. If you want an ar-
ticle on this, write! Bye.
Fig. (Listing' 1.
10 REM Double Disasseffibler
20 REM Written b~
30 REM Jack Robert Swindell
40 REM Au~ust 23, 1979
100 DATA' BRK' ,1, • OflA-- r·- X· ,2, •.,.. ,9, .? , "
110 DATA'!" ,'7, ·ORA-O-·f;'· ,2, • ASL· .. ·O·-p· ,2, "",9
120 DATA'PHF", 1, 'ORA-IMM' ,2, 'ASL-A', 1, '!",9
130 DATA'!" ,9, 'ORA' ,3, 'ASL' ,3, '!",9
140 DATA'BPL' ,2, 'Of~A-'I-Y' ,2, •.,.. ,9, '!",9
150 DATA'?',9,'OflA-0-P-X',2,'ASL-0-P-X',2,''''',9
160 DATA'CLC',1,'OfIA-Y',3,'!",9,'!",9
170 DATA''''' ,9, 'ORA--X' ,3, 'ASL-X' ,3, '!",9
180 DATA'JSR' ,3, ·AND- .. I·-X· ,2, .!'. ,9, '!",9
190 DATA'BIT-0-P',2,'AND-0-P',2,'ROL-0-P',2,'!",9
200 DATA'PLP',1,'AND-IMM',2,'ROL-A',1,'!",9
210 DATA'BIT' ,3, 'AND' ,3, 'ROL' ,3, '!",9
220 DATA· EMI· ,2, IANII--I-Y·, 2,11
1
,9,11
1
,9
230 DATA'!",9,'AND-O-P-X',2,'flOL-0-P-X',2,'!",9
240 DATA'SEC', 1, 'AND-Y' ,3, .!'. ,9, '!",9
250 DATA'!",9,'AND-X',3,'ROL-X',3,''''',9
260 DATA'RTI' ,1, 'EOR-I-X' ,2, .!'. ,9, '!",9
270 DATA'!",9,'EOfl-0-P',2,'LSR-0-P',2,'!",9
280 DATA'PHA',1,'EOR-IMM',2,'LSR-A',1,''''',9
290 DATA'JMP',3,'EOR',3,'LSR',3,'!",9
300 DATA'BVC',2,'EOR-I-Y',2,'!",9,'!",9
310 DATA''''',9,'EOR-0-P-X',2,'LSR-0-P-X',2,'!'',9
320 DATA' CL I' ,1, •EOR-Y' ,3, '!" , 9, "r' ,9
330 DATA'!",9,'EOR-X',3,'LSR-X',3,'!",9
340 DATA'RTS',1,'ADC-I-X',2,'!",9,'!",9
350 DATA'!",9,'ADC-0-P',2,'ROR-0-P',2,'!",9
360 DATA'PLA',1,'ADC-IMM',2,'ROR-A',1,'!",9
370 DATA'JMP-I',3,'ADC',3,'ROR',3,'!",9
380 DATA'BVS',2,'ADC-I-Y',2,''''',9,'!'',9
390 DATA'!",9,'ADC-0-P-X',2,'ROR-0-P-X',2,'!",9
400 DATA'SEI',1,'ADC-Y',3,'!",9,'!",9
410 DATA'!",9,'ADC-X',3,'!",9,'!",9
420 DATA'!",9,'STA-I-X',2,'!",9,'!",9
430 DATA'STY-0-P',2,'STA-0-P',2,'STX-0-P',2,'!",9
440 DATA'DEY',1,'!",9,'TXA',1,'!",9
450 DATA'STY',3,'STA',3,'STX',3,'!",9
460 DATA'BCC',2,'STA-I-Y',2,'!,',9,'!,',9
470 DATA'STY-0-P-X',2,'STA-0-P-X',2,'STX-0-P-X',2,'!,',9
480 DATA'TYA',1,'STA-Y',3,'TXS',1,'!",9
490 DATA'!",9,'STA-X',3,'!",9,'!",9
500 DATA'LDY-IMM',2,'LDA-I-X',2,'LDX-IMM',2,'!",9
510 DATA'LDY-O-P',2,'LDA-0-P',2,'LDX-0-P',2,'!",9
520 DATA'TAY',1,'LDA-IMM',2,'TAX',1,'!",9
530 DATA'LDY',3,'LDA',3,'LDX',3,'!",9
540 DATA'BCS',2,'LDA-I-Y',2,'!",9,'!",9
550 DATA'LDY-0-P-X',2,'LDA-0-P-X',2,'LDX-0-P-Y',2,'!",9
560 DATA'CLV',1,'LDA-Y',3,'TSX',1,'!",9
570 DATA'LDY-X',3,'LDA-X',3,'LDX-Y',3,'!",9
580 DATA'CPY-IMM',2,'CMP-I-X',2,'!",9,'!",9
590 DATA'CPY-0-P',2,'CMP-O-P',2,'DEC-0-P',2,''''',9
600 DATA'INY',1,'CHP-IMM',2,'DEX',1,'!",9
610 DATA'CPY',3,'CMP',3,'DEC',3,'!",9
620 DATA'BNE',2,'CMP-I-Y',2,'!",9,'!",9
630 DATA'!",9,'CMP-0-P-X',2,'DEC-0-P-X',2,'!",9
640 DATA'CLD',1,'CMP-Y',3,'!",9,'!",9
650 DATA'!",9,'CMP-X',3,'OEC-X',3,'!",9
660 DATA'CPX-IMM',2,'SBC-I-X',2,'!",9,'!",9
670 DATA'CPX-0-P',2,'SBC-0-P',2,'INC-0-P',2,'!",9
680 DATA'INX',l,'SBC-IMM',2,'NOP',1,''''',9
690 DATA'CPX',3,'SBC',3,'INC',3,'!",9
700 DATA'BEQ',2,'SBC-I-Y',2,'!",9,'!",9
710 DATA'!",9,'SBC-0-P-X',2,'INC-0-P-X',2,'!",9
720 DATA'SED',1,'SBC-Y',3,'!",9,''''',9
730 DATA'!",9,'SBC-X',3,'INC-X',3,'!",9
SOO REM End of data table
900 CLEAR
1000 PRINT'6502 Double Disasseffibler - 1979 - J. Swindell'
1010 PRINT
1020 INPUT'Input low&hiSh addresses of block to be listed:Deciffial';p,Q
1030 PRINT:PRINT:PRINT:PRINT
1040 PRINT'MNE';TABI151;'A-DEC';TABC251;'O-DEC';TAB(33);'ASCII';
1050 PRINTTAB(39);'A-HEX';TABC4S);'O-HEX';TABC551;'MNECif valid)'
1060 PRINT:PRINT
1070 FORU=PTOQ
10S0 M=PEEKCU)
1090 RESTORE
1100 FORO=OTOM
December, 1979
MICRO -- The 6502 Journal
19:33