Skip to content
Permalink
Branch: master
Find file Copy path
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
22 lines (22 sloc) 1.29 KB
0000- 2 .TF tv2.hex,HEX
0000- 3 *
0000- 4 * TV Display program 2 for COSMAC
0000- 5 * SB-Assembler
0000- 6 *
0000- 7 .CR 1802 ;To load the 1802 cross overlay
0000- 8 .OR $0000
0000- 9 *
0000-F8 00 10 ( 2) START LDI 0 ;0 -> D
0002-B3 11 ( 2) PHI 3 ;D -> R(3).1
0003-F8 07 12 ( 2) LDI LOOP1 ;LOOP1 -> D
0005-A3 13 ( 2) PLO 3 ;D -> R(3).0
0006-D3 14 ( 2) SEP 3 ;3 -> P
0007-F8 00 15 ( 2) LOOP1 LDI 0 ;0 -> D
0009-B0 16 ( 2) PHI 0 ;D -> R(0).1
000A-F8 20 17 ( 2) LDI $20 ;$20 -> D
000C-A0 18 ( 2) PLO 0 ;D -> R(0).0
000D-00 19 ( *) LOOP2 IDL ;WAIT FOR DMA OR INTERRUPT; M(R(0)) -> BUS
000E-3D 0D 20 ( 2) BN2 LOOP2 ;IF EF2=0(Vcc) LOOP2
0010-30 07 21 ( 2) BR LOOP1
0012- 22
0012- 23 .EN
You can’t perform that action at this time.