Fixed character conversions

This commit is contained in:
Jeff Parsons 2015-06-26 10:27:05 -07:00
commit 2bc406e9e1
5 changed files with 25 additions and 25 deletions

View file

@ -5,7 +5,7 @@
; the images with the background.
; By Michael Abrash.
;
stack segment para stack STACK'
stack segment para stack 'STACK'
db 512 dup(?)
stack ends
;
@ -28,23 +28,23 @@ GC_ROTATE equ 3 ;GC data rotate/logical function
; 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.
;
LabelString label byte
db UNMODIFIED AND OR XOR '
db 'UNMODIFIED AND OR XOR '
LABEL_STRING_LENGTH equ $-LabelString
;
; Strings used to label fill patterns.
;
FillPatternFF db Fill Pattern: 0FFh'
FillPatternFF db 'Fill Pattern: 0FFh'
FILL_PATTERN_FF_LENGTH equ $ - FillPatternFF
FillPattern00 db Fill Pattern: 000h'
FillPattern00 db 'Fill Pattern: 000h'
FILL_PATTERN_00_LENGTH equ $ - FillPattern00
FillPatternVert db Fill Pattern: Vertical Bar'
FillPatternVert db 'Fill Pattern: Vertical Bar'
FILL_PATTERN_VERT_LENGTH equ $ - FillPatternVert
FillPatternHorz db Fill Pattern: Horizontal Bar'
FillPatternHorz db 'Fill Pattern: Horizontal Bar'
FILL_PATTERN_HORZ_LENGTH equ $ - FillPatternHorz
;
dseg ends
@ -71,7 +71,7 @@ TEXT_UP macro TEXT_STRING, TEXT_LENGTH, ROW, COLUMN
int 10h
endm
;
cseg segment para public CODE'
cseg segment para public 'CODE'
assume cs:cseg, ds:dseg
start proc near
mov ax,dseg

View file

@ -4,7 +4,7 @@
; for use with modes 0Dh, 0Eh, 0Fh, 10h, and 12h.
; By Michael Abrash.
;
stack segment para stack STACK'
stack segment para stack 'STACK'
db 512 dup(?)
stack ends
;
@ -19,13 +19,13 @@ GC_ROTATE equ 3 ;GC data rotate/logical function
; 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_COL equ 17 ;column to display test text at
TEST_TEXT_WIDTH equ 8 ;width of a character in pixels
TestString label byte
db Hello, world!',0 ;test string to print.
db 'Hello, world!',0 ;test string to print.
FontPointer dd ? ;font offset
dseg ends
;
@ -37,7 +37,7 @@ SETGC macro INDEX, SETTING
out dx,ax
endm
;
cseg segment para public CODE'
cseg segment para public 'CODE'
assume cs:cseg, ds:dseg
start proc near
mov ax,dseg

View file

@ -2,7 +2,7 @@
; to memory that already contains data.
; By Michael Abrash.
;
stack segment para stack STACK'
stack segment para stack 'STACK'
db 512 dup(?)
stack ends
;
@ -25,7 +25,7 @@ SETSC macro INDEX, SETTING
dec dx
endm
;
cseg segment para public CODE#146;
cseg segment para public 'CODE'
assume cs:cseg
start proc near
;

View file

@ -2,7 +2,7 @@
; setting of memory that already contains data.
; By Michael Abrash.
;
stack segment para stack STACK#146;
stack segment para stack 'STACK'
db 512 dup(?)
stack ends
;
@ -40,7 +40,7 @@ SETGC macro INDEX, SETTING
dec dx
endm
;
cseg segment para public CODE#146;
cseg segment para public 'CODE'
assume cs:cseg
start proc near
;
@ -56,18 +56,18 @@ start proc near
;
SETSC SC_MAP_MASK,02h ;map mask setting enables only
; 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 bp,24 ;# bars to draw
mov bp,24 ;# bars to draw
HorzBarLoop:
mov cx,80*10 ;# bytes per horizontal bar
rep stosb ;draw bar
add di,80*10 ;point to start of next bar
mov cx,80*10 ;# bytes per horizontal bar
rep stosb ;draw bar
add di,80*10 ;point to start of next bar
dec bp
jnz HorzBarLoop
;
; Fill screen with blue, using set/reset to force plane 0 to 1#146;s and all
; other plane to 0#146;s.
; Fill screen with blue, using set/reset to force plane 0 to 1's and all
; other plane to 0's.
;
SETSC SC_MAP_MASK,0fh ;must set map mask to enable all
; planes, so set/reset values can

View file

@ -2,7 +2,7 @@
; with CPU data to modify setting of memory that already contains data.
; By Michael Abrash.
;
stack segment para stack STACK#146;
stack segment para stack 'STACK'
db 512 dup(?)
stack ends
;
@ -40,7 +40,7 @@ SETGC macro INDEX, SETTING
dec dx
endm
;
cseg segment para public CODE#146;
cseg segment para public 'CODE'
assume cs:cseg
start proc near
;