Fixed character conversions
This commit is contained in:
parent
2f20b47cb4
commit
2bc406e9e1
5 changed files with 25 additions and 25 deletions
|
|
@ -5,7 +5,7 @@
|
||||||
; the images with the background.
|
; the images with the background.
|
||||||
; By Michael Abrash.
|
; By Michael Abrash.
|
||||||
;
|
;
|
||||||
stack segment para stack ‘STACK'
|
stack segment para stack 'STACK'
|
||||||
db 512 dup(?)
|
db 512 dup(?)
|
||||||
stack ends
|
stack ends
|
||||||
;
|
;
|
||||||
|
|
@ -28,23 +28,23 @@ GC_ROTATE equ 3 ;GC data rotate/logical function
|
||||||
; register index
|
; register index
|
||||||
GC_MODE equ 5 ;GC mode register index
|
GC_MODE equ 5 ;GC mode register index
|
||||||
;
|
;
|
||||||
dseg segment para common ‘DATA'
|
dseg segment para common 'DATA'
|
||||||
;
|
;
|
||||||
; String used to label logical functions.
|
; String used to label logical functions.
|
||||||
;
|
;
|
||||||
LabelString label byte
|
LabelString label byte
|
||||||
db ‘UNMODIFIED AND OR XOR '
|
db 'UNMODIFIED AND OR XOR '
|
||||||
LABEL_STRING_LENGTH equ $-LabelString
|
LABEL_STRING_LENGTH equ $-LabelString
|
||||||
;
|
;
|
||||||
; Strings used to label fill patterns.
|
; Strings used to label fill patterns.
|
||||||
;
|
;
|
||||||
FillPatternFF db ‘Fill Pattern: 0FFh'
|
FillPatternFF db 'Fill Pattern: 0FFh'
|
||||||
FILL_PATTERN_FF_LENGTH equ $ - FillPatternFF
|
FILL_PATTERN_FF_LENGTH equ $ - FillPatternFF
|
||||||
FillPattern00 db ‘Fill Pattern: 000h'
|
FillPattern00 db 'Fill Pattern: 000h'
|
||||||
FILL_PATTERN_00_LENGTH equ $ - FillPattern00
|
FILL_PATTERN_00_LENGTH equ $ - FillPattern00
|
||||||
FillPatternVert db ‘Fill Pattern: Vertical Bar'
|
FillPatternVert db 'Fill Pattern: Vertical Bar'
|
||||||
FILL_PATTERN_VERT_LENGTH equ $ - FillPatternVert
|
FILL_PATTERN_VERT_LENGTH equ $ - FillPatternVert
|
||||||
FillPatternHorz db ‘Fill Pattern: Horizontal Bar'
|
FillPatternHorz db 'Fill Pattern: Horizontal Bar'
|
||||||
FILL_PATTERN_HORZ_LENGTH equ $ - FillPatternHorz
|
FILL_PATTERN_HORZ_LENGTH equ $ - FillPatternHorz
|
||||||
;
|
;
|
||||||
dseg ends
|
dseg ends
|
||||||
|
|
@ -71,7 +71,7 @@ TEXT_UP macro TEXT_STRING, TEXT_LENGTH, ROW, COLUMN
|
||||||
int 10h
|
int 10h
|
||||||
endm
|
endm
|
||||||
;
|
;
|
||||||
cseg segment para public ‘CODE'
|
cseg segment para public 'CODE'
|
||||||
assume cs:cseg, ds:dseg
|
assume cs:cseg, ds:dseg
|
||||||
start proc near
|
start proc near
|
||||||
mov ax,dseg
|
mov ax,dseg
|
||||||
|
|
|
||||||
|
|
@ -4,7 +4,7 @@
|
||||||
; for use with modes 0Dh, 0Eh, 0Fh, 10h, and 12h.
|
; for use with modes 0Dh, 0Eh, 0Fh, 10h, and 12h.
|
||||||
; By Michael Abrash.
|
; By Michael Abrash.
|
||||||
;
|
;
|
||||||
stack segment para stack ‘STACK'
|
stack segment para stack 'STACK'
|
||||||
db 512 dup(?)
|
db 512 dup(?)
|
||||||
stack ends
|
stack ends
|
||||||
;
|
;
|
||||||
|
|
@ -19,13 +19,13 @@ GC_ROTATE equ 3 ;GC data rotate/logical function
|
||||||
; register index
|
; register index
|
||||||
GC_BIT_MASK equ 8 ;GC bit mask register index
|
GC_BIT_MASK equ 8 ;GC bit mask register index
|
||||||
;
|
;
|
||||||
dseg segment para common ‘DATA'
|
dseg segment para common 'DATA'
|
||||||
TEST_TEXT_ROW equ 69 ;row to display test text at
|
TEST_TEXT_ROW equ 69 ;row to display test text at
|
||||||
TEST_TEXT_COL equ 17 ;column to display test text at
|
TEST_TEXT_COL equ 17 ;column to display test text at
|
||||||
TEST_TEXT_WIDTH equ 8 ;width of a character in pixels
|
TEST_TEXT_WIDTH equ 8 ;width of a character in pixels
|
||||||
|
|
||||||
TestString label byte
|
TestString label byte
|
||||||
db ‘Hello, world!',0 ;test string to print.
|
db 'Hello, world!',0 ;test string to print.
|
||||||
FontPointer dd ? ;font offset
|
FontPointer dd ? ;font offset
|
||||||
dseg ends
|
dseg ends
|
||||||
;
|
;
|
||||||
|
|
@ -37,7 +37,7 @@ SETGC macro INDEX, SETTING
|
||||||
out dx,ax
|
out dx,ax
|
||||||
endm
|
endm
|
||||||
;
|
;
|
||||||
cseg segment para public ‘CODE'
|
cseg segment para public 'CODE'
|
||||||
assume cs:cseg, ds:dseg
|
assume cs:cseg, ds:dseg
|
||||||
start proc near
|
start proc near
|
||||||
mov ax,dseg
|
mov ax,dseg
|
||||||
|
|
|
||||||
|
|
@ -2,7 +2,7 @@
|
||||||
; to memory that already contains data.
|
; to memory that already contains data.
|
||||||
; By Michael Abrash.
|
; By Michael Abrash.
|
||||||
;
|
;
|
||||||
stack segment para stack ‘STACK'
|
stack segment para stack 'STACK'
|
||||||
db 512 dup(?)
|
db 512 dup(?)
|
||||||
stack ends
|
stack ends
|
||||||
;
|
;
|
||||||
|
|
@ -25,7 +25,7 @@ SETSC macro INDEX, SETTING
|
||||||
dec dx
|
dec dx
|
||||||
endm
|
endm
|
||||||
;
|
;
|
||||||
cseg segment para public ‘CODE#146;
|
cseg segment para public 'CODE'
|
||||||
assume cs:cseg
|
assume cs:cseg
|
||||||
start proc near
|
start proc near
|
||||||
;
|
;
|
||||||
|
|
|
||||||
|
|
@ -2,7 +2,7 @@
|
||||||
; setting of memory that already contains data.
|
; setting of memory that already contains data.
|
||||||
; By Michael Abrash.
|
; By Michael Abrash.
|
||||||
;
|
;
|
||||||
stack segment para stack ‘STACK#146;
|
stack segment para stack 'STACK'
|
||||||
db 512 dup(?)
|
db 512 dup(?)
|
||||||
stack ends
|
stack ends
|
||||||
;
|
;
|
||||||
|
|
@ -40,7 +40,7 @@ SETGC macro INDEX, SETTING
|
||||||
dec dx
|
dec dx
|
||||||
endm
|
endm
|
||||||
;
|
;
|
||||||
cseg segment para public ‘CODE#146;
|
cseg segment para public 'CODE'
|
||||||
assume cs:cseg
|
assume cs:cseg
|
||||||
start proc near
|
start proc near
|
||||||
;
|
;
|
||||||
|
|
@ -56,18 +56,18 @@ start proc near
|
||||||
;
|
;
|
||||||
SETSC SC_MAP_MASK,02h ;map mask setting enables only
|
SETSC SC_MAP_MASK,02h ;map mask setting enables only
|
||||||
; plane 1, the green plane
|
; plane 1, the green plane
|
||||||
sub di,di ;start at beginning of video memory
|
sub di,di ;start at beginning of video memory
|
||||||
mov al,0ffh
|
mov al,0ffh
|
||||||
mov bp,24 ;# bars to draw
|
mov bp,24 ;# bars to draw
|
||||||
HorzBarLoop:
|
HorzBarLoop:
|
||||||
mov cx,80*10 ;# bytes per horizontal bar
|
mov cx,80*10 ;# bytes per horizontal bar
|
||||||
rep stosb ;draw bar
|
rep stosb ;draw bar
|
||||||
add di,80*10 ;point to start of next bar
|
add di,80*10 ;point to start of next bar
|
||||||
dec bp
|
dec bp
|
||||||
jnz HorzBarLoop
|
jnz HorzBarLoop
|
||||||
;
|
;
|
||||||
; Fill screen with blue, using set/reset to force plane 0 to 1#146;s and all
|
; Fill screen with blue, using set/reset to force plane 0 to 1's and all
|
||||||
; other plane to 0#146;s.
|
; other plane to 0's.
|
||||||
;
|
;
|
||||||
SETSC SC_MAP_MASK,0fh ;must set map mask to enable all
|
SETSC SC_MAP_MASK,0fh ;must set map mask to enable all
|
||||||
; planes, so set/reset values can
|
; planes, so set/reset values can
|
||||||
|
|
|
||||||
|
|
@ -2,7 +2,7 @@
|
||||||
; with CPU data to modify setting of memory that already contains data.
|
; with CPU data to modify setting of memory that already contains data.
|
||||||
; By Michael Abrash.
|
; By Michael Abrash.
|
||||||
;
|
;
|
||||||
stack segment para stack ‘STACK#146;
|
stack segment para stack 'STACK'
|
||||||
db 512 dup(?)
|
db 512 dup(?)
|
||||||
stack ends
|
stack ends
|
||||||
;
|
;
|
||||||
|
|
@ -40,7 +40,7 @@ SETGC macro INDEX, SETTING
|
||||||
dec dx
|
dec dx
|
||||||
endm
|
endm
|
||||||
;
|
;
|
||||||
cseg segment para public ‘CODE#146;
|
cseg segment para public 'CODE'
|
||||||
assume cs:cseg
|
assume cs:cseg
|
||||||
start proc near
|
start proc near
|
||||||
;
|
;
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue