DEVICE SX28L,OSCXT2
RESET Start
FREQ 12_000_000
Count equ $09
Temp equ $0A
Line equ $0B
VS equ $0C
Rotate equ $0D
watch $0D,8,udec
Start mov rc, #%00000000 ;Set port C output latch to zero
mov !rc,#%00111111 ;Set port C.bit7 to output direction
mov rc, #%01000000
Main
mov Line,#11 ;2
Once
mov VS, #23 ;2
jmp gCall
HLine
nop
nop
nop
nop
nop
nop
gCall call nop37 ;45
mov Temp,#8 ;2
mov W,Line ;1
call A ;6
mov Rotate,W ;1
PixelPrint
movb RC.7,Rotate.7 ;4
rl Rotate ;1
djnz Temp,PixelPrint ;2-4
mov rc, #%01000000
call nop56 ;57
call Hsync ;16
djnz VS,HLine ;2-4
djnz Line,Once ;2-4
jmp Vsync
A
jmp PC+W ;2
nop
;retw 0,68,68,68,124,124,68,68,40,16,0 ;A
;retw 0,120,68,68,68,120,68,68,68,120,0 ;B
;retw 0,28,34,64,64,64,64,64,34,28,0 ;C
;retw 0,120,68,66,66,66,66,66,68,120,0 ;D
;retw 0,124,64,64,64,120,64,64,64,124,0 ;E
;retw 0,64,64,64,64,120,64,64,64,124,0 ;F
;retw 0,28,34,66,66,78,64,64,34,28,0 ;G
;retw 0,66,66,66,66,126,66,66,66,66,0 ;H
;retw 0,56,16,16,16,16,16,16,16,56,0 ;I
;retw 0,60,66,2,2,2,2,2,2,2,0 ;J
;retw 0,66,68,72,80,96,80,72,68,66,0 ;K
;retw 0,124,64,64,64,64,64,64,64,64,0 ;L
retw 0,65,65,65,65,65,73,85,99,65,0 ;M
;retw 0,65,67,69,69,73,81,81,97,65,0 ;N
;retw 0,60,66,66,66,66,66,66,66,60,0 ;O
;retw 0,64,64,64,64,124,66,66,66,124,0 ;P
;retw 0,2,60,74,66,66,66,66,66,60,0 ;Q
;retw 0,66,66,66,68,124,66,66,66,124,0 ;R
;retw 0,56,4,4,4,56,64,64,64,56,0 ;S
;retw 0,16,16,16,16,16,16,16,16,254,0 ;T
;retw 0,60,66,66,66,66,66,66,66,66,0 ;U
;retw 0,16,40,68,130,130,130,130,130,130,0 ;V
;retw 0,65,99,85,73,65,65,65,65,65,0 ;W
;retw 0,65,65,34,20,8,20,34,65,65,0 ;X
;retw 0,8,8,8,8,8,20,34,65,65,0 ;Y
;retw 0,127,64,32,16,8,4,2,1,127,0 ;Z
HSYNC
mov rc, #%00000000
call NOP10
mov rc, #%01000000
ret
NOP99 NOP
NOP98 NOP
NOP97 NOP
NOP96 NOP
NOP95 NOP
NOP94 NOP
NOP93 NOP
NOP92 NOP
NOP91 NOP
NOP90 NOP
NOP89 NOP
NOP88 NOP
NOP87 NOP
NOP86 NOP
NOP85 NOP
NOP84 NOP
NOP83 NOP
NOP82 NOP
NOP81 NOP
NOP80 NOP
NOP79 NOP
NOP78 NOP
NOP77 NOP
NOP76 NOP
NOP75 NOP
NOP74 NOP
NOP73 NOP
NOP72 NOP
NOP71 NOP
NOP70 NOP
NOP69 NOP
NOP68 NOP
NOP67 NOP
NOP66 NOP
NOP65 NOP
NOP64 NOP
NOP63 NOP
NOP62 NOP
NOP61 NOP
NOP60 NOP
NOP59 NOP
NOP58 NOP
NOP57 NOP
NOP56 NOP
NOP55 NOP
NOP54 NOP
NOP53 NOP
NOP52 NOP
NOP51 NOP
NOP50 NOP
NOP49 NOP
NOP48 NOP
NOP47 NOP
NOP46 NOP
NOP45 NOP
NOP44 NOP
NOP43 NOP
NOP42 NOP
NOP41 NOP
NOP40 NOP
NOP39 NOP
NOP38 NOP
NOP37 NOP
NOP36 NOP
NOP35 NOP
NOP34 NOP
NOP33 NOP
NOP32 NOP
NOP31 NOP
NOP30 NOP
NOP29 NOP
NOP28 NOP
NOP27 NOP
NOP26 NOP
NOP25 NOP
NOP24 NOP
NOP23 NOP
NOP22 NOP
NOP21 NOP
NOP20 NOP
NOP19 NOP
NOP18 NOP
NOP17 NOP
NOP16 NOP
NOP15 NOP
NOP14 NOP
NOP13 NOP
NOP12 NOP
NOP11 NOP
NOP10 NOP
NOP9 NOP
NOP8 NOP
NOP7 NOP
NOP6 NOP
NOP5 RET
BSYNC
mov rc, #%01000000
call NOP8
mov rc, #%00000000
ret
VSYNC
;Pre =
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
;Vertsync
mov rc, #%00000000
call NOP78
call BSYNC
call NOP80
call BSYNC
call NOP80
call BSYNC
call NOP80
call BSYNC
call NOP80
call BSYNC
call NOP80
call BSYNC
;Post =
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
call HSYNC
call NOP80
jmp Main
| file: /Techref/member/GFH--441/files/anychar.htm, 3KB, , updated: 2001/2/12 13:05, local time: 2024/11/21 13:07,
owner: GFH--441,
|
| | ©2024 These pages are served without commercial sponsorship. (No popup ads, etc...).Bandwidth abuse increases hosting cost forcing sponsorship or shutdown. This server aggressively defends against automated copying for any reason including offline viewing, duplication, etc... Please respect this requirement and DO NOT RIP THIS SITE. Questions?
<A HREF="http://sxlist.com/techref/member/GFH--441/files/anychar.htm"> member GFH--441 files anychar</A> |
| Did you find what you needed?
|