A82: More problems (whywhywhywhywhy?)


[Prev][Next][Index][Thread]

A82: More problems (whywhywhywhywhy?)




;Due to my total lack of understanding asm, I've delayed
;Rogue until I learn a few more things. Like why this isn't
;working:

.include CrASH82.inc
.db "Rogue 0.08",0

;***SOME HANDY DEFINITIONS***
.define normal_text	res 3,(iy+5)
.define inverse_text	set 3,(iy+5)
.define text(x,y,z)	ld hl,(x*256)+y \ ld (GRAF_CURS),hl \ ld hl,z
\ call DISPLAY_STRING

;<shnip>

;***TITLE SCREEN***
	call BLACK_SCREEN
	text(1,2,ROGUE)
	text(11,14,Original_concept)
	text(17,19,Glenn_Wichman)
	text(23,19,Michael_Toy_and)
	text(29,19,Kenneth_Arnold)
	text(39,8,by_Kouri)
	text(56,2,Rogue_Name)	;This is where it fucks up
	call CR_KHAND

;<shnip>

;***MISCELANIOUS FUNCTIONS***
BLACK_SCREEN:
	ld hl,GRAPH_MEM		;\
	ld de,GRAPH_MEM+1	; \
	ld bc,$2FF		;  > Fill the GRAPH_MEM with $FF
	ld (hl),$FF		; /
	ldir			;/
	call CR_GRBCopy
	ret

;<shnip>

;***ROM CALLS***
;<shnip>

DISPLAY_STRING:
	inverse_text
	ROM_CALL(D_ZM_STR)
	normal_text
	ret

;<shnip>

;***STRINGS***
ROGUE:
.db "ROGUE:  The Adventure Game",0

Original_concept:
.db "Original concept by:",0

Glenn_Wichman:
.db "Glenn Wichman,",0

Michael_Toy_and:
.db "Michael Toy, and",0

Kenneth_Arnold:
.db "Kenneth Arnold",0

by_Kouri:
.db "Copyright 1998 by Kouri",0

Rogue_Name:
.db "Rogue's Name?",0

Welcome:
.db "Welcome to the dungeons",0

;<shnip>

;Okay. When the screen displays and it gets to the "Rogue's
;Name?" part, it displays instead "Rogue's Name?Welcome to
;the dungeons". Is this because of the way I used my
;text(x,y,z) definition? Someone help me with this. It is
;frustrating the hell out of me. Thank you

;P.S. I'm making Kannon's 'N Katapults instead. It will be
;a lot easier than Rogue. Also, how many characters can you 
;have in the game title (the .db description)? It got
;screwed up when I tried to fit "Kannon's 'N Katapults
;0.00" in it, but this should fit I think. Anyway, thanks.

_____________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com
Or call Juno at (800) 654-JUNO [654-5866]


Follow-Ups: