82-original.s

; da65 V2.11.9 - (C) Copyright 2000-2005,  Ullrich von Bassewitz
; Created:    2006-10-05 16:16:55
; Input	file: 82-original.prg
; Page:	      1


	.setcpu	"6502"


player_xpos	:= $0010
player_ypos	:= $0011
tile_xpos	:= $0012
tile_ypos	:= $0013
map_x		:= $0014
map_y		:= $0015
current_location:= $001A
game_mode	:= $001B
dungeon_level	:= $001C
player_transport:= $001E
party_size	:= $001F
dng_direction	:= $0020
light_duration	:= $0021
moon_phase_trammel:= $0022
moon_phase_felucca:= $0023
horse_mode	:= $0024
last_meditation	:= $0029
ship_hull	:= $002B
move_counter	:= $002C
key_buf		:= $0030
key_buf_len	:= $0038
charptr		:= $003D
magic_aura	:= $0046
aura_duration	:= $0047
tile_under_player:= $0048
tile_north	:= $0049
tile_south	:= $004A
tile_east	:= $004B
tile_west	:= $004C
music_volume	:= $004D
console_xpos	:= $004E
console_ypos	:= $004F
diskid		:= $0050
numdrives	:= $0051
currdisk_drive1	:= $0052
currdisk_drive2	:= $0053
currplayer	:= $0054
hexnum		:= $0056
bcdnum		:= $0057
zptmp1		:= $005A
reqdisk		:= $005E
currdrive	:= $005F
lt_y		:= $0060
lt_x		:= $0061
lt_rwflag	:= $0062
lt_addr_hi	:= $0063
monster_type	:= $0066
game_mode_temp	:= $0068
moongate_tile	:= $006D
moongate_xpos	:= $006E
moongate_ypos	:= $006F
movement_mode	:= $0074
direction	:= $0075
ptr2		:= $007C
ptr1		:= $007E
j_waitkey	:= $0800
j_player_teleport:= $0803
j_move_east	:= $0806
j_move_west	:= $0809
j_move_south	:= $080C
j_move_north	:= $080F
j_drawinterface	:= $0812
j_drawview	:= $0815
j_update_britannia:= $0818
j_primm_xy	:= $081E
j_primm		:= $0821
j_console_out	:= $0824
j_clearbitmap	:= $0827
j_mulax		:= $082A
j_get_stats_ptr	:= $082D
j_printname	:= $0830
j_printbcd	:= $0833
j_drawcursor	:= $0836
j_drawcursor_xy	:= $0839
j_drawvert	:= $083C
j_drawhoriz	:= $083F
j_request_disk	:= $0842
j_update_status	:= $0845
j_blocked_tile	:= $0848
j_idle		:= $084B
j_rand		:= $084E
j_loadsector	:= $0851
j_playsfx	:= $0854
j_idle_combat	:= $0857
j_getnumber	:= $085A
j_getplayernum	:= $085D
j_update_wind	:= $0860
j_animate_view	:= $0863
j_printdigit	:= $0866
j_clearstatwindow:= $0869
j_animate_creatures:= $086C
j_centername	:= $086F
j_print_direction:= $0872
j_clearview	:= $0875
j_invertview	:= $0878
j_centerstring	:= $087B
j_printstring	:= $087E
j_gettile_bounds:= $0881
j_gettile	:= $0884
j_gettile_combat:= $088D
j_gettile_town	:= $0893
j_gettile_dungeon:= $0896
gettile_bounds	:= $9F00
gettile		:= $9F26
mul11		:= $9F49
gettile_combat	:= $9F85
gettile_town	:= $9FAF
gettile_dungeon	:= $9FCE
j_fileio	:= $A100
j_readblock	:= $A103
j_loadtitle	:= $A106
j_togglesnd	:= $A109
j_kernalin	:= $A10C
j_setirqv	:= $A10F
j_clearkbd	:= $A112
j_irqhandler	:= $A115
party_stats	:= $AA00
game_stats	:= $AB00
food_hi		:= $AB10
food_lo		:= $AB11
food_frac	:= $AB12
gold		:= $AB13
mixtures	:= $AB40
map_status	:= $AC00
object_xpos	:= $AC20
object_ypos	:= $AC40
object_tile	:= $AC60
monster_xpos	:= $AD00
monster_ypos	:= $AD10
monster_hp	:= $AD40
cbt_monster_type:= $AD50
monster_tile	:= $AD60
cbt_player_xpos	:= $AD80
cbt_player_ypos	:= $AD90
player_tile	:= $ADA0
missile		:= $ADFD
missile_xpos	:= $ADFE
missile_ypos	:= $ADFF
currmap		:= $AE00
tempmap		:= $AE80
music_ctl	:= $AF20
music_nop	:= $AF23
bmplineaddr_lo	:= $E000
bmplineaddr_hi	:= $E0C0
chrlineaddr_lo	:= $E180
chrlineaddr_hi	:= $E198
tile_color	:= $E1B0
music_init	:= $EC00

	.word	$8800				; 87FE

shrine:
	lda	current_location		; 8800
	sec					; 8802
	sbc	#$19				; 8803  Y
	sta	shrine_num			; 8805
	tay					; 8808
	lda	$AB0D				; 8809
	and	rune_mask,y			; 880C
	bne	@haverune			; 880F
	jsr	j_primm				; 8811
	.byte	$8D,$D4,$C8,$CF,$D5,$A0,$C4,$CF	; 8814  MTHOU DO
	.byte	$D3,$D4,$A0,$CE,$CF,$D4,$8D,$C2	; 881C  ST NOTMB
	.byte	$C5,$C1,$D2,$A0,$D4,$C8,$C5,$A0	; 8824  EAR THE 
	.byte	$D2,$D5,$CE,$C5,$8D,$CF,$C6,$A0	; 882C  RUNEMOF 
	.byte	$C5,$CE,$D4,$D2,$D9,$A1,$A0,$C1	; 8834  ENTRY! A
	.byte	$8D,$D3,$D4,$D2,$C1,$CE,$C7,$C5	; 883C  MSTRANGE
	.byte	$A0,$C6,$CF,$D2,$C3,$C5,$8D,$CB	; 8844   FORCEMK
	.byte	$C5,$C5,$D0,$D3,$A0,$D9,$CF,$D5	; 884C  EEPS YOU
	.byte	$A0,$CF,$D5,$D4,$A1,$8D,$00	; 8854   OUT!M.

	jmp	exit_shrine			; 885B

@haverune:
	lda	#$CC				; 885E  L
	ldx	#$1C				; 8860  \
	jsr	j_fileio			; 8862
	ldx	#$7F				; 8865  .
@copymap:
	lda	tempmap,x			; 8867
	sta	currmap,x			; 886A
	dex					; 886D
	bpl	@copymap			; 886E
	lda	#$FF				; 8870  .
	sta	game_mode			; 8872
	jsr	j_idle				; 8874
	lda	#$03				; 8877  C
	jsr	music_ctl			; 8879
	jsr	j_primm				; 887C
	.byte	$8D,$D9,$CF,$D5,$A0,$C5,$CE,$D4	; 887F  MYOU ENT
	.byte	$C5,$D2,$A0,$D4,$C8,$C5,$8D,$C1	; 8887  ER THEMA
	.byte	$CE,$C3,$C9,$C5,$CE,$D4,$A0,$D3	; 888F  NCIENT S
	.byte	$C8,$D2,$C9,$CE,$C5,$8D,$C1,$CE	; 8897  HRINEMAN
	.byte	$C4,$A0,$D3,$C9,$D4,$A0,$C2,$C5	; 889F  D SIT BE
	.byte	$C6,$CF,$D2,$C5,$8D,$D4,$C8,$C5	; 88A7  FOREMTHE
	.byte	$A0,$C1,$CC,$D4,$C1,$D2,$AE,$AE	; 88AF   ALTAR..
	.byte	$AE,$8D,$8D,$D5,$D0,$CF,$CE,$A0	; 88B7  .MMUPON 
	.byte	$D7,$C8,$C1,$D4,$A0,$D6,$C9,$D2	; 88BF  WHAT VIR
	.byte	$D4,$D5,$C5,$8D,$C4,$CF,$D3,$D4	; 88C7  TUEMDOST
	.byte	$A0,$D4,$C8,$CF,$D5,$8D,$CD,$C5	; 88CF   THOUMME
	.byte	$C4,$C9,$D4,$C1,$D4,$C5,$BF,$8D	; 88D7  DITATE?M
	.byte	$00				; 88DF  .

	lda	#$00				; 88E0  .
	sta	num_cycles			; 88E2
	jsr	get_string			; 88E5
@askcycles:
	jsr	j_primm				; 88E8
	.byte	$8D,$C6,$CF,$D2,$A0,$C8,$CF,$D7	; 88EB  MFOR HOW
	.byte	$A0,$CD,$C1,$CE,$D9,$8D,$C3,$D9	; 88F3   MANYMCY
	.byte	$C3,$CC,$C5,$D3,$A0,$A8,$B0,$AD	; 88FB  CLES (0-
	.byte	$B3,$A9,$BA,$00			; 8903  3):.

	jsr	get_number			; 8907
	cmp	#$04				; 890A  D
	bcs	@askcycles			; 890C
	sta	num_cycles			; 890E
	sta	cycle_ctr			; 8911
	bne	@meditate			; 8914
	jmp	no_focus			; 8916

@meditate:
	lda	#$00				; 8919  .
	sta	unused				; 891B
	jsr	compare_string			; 891E
	cmp	shrine_num			; 8921
	beq	@virtue_shrine_match		; 8924
	jmp	no_focus			; 8926

@virtue_shrine_match:
	lda	move_counter+2			; 8929
	cmp	last_meditation			; 892B
	bne	@begin				; 892D
	jmp	still_weary			; 892F

@begin:
	sta	last_meditation			; 8932
	jsr	j_primm				; 8934
	.byte	$8D,$C2,$C5,$C7,$C9,$CE,$A0,$CD	; 8937  MBEGIN M
	.byte	$C5,$C4,$C9,$D4,$C1,$D4,$C9,$CF	; 893F  EDITATIO
	.byte	$CE,$8D,$00			; 8947  NM.

@slowdots:
	lda	#$10				; 894A  P
	sta	$70				; 894C
@print:
	jsr	delay				; 894E
	lda	#$AE				; 8951  .
	jsr	j_console_out			; 8953
	dec	$70				; 8956
	bne	@print				; 8958
	bit	$C010				; 895A
	lda	#$00				; 895D  .
	sta	key_buf_len			; 895F
	jsr	j_primm				; 8961
	.byte	$8D,$CD,$C1,$CE,$D4,$D2,$C1,$00	; 8964  MMANTRA.

	jsr	get_string			; 896C
	jsr	compare_string			; 896F
	sec					; 8972
	sbc	#$08				; 8973  H
	cmp	shrine_num			; 8975
	beq	@correctmantra			; 8978
	jmp	@wrongmantra			; 897A

@correctmantra:
	dec	cycle_ctr			; 897D
	bne	@slowdots			; 8980
	jmp	@checkresult			; 8982

@wrongmantra:
	jsr	j_primm				; 8985
	.byte	$8D,$D4,$C8,$CF,$D5,$A0,$C1,$D2	; 8988  MTHOU AR
	.byte	$D4,$A0,$CE,$CF,$D4,$8D,$C1,$C2	; 8990  T NOTMAB
	.byte	$CC,$C5,$A0,$D4,$CF,$A0,$C6,$CF	; 8998  LE TO FO
	.byte	$C3,$D5,$D3,$8D,$D4,$C8,$D9,$A0	; 89A0  CUSMTHY 
	.byte	$D4,$C8,$CF,$D5,$C7,$C8,$D4,$D3	; 89A8  THOUGHTS
	.byte	$8D,$D7,$C9,$D4,$C8,$A0,$D4,$C8	; 89B0  MWITH TH
	.byte	$C1,$D4,$8D,$CD,$C1,$CE,$D4,$D2	; 89B8  ATMMANTR
	.byte	$C1,$A1,$8D,$00			; 89C0  A!M.

	ldy	#$06				; 89C4  F
	lda	#$03				; 89C6  C
	jsr	punish_player			; 89C8
	jmp	exit_shrine			; 89CB

@checkresult:
	lda	num_cycles			; 89CE
	cmp	#$03				; 89D1  C
	bne	@vision				; 89D3
	ldy	shrine_num			; 89D5
	lda	game_stats,y			; 89D8
	cmp	#$99				; 89DB  Y
	bne	@vision				; 89DD
	jmp	partial_avatar			; 89DF

@vision:
	jsr	j_primm				; 89E2
	.byte	$8D,$D4,$C8,$D9,$A0,$D4,$C8,$CF	; 89E5  MTHY THO
	.byte	$D5,$C7,$C8,$D4,$D3,$8D,$C1,$D2	; 89ED  UGHTSMAR
	.byte	$C5,$A0,$D0,$D5,$D2,$C5,$AC,$8D	; 89F5  E PURE,M
	.byte	$D4,$C8,$CF,$D5,$A0,$C1,$D2,$D4	; 89FD  THOU ART
	.byte	$A0,$C7,$D2,$C1,$CE,$D4,$C5,$C4	; 8A05   GRANTED
	.byte	$8D,$C1,$A0,$D6,$C9,$D3,$C9,$CF	; 8A0D  MA VISIO
	.byte	$CE,$A1,$8D,$00			; 8A15  N!M.

	ldy	#$06				; 8A19  F
	lda	num_cycles			; 8A1B
	asl	a				; 8A1E
	adc	num_cycles			; 8A1F
	jsr	increase_virtue			; 8A22
	jsr	j_waitkey			; 8A25
	lda	#$8D				; 8A28  M
	jsr	j_console_out			; 8A2A
	ldy	shrine_num			; 8A2D
	lda	shrine_msg_idx,y		; 8A30
	clc					; 8A33
	ldy	num_cycles			; 8A34
	adc	shrine_msg_per_cycle,y		; 8A37
	clc					; 8A3A
	adc	#$01				; 8A3B  A
	jsr	print_hint			; 8A3D
	jsr	j_waitkey			; 8A40
exit_shrine:
	lda	#$8D				; 8A43  M
	jsr	j_console_out			; 8A45
	lda	#$00				; 8A48  .
	sta	current_location		; 8A4A
	lda	#$01				; 8A4C  A
	sta	game_mode			; 8A4E
	jsr	j_idle				; 8A50
	rts					; 8A53

	ldx	#$0A				; 8A54  J
:	jsr	@delay				; 8A56
	dex					; 8A59
	bne	:-				; 8A5A
	rts					; 8A5C

delay:
	ldx	#$05				; 8A5D  E
:	jsr	@delay				; 8A5F
	dex					; 8A62
	bne	:-				; 8A63
	rts					; 8A65

@delay:
	ldy	#$FF				; 8A66  .
:	lda	#$FF				; 8A68  .
:	sec					; 8A6A
	sbc	#$01				; 8A6B  A
	bne	:-				; 8A6D
	dey					; 8A6F
	bne	:--				; 8A70
	jsr	j_clearkbd			; 8A72
	rts					; 8A75

no_focus:
	jsr	j_primm				; 8A76
	.byte	$8D,$D4,$C8,$CF,$D5,$A0,$C1,$D2	; 8A79  MTHOU AR
	.byte	$D4,$A0,$D5,$CE,$C1,$C2,$CC,$C5	; 8A81  T UNABLE
	.byte	$8D,$D4,$CF,$A0,$C6,$CF,$C3,$D5	; 8A89  MTO FOCU
	.byte	$D3,$A0,$D4,$C8,$D9,$8D,$D4,$C8	; 8A91  S THYMTH
	.byte	$CF,$D5,$C7,$C8,$D4,$D3,$A0,$CF	; 8A99  OUGHTS O
	.byte	$CE,$8D,$D4,$C8,$C9,$D3,$A0,$D3	; 8AA1  NMTHIS S
	.byte	$D5,$C2,$CA,$C5,$C3,$D4,$A1,$8D	; 8AA9  UBJECT!M
	.byte	$00				; 8AB1  .

	jsr	j_waitkey			; 8AB2
	jmp	exit_shrine			; 8AB5

still_weary:
	jsr	j_primm				; 8AB8
	.byte	$8D,$D4,$C8,$D9,$A0,$CD,$C9,$CE	; 8ABB  MTHY MIN
	.byte	$C4,$A0,$C9,$D3,$8D,$D3,$D4,$C9	; 8AC3  D ISMSTI
	.byte	$CC,$CC,$A0,$D7,$C5,$C1,$D2,$D9	; 8ACB  LL WEARY
	.byte	$8D,$C6,$D2,$CF,$CD,$A0,$D4,$C8	; 8AD3  MFROM TH
	.byte	$D9,$A0,$CC,$C1,$D3,$D4,$8D,$CD	; 8ADB  Y LASTMM
	.byte	$C5,$C4,$C9,$D4,$C1,$D4,$C9,$CF	; 8AE3  EDITATIO
	.byte	$CE,$A1,$8D,$00			; 8AEB  N!M.

	jsr	j_waitkey			; 8AEF
	jmp	exit_shrine			; 8AF2

increase_virtue:
	sta	$59				; 8AF5
	sed					; 8AF7
	clc					; 8AF8
	lda	game_stats,y			; 8AF9
	beq	@nooverflow			; 8AFC
	adc	$59				; 8AFE
	bcc	@nooverflow			; 8B00
	lda	#$99				; 8B02  Y
@nooverflow:
	sta	game_stats,y			; 8B04
	cld					; 8B07
	rts					; 8B08

punish_player:
	sta	zptmp1				; 8B09
	sty	$59				; 8B0B
	lda	game_stats,y			; 8B0D
	beq	@partial_avatar			; 8B10
@subtract:
	sed					; 8B12
	sec					; 8B13
	sbc	zptmp1				; 8B14
	beq	:+				; 8B16
	bcs	@positive			; 8B18
:	lda	#$01				; 8B1A  A
@positive:
	sta	game_stats,y			; 8B1C
	cld					; 8B1F
	rts					; 8B20

@partial_avatar:
	jsr	j_primm				; 8B21
	.byte	$8D,$D4,$C8,$CF,$D5,$A0,$C8,$C1	; 8B24  MTHOU HA
	.byte	$D3,$D4,$A0,$CC,$CF,$D3,$D4,$8D	; 8B2C  ST LOSTM
	.byte	$C1,$CE,$A0,$C5,$C9,$C7,$C8,$D4	; 8B34  AN EIGHT
	.byte	$C8,$A1,$8D,$00			; 8B3C  H!M.

	ldy	$59				; 8B40
	lda	#$99				; 8B42  Y
	jmp	@subtract			; 8B44

partial_avatar:
	jsr	j_primm				; 8B47
	.byte	$8D,$D4,$C8,$CF,$D5,$A0,$C8,$C1	; 8B4A  MTHOU HA
	.byte	$D3,$D4,$8D,$C1,$C3,$C8,$C9,$C5	; 8B52  STMACHIE
	.byte	$D6,$C5,$C4,$A0,$D0,$C1,$D2,$D4	; 8B5A  VED PART
	.byte	$C9,$C1,$CC,$8D,$C1,$D6,$C1,$D4	; 8B62  IALMAVAT
	.byte	$C1,$D2,$C8,$CF,$CF,$C4,$A0,$C9	; 8B6A  ARHOOD I
	.byte	$CE,$8D,$D4,$C8,$C5,$A0,$D6,$C9	; 8B72  NMTHE VI
	.byte	$D2,$D4,$D5,$C5,$A0,$CF,$C6,$8D	; 8B7A  RTUE OFM
	.byte	$00				; 8B82  .

	lda	#$97				; 8B83  W
	clc					; 8B85
	adc	shrine_num			; 8B86
	jsr	j_printstring			; 8B89
	jsr	j_invertview			; 8B8C
	ldx	#$FF				; 8B8F  .
	lda	#$09				; 8B91  I
	jsr	j_playsfx			; 8B93
	jsr	j_invertview			; 8B96
	lda	#$8D				; 8B99  M
	jsr	j_console_out			; 8B9B
	ldy	shrine_num			; 8B9E
	lda	#$00				; 8BA1  .
	sta	game_stats,y			; 8BA3
	jsr	j_waitkey			; 8BA6
	jsr	j_primm				; 8BA9
	.byte	$8D,$D4,$C8,$CF,$D5,$A0,$C1,$D2	; 8BAC  MTHOU AR
	.byte	$D4,$A0,$C7,$D2,$C1,$CE,$D4,$C5	; 8BB4  T GRANTE
	.byte	$C4,$8D,$C1,$A0,$D6,$C9,$D3,$C9	; 8BBC  DMA VISI
	.byte	$CF,$CE,$A1,$8D,$00		; 8BC4  ON!M.

	lda	#$00				; 8BC9  .
	sta	game_mode			; 8BCB
	lda	shrine_num			; 8BCD
	jsr	draw_rune			; 8BD0
	jsr	j_waitkey			; 8BD3
	jmp	exit_shrine			; 8BD6

get_number:
	jsr	j_waitkey			; 8BD9
	beq	get_number			; 8BDC
	sec					; 8BDE
	sbc	#$B0				; 8BDF  0
	cmp	#$0A				; 8BE1  J
	bcc	@ok				; 8BE3
	lda	#$00				; 8BE5  .
@ok:
	pha					; 8BE7
	jsr	j_printdigit			; 8BE8
	lda	#$8D				; 8BEB  M
	jsr	j_console_out			; 8BED
	pla					; 8BF0
	rts					; 8BF1

shrine_num:
	.byte	$00				; 8BF2  .
num_cycles:
	.byte	$00				; 8BF3  .
cycle_ctr:
	.byte	$00				; 8BF4  .
unused:
	.byte	$00				; 8BF5  .
shrine_msg_idx:
	.byte	$00,$03,$06,$09,$0C,$0F,$12,$15	; 8BF6  .CFILORU
shrine_msg_per_cycle:
	.byte	$18,$00,$00,$00,$01,$01,$01,$02	; 8BFE  X...AAAB
	.byte	$02,$02				; 8C06  BB
rune_mask:
	.byte	$80,$40,$20,$10,$08,$04,$02,$01	; 8C08  .@ PHDBA

get_string:
	lda	#$BF				; 8C10  ?
	jsr	j_console_out			; 8C12
	lda	#$00				; 8C15  .
	sta	$6A				; 8C17
@waitkey:
	jsr	j_waitkey			; 8C19
	beq	@timeout			; 8C1C
@checkkey:
	cmp	#$8D				; 8C1E  M
	beq	@done				; 8C20
	cmp	#$94				; 8C22  T
	beq	@del				; 8C24
	cmp	#$A0				; 8C26   
	bcc	@waitkey			; 8C28
	ldx	$6A				; 8C2A
	sta	$AF00,x				; 8C2C
	jsr	j_console_out			; 8C2F
	inc	$6A				; 8C32
	lda	$6A				; 8C34
	cmp	#$0F				; 8C36  O
	bcc	@waitkey			; 8C38
	bcs	@done				; 8C3A
@del:
	lda	$6A				; 8C3C
	beq	@waitkey			; 8C3E
	dec	$6A				; 8C40
	dec	console_xpos			; 8C42
	lda	#$A0				; 8C44   
	jsr	j_console_out			; 8C46
	dec	console_xpos			; 8C49
	jmp	@waitkey			; 8C4B

@timeout:
	lda	num_cycles			; 8C4E
	beq	@checkkey			; 8C51
@done:
	ldx	$6A				; 8C53
	lda	#$A0				; 8C55   
@clearend:
	sta	$AF00,x				; 8C57
	inx					; 8C5A
	cpx	#$06				; 8C5B  F
	bcc	@clearend			; 8C5D
	lda	#$8D				; 8C5F  M
	jsr	j_console_out			; 8C61
	rts					; 8C64

compare_string:
	lda	#$0F				; 8C65  O
	sta	$6A				; 8C67
@nextstring:
	lda	$6A				; 8C69
	asl	a				; 8C6B
	asl	a				; 8C6C
	tay					; 8C6D
	ldx	#$00				; 8C6E  .
@compare:
	lda	virtues_and_mantras,y		; 8C70
	cmp	$AF00,x				; 8C73
	bne	@differ				; 8C76
	iny					; 8C78
	inx					; 8C79
	cpx	#$04				; 8C7A  D
	bcc	@compare			; 8C7C
	lda	$6A				; 8C7E
	rts					; 8C80

@differ:
	dec	$6A				; 8C81
	bpl	@nextstring			; 8C83
	lda	$6A				; 8C85
	rts					; 8C87

virtues_and_mantras:
	.byte	$C8,$CF,$CE,$C5,$C3,$CF,$CD,$D0	; 8C88  HONECOMP
	.byte	$D6,$C1,$CC,$CF,$CA,$D5,$D3,$D4	; 8C90  VALOJUST
	.byte	$D3,$C1,$C3,$D2,$C8,$CF,$CE,$CF	; 8C98  SACRHONO
	.byte	$D3,$D0,$C9,$D2,$C8,$D5,$CD,$C9	; 8CA0  SPIRHUMI
	.byte	$C1,$C8,$CD,$A0,$CD,$D5,$A0,$A0	; 8CA8  AHM MU  
	.byte	$D2,$C1,$A0,$A0,$C2,$C5,$C8,$A0	; 8CB0  RA  BEH 
	.byte	$C3,$C1,$C8,$A0,$D3,$D5,$CD,$CD	; 8CB8  CAH SUMM
	.byte	$CF,$CD,$A0,$A0,$CC,$D5,$CD,$A0	; 8CC0  OM  LUM 

print_hint:
	tay					; 8CC8
	lda	#$FA				; 8CC9  z
	sta	ptr1				; 8CCB
	lda	#$8C				; 8CCD  L
	sta	ptr1+1				; 8CCF
	ldx	#$00				; 8CD1  .
@checknext:
	lda	(ptr1,x)			; 8CD3
	beq	@possiblestring			; 8CD5
@wrongstring:
	jsr	@incptr				; 8CD7
	jmp	@checknext			; 8CDA

@possiblestring:
	dey					; 8CDD
	beq	@gotstring			; 8CDE
	jmp	@wrongstring			; 8CE0

@gotstring:
	jsr	@incptr				; 8CE3
	ldx	#$00				; 8CE6  .
	lda	(ptr1,x)			; 8CE8
	beq	@done				; 8CEA
	jsr	j_console_out			; 8CEC
	jmp	@gotstring			; 8CEF

@done:
	rts					; 8CF2

@incptr:
	inc	ptr1				; 8CF3
	bne	:+				; 8CF5
	inc	ptr1+1				; 8CF7
:	rts					; 8CF9

hint_honesty_0:
	.byte	$00,$D4,$C1,$CB,$C5,$A0,$CE,$CF	; 8CFA  .TAKE NO
	.byte	$D4,$A0,$D4,$C8,$C5,$8D,$C7,$CF	; 8D02  T THEMGO
	.byte	$CC,$C4,$A0,$CF,$C6,$A0,$CF,$D4	; 8D0A  LD OF OT
	.byte	$C8,$C5,$D2,$D3,$8D,$C6,$CF,$D5	; 8D12  HERSMFOU
	.byte	$CE,$C4,$A0,$C9,$CE,$A0,$D4,$CF	; 8D1A  ND IN TO
	.byte	$D7,$CE,$D3,$8D,$C1,$CE,$C4,$A0	; 8D22  WNSMAND 
	.byte	$C3,$C1,$D3,$D4,$CC,$C5,$D3,$A0	; 8D2A  CASTLES 
	.byte	$C6,$CF,$D2,$8D,$D9,$CF,$D5,$D2	; 8D32  FORMYOUR
	.byte	$D3,$A0,$C9,$D4,$A0,$C9,$D3,$A0	; 8D3A  S IT IS 
	.byte	$CE,$CF,$D4,$A1,$8D		; 8D42  NOT!M
hint_honesty_1:
	.byte	$00,$C3,$C8,$C5,$C1,$D4,$A0,$CE	; 8D47  .CHEAT N
	.byte	$CF,$D4,$A0,$D4,$C8,$C5,$8D,$CD	; 8D4F  OT THEMM
	.byte	$C5,$D2,$C3,$C8,$C1,$CE,$D4,$D3	; 8D57  ERCHANTS
	.byte	$A0,$C1,$CE,$C4,$8D,$D0,$C5,$C4	; 8D5F   ANDMPED
	.byte	$C4,$CC,$C5,$D2,$D3,$A0,$C6,$CF	; 8D67  DLERS FO
	.byte	$D2,$A0,$D4,$C9,$D3,$8D,$C1,$CE	; 8D6F  R TISMAN
	.byte	$A0,$C5,$D6,$C9,$CC,$A0,$D4,$C8	; 8D77   EVIL TH
	.byte	$C9,$CE,$C7,$8D,$D4,$CF,$A0,$C4	; 8D7F  INGMTO D
	.byte	$CF,$A1,$8D			; 8D87  O!M
hint_honesty_2:
	.byte	$00,$D3,$C5,$C3,$CF,$CE,$C4,$AC	; 8D8A  .SECOND,
	.byte	$A0,$D2,$C5,$C1,$C4,$A0,$D4,$C8	; 8D92   READ TH
	.byte	$C5,$8D,$C2,$CF,$CF,$CB,$A0,$CF	; 8D9A  EMBOOK O
	.byte	$C6,$A0,$D4,$D2,$D5,$D4,$C8,$A0	; 8DA2  F TRUTH 
	.byte	$C1,$D4,$8D,$D4,$C8,$C5,$A0,$C5	; 8DAA  ATMTHE E
	.byte	$CE,$D4,$D2,$C1,$CE,$C3,$C5,$A0	; 8DB2  NTRANCE 
	.byte	$D4,$CF,$8D,$D4,$C8,$C5,$A0,$C7	; 8DBA  TOMTHE G
	.byte	$D2,$C5,$C1,$D4,$8D,$D3,$D4,$D9	; 8DC2  REATMSTY
	.byte	$C7,$C9,$C1,$CE,$A0,$C1,$C2,$D9	; 8DCA  GIAN ABY
	.byte	$D3,$D3,$A1,$8D			; 8DD2  SS!M
hint_compassion_0:
	.byte	$00,$CB,$C9,$CC,$CC,$A0,$CE,$CF	; 8DD6  .KILL NO
	.byte	$D4,$A0,$D4,$C8,$C5,$8D,$CE,$CF	; 8DDE  T THEMNO
	.byte	$CE,$AD,$C5,$D6,$C9,$CC,$A0,$C2	; 8DE6  N-EVIL B
	.byte	$C5,$C1,$D3,$D4,$D3,$8D,$CF,$C6	; 8DEE  EASTSMOF
	.byte	$A0,$D4,$C8,$C5,$A0,$CC,$C1,$CE	; 8DF6   THE LAN
	.byte	$C4,$AC,$A0,$C1,$CE,$C4,$8D,$C4	; 8DFE  D, ANDMD
	.byte	$CF,$A0,$CE,$CF,$D4,$A0,$C1,$D4	; 8E06  O NOT AT
	.byte	$D4,$C1,$C3,$CB,$8D,$D4,$C8,$C5	; 8E0E  TACKMTHE
	.byte	$A0,$C6,$C1,$C9,$D2,$A0,$D0,$C5	; 8E16   FAIR PE
	.byte	$CF,$D0,$CC,$C5,$A1,$8D		; 8E1E  OPLE!M
hint_compassion_1:
	.byte	$00,$C7,$C9,$D6,$C5,$A0,$CF,$C6	; 8E24  .GIVE OF
	.byte	$A0,$D4,$C8,$D9,$8D,$D0,$D5,$D2	; 8E2C   THYMPUR
	.byte	$D3,$C5,$A0,$D4,$CF,$A0,$D4,$C8	; 8E34  SE TO TH
	.byte	$CF,$D3,$C5,$8D,$D7,$C8,$CF,$A0	; 8E3C  OSEMWHO 
	.byte	$C2,$C5,$C7,$A0,$C1,$CE,$C4,$A0	; 8E44  BEG AND 
	.byte	$D4,$C8,$D9,$8D,$C4,$C5,$C5,$C4	; 8E4C  THYMDEED
	.byte	$A0,$D3,$C8,$C1,$CC,$CC,$A0,$CE	; 8E54   SHALL N
	.byte	$CF,$D4,$8D,$C2,$C5,$A0,$C6,$CF	; 8E5C  OTMBE FO
	.byte	$D2,$C7,$CF,$D4,$D4,$C5,$CE,$A1	; 8E64  RGOTTEN!
	.byte	$8D				; 8E6C  M
hint_compassion_2:
	.byte	$00,$D4,$C8,$C9,$D2,$C4,$AC,$A0	; 8E6D  .THIRD, 
	.byte	$CC,$C9,$C7,$C8,$D4,$A0,$D4,$C8	; 8E75  LIGHT TH
	.byte	$C5,$8D,$C3,$C1,$CE,$C4,$CC,$C5	; 8E7D  EMCANDLE
	.byte	$A0,$CF,$C6,$A0,$CC,$CF,$D6,$C5	; 8E85   OF LOVE
	.byte	$8D,$C1,$D4,$A0,$D4,$C8,$C5,$A0	; 8E8D  MAT THE 
	.byte	$C5,$CE,$D4,$D2,$C1,$CE,$C3,$C5	; 8E95  ENTRANCE
	.byte	$8D,$D4,$CF,$A0,$D4,$C8,$C5,$A0	; 8E9D  MTO THE 
	.byte	$C7,$D2,$C5,$C1,$D4,$8D,$D3,$D4	; 8EA5  GREATMST
	.byte	$D9,$C7,$C9,$C1,$CE,$A0,$C1,$C2	; 8EAD  YGIAN AB
	.byte	$D9,$D3,$D3,$A1,$8D		; 8EB5  YSS!M
hint_valor_0:
	.byte	$00,$D6,$C9,$C3,$D4,$CF,$D2,$C9	; 8EBA  .VICTORI
	.byte	$C5,$D3,$A0,$D3,$C3,$CF,$D2,$C5	; 8EC2  ES SCORE
	.byte	$C4,$8D,$CF,$D6,$C5,$D2,$A0,$C5	; 8ECA  DMOVER E
	.byte	$D6,$C9,$CC,$8D,$C3,$D2,$C5,$C1	; 8ED2  VILMCREA
	.byte	$D4,$D5,$D2,$C5,$D3,$A0,$C8,$C5	; 8EDA  TURES HE
	.byte	$CC,$D0,$8D,$D4,$CF,$A0,$C2,$D5	; 8EE2  LPMTO BU
	.byte	$C9,$CC,$C4,$A0,$C1,$8D,$D6,$C1	; 8EEA  ILD AMVA
	.byte	$CC,$CF,$D2,$CF,$D5,$D3,$A0,$D3	; 8EF2  LOROUS S
	.byte	$CF,$D5,$CC,$A1,$8D		; 8EFA  OUL!M
hint_valor_1:
	.byte	$00,$D4,$CF,$A0,$C6,$CC,$C5,$C5	; 8EFF  .TO FLEE
	.byte	$A0,$C6,$D2,$CF,$CD,$8D,$C2,$C1	; 8F07   FROMMBA
	.byte	$D4,$D4,$CC,$C5,$A0,$D7,$C9,$D4	; 8F0F  TTLE WIT
	.byte	$C8,$A0,$CC,$C5,$D3,$D3,$8D,$D4	; 8F17  H LESSMT
	.byte	$C8,$C1,$CE,$A0,$C7,$D2,$C9,$C5	; 8F1F  HAN GRIE
	.byte	$D6,$CF,$D5,$D3,$8D,$D7,$CF,$D5	; 8F27  VOUSMWOU
	.byte	$CE,$C4,$D3,$A0,$CF,$C6,$D4,$C5	; 8F2F  NDS OFTE
	.byte	$CE,$8D,$D3,$C8,$CF,$D7,$D3,$A0	; 8F37  NMSHOWS 
	.byte	$C1,$A0,$C3,$CF,$D7,$C1,$D2,$C4	; 8F3F  A COWARD
	.byte	$A1,$8D				; 8F47  !M
hint_valor_2:
	.byte	$00,$C6,$C9,$D2,$D3,$D4,$AC,$A0	; 8F49  .FIRST, 
	.byte	$D2,$C9,$CE,$C7,$A0,$D4,$C8,$C5	; 8F51  RING THE
	.byte	$8D,$C2,$C5,$CC,$CC,$A0,$CF,$C6	; 8F59  MBELL OF
	.byte	$A0,$C3,$CF,$D5,$D2,$C1,$C7,$C5	; 8F61   COURAGE
	.byte	$8D,$C1,$D4,$A0,$D4,$C8,$C5,$A0	; 8F69  MAT THE 
	.byte	$C5,$CE,$D4,$D2,$C1,$CE,$C3,$C5	; 8F71  ENTRANCE
	.byte	$8D,$D4,$CF,$A0,$D4,$C8,$C5,$A0	; 8F79  MTO THE 
	.byte	$C7,$D2,$C5,$C1,$D4,$8D,$D3,$D4	; 8F81  GREATMST
	.byte	$D9,$C7,$C9,$C1,$CE,$A0,$C1,$C2	; 8F89  YGIAN AB
	.byte	$D9,$D3,$D3,$A1,$8D		; 8F91  YSS!M
hint_justice_0:
	.byte	$00,$D4,$CF,$A0,$D4,$C1,$CB,$C5	; 8F96  .TO TAKE
	.byte	$A0,$D4,$C8,$C5,$A0,$C7,$CF,$CC	; 8F9E   THE GOL
	.byte	$C4,$8D,$CF,$C6,$A0,$CF,$D4,$C8	; 8FA6  DMOF OTH
	.byte	$C5,$D2,$D3,$A0,$C9,$D3,$8D,$C9	; 8FAE  ERS ISMI
	.byte	$CE,$CA,$D5,$D3,$D4,$C9,$C3,$C5	; 8FB6  NJUSTICE
	.byte	$A0,$CE,$CF,$D4,$8D,$D3,$CF,$CF	; 8FBE   NOTMSOO
	.byte	$CE,$A0,$C6,$CF,$D2,$C7,$CF,$D4	; 8FC6  N FORGOT
	.byte	$D4,$C5,$CE,$AC,$8D,$D4,$C1,$CB	; 8FCE  TEN,MTAK
	.byte	$C5,$A0,$CF,$CE,$CC,$D9,$A0,$D4	; 8FD6  E ONLY T
	.byte	$C8,$D9,$8D,$C4,$D5,$C5,$A1,$8D	; 8FDE  HYMDUE!M
hint_justice_1:
	.byte	$00,$C1,$D4,$D4,$C1,$C3,$CB,$A0	; 8FE6  .ATTACK 
	.byte	$CE,$CF,$D4,$A0,$C1,$8D,$D0,$C5	; 8FEE  NOT AMPE
	.byte	$C1,$C3,$C5,$C6,$D5,$CC,$A0,$C3	; 8FF6  ACEFUL C
	.byte	$C9,$D4,$C9,$DA,$C5,$CE,$8D,$C6	; 8FFE  ITIZENMF
	.byte	$CF,$D2,$A0,$D4,$C8,$C1,$D4,$A0	; 9006  OR THAT 
	.byte	$C1,$C3,$D4,$C9,$CF,$CE,$8D,$C4	; 900E  ACTIONMD
	.byte	$C5,$D3,$C5,$D2,$D6,$C5,$D3,$A0	; 9016  ESERVES 
	.byte	$D3,$D4,$D2,$C9,$C3,$D4,$8D,$D0	; 901E  STRICTMP
	.byte	$D5,$CE,$C9,$D3,$C8,$CD,$C5,$CE	; 9026  UNISHMEN
	.byte	$D4,$A1,$8D			; 902E  T!M
hint_justice_2:
	.byte	$00,$CB,$C9,$CC,$CC,$A0,$CE,$CF	; 9031  .KILL NO
	.byte	$D4,$A0,$C1,$8D,$CE,$CF,$CE,$AD	; 9039  T AMNON-
	.byte	$C5,$D6,$C9,$CC,$A0,$C2,$C5,$C1	; 9041  EVIL BEA
	.byte	$D3,$D4,$8D,$C6,$CF,$D2,$A0,$D4	; 9049  STMFOR T
	.byte	$C8,$C5,$D9,$A0,$C4,$C5,$D3,$C5	; 9051  HEY DESE
	.byte	$D2,$D6,$C5,$8D,$CE,$CF,$D4,$A0	; 9059  RVEMNOT 
	.byte	$C4,$C5,$C1,$D4,$C8,$A0,$C5,$D6	; 9061  DEATH EV
	.byte	$C5,$CE,$8D,$C9,$C6,$A0,$C9,$CE	; 9069  ENMIF IN
	.byte	$A0,$C8,$D5,$CE,$C7,$C5,$D2,$8D	; 9071   HUNGERM
	.byte	$D4,$C8,$C5,$D9,$A0,$C1,$D4,$D4	; 9079  THEY ATT
	.byte	$C1,$C3,$CB,$8D,$D4,$C8,$C5,$C5	; 9081  ACKMTHEE
	.byte	$A1,$8D				; 9089  !M
hint_sacrifice_0:
	.byte	$00,$D4,$CF,$A0,$C7,$C9,$D6,$C5	; 908B  .TO GIVE
	.byte	$A0,$D4,$C8,$D9,$A0,$CC,$C1,$D3	; 9093   THY LAS
	.byte	$D4,$8D,$C7,$CF,$CC,$C4,$A0,$D0	; 909B  TMGOLD P
	.byte	$C9,$C5,$C3,$C5,$A0,$D5,$CE,$D4	; 90A3  IECE UNT
	.byte	$CF,$8D,$D4,$C8,$C5,$A0,$CE,$C5	; 90AB  OMTHE NE
	.byte	$C5,$C4,$D9,$AC,$A0,$D3,$C8,$CF	; 90B3  EDY, SHO
	.byte	$D7,$D3,$8D,$C7,$CF,$CF,$C4,$A0	; 90BB  WSMGOOD 
	.byte	$CD,$C5,$C1,$D3,$D5,$D2,$C5,$A0	; 90C3  MEASURE 
	.byte	$CF,$C6,$8D,$D3,$C5,$CC,$C6,$AD	; 90CB  OFMSELF-
	.byte	$D3,$C1,$C3,$D2,$C9,$C6,$C9,$C3	; 90D3  SACRIFIC
	.byte	$C5,$A1,$8D			; 90DB  E!M
hint_sacrifice_1:
	.byte	$00,$C6,$CF,$D2,$A0,$D4,$C8,$C5	; 90DE  .FOR THE
	.byte	$C5,$A0,$D4,$CF,$A0,$C6,$CC,$C5	; 90E6  E TO FLE
	.byte	$C5,$8D,$C1,$CE,$C4,$A0,$CC,$C5	; 90EE  EMAND LE
	.byte	$C1,$D6,$C5,$A0,$D4,$C8,$D9,$8D	; 90F6  AVE THYM
	.byte	$C3,$CF,$CD,$D0,$C1,$CE,$C9,$CF	; 90FE  COMPANIO
	.byte	$CE,$D3,$A0,$C9,$D3,$A0,$C1,$8D	; 9106  NS IS AM
	.byte	$D3,$C5,$CC,$C6,$D3,$C5,$C5,$CB	; 910E  SELFSEEK
	.byte	$C9,$CE,$C7,$A0,$C1,$C3,$D4,$C9	; 9116  ING ACTI
	.byte	$CF,$CE,$8D,$D4,$CF,$A0,$C2,$C5	; 911E  ONMTO BE
	.byte	$A0,$C1,$D6,$C9,$CF,$C4,$C5,$C4	; 9126   AVIODED
	.byte	$A1,$8D				; 912E  !M
hint_sacrifice_2:
	.byte	$00,$D4,$CF,$A0,$C7,$C9,$D6,$C5	; 9130  .TO GIVE
	.byte	$A0,$CF,$C6,$A0,$D4,$C8,$D9,$8D	; 9138   OF THYM
	.byte	$CC,$C9,$C6,$C5,$D3,$A0,$C2,$CC	; 9140  LIFES BL
	.byte	$CF,$CF,$C4,$A0,$D3,$CF,$8D,$D4	; 9148  OOD SOMT
	.byte	$C8,$C1,$D4,$A0,$CF,$D4,$C8,$C5	; 9150  HAT OTHE
	.byte	$D2,$D3,$A0,$CD,$C1,$D9,$8D,$CC	; 9158  RS MAYML
	.byte	$C9,$D6,$C5,$A0,$C9,$D3,$A0,$C1	; 9160  IVE IS A
	.byte	$A0,$D6,$C9,$D2,$D4,$D5,$C5,$8D	; 9168   VIRTUEM
	.byte	$CF,$C6,$A0,$C7,$D2,$C5,$C1,$D4	; 9170  OF GREAT
	.byte	$A0,$D0,$D2,$C1,$C9,$D3,$C5,$A1	; 9178   PRAISE!
	.byte	$8D				; 9180  M
hint_honor_0:
	.byte	$00,$D4,$C1,$CB,$C5,$A0,$CE,$CF	; 9181  .TAKE NO
	.byte	$D4,$A0,$D4,$C8,$C5,$8D,$C7,$CF	; 9189  T THEMGO
	.byte	$CC,$C4,$A0,$CF,$C6,$A0,$CF,$D4	; 9191  LD OF OT
	.byte	$C8,$C5,$D2,$D3,$8D,$C6,$CF,$D2	; 9199  HERSMFOR
	.byte	$A0,$D4,$C8,$C9,$D3,$A0,$D3,$C8	; 91A1   THIS SH
	.byte	$C1,$CC,$CC,$8D,$C2,$D2,$C9,$CE	; 91A9  ALLMBRIN
	.byte	$C7,$A0,$C4,$C9,$D3,$C8,$CF,$CE	; 91B1  G DISHON
	.byte	$CF,$D2,$8D,$D5,$D0,$CF,$CE,$A0	; 91B9  ORMUPON 
	.byte	$D4,$C8,$C5,$C5,$A1,$8D		; 91C1  THEE!M
hint_honor_1:
	.byte	$00,$D4,$CF,$A0,$D3,$D4,$D2,$C9	; 91C7  .TO STRI
	.byte	$CB,$C5,$A0,$C6,$C9,$D2,$D3,$D4	; 91CF  KE FIRST
	.byte	$8D,$C1,$A0,$CE,$CF,$CE,$AD,$C5	; 91D7  MA NON-E
	.byte	$D6,$C9,$CC,$A0,$C2,$C5,$C9,$CE	; 91DF  VIL BEIN
	.byte	$C7,$8D,$C9,$D3,$A0,$C2,$D9,$A0	; 91E7  GMIS BY 
	.byte	$CE,$CF,$A0,$CD,$C5,$C1,$CE,$D3	; 91EF  NO MEANS
	.byte	$8D,$C1,$CE,$A0,$C8,$CF,$CE,$CF	; 91F7  MAN HONO
	.byte	$D2,$C1,$C2,$CC,$C5,$8D,$C4,$C5	; 91FF  RABLEMDE
	.byte	$C5,$C4,$A1,$8D			; 9207  ED!M
hint_honor_2:
	.byte	$00,$D3,$C5,$C5,$CB,$A0,$D9,$C5	; 920B  .SEEK YE
	.byte	$A0,$D4,$CF,$A0,$D3,$CF,$CC,$D6	; 9213   TO SOLV
	.byte	$C5,$8D,$D4,$C8,$C5,$A0,$CD,$C1	; 921B  EMTHE MA
	.byte	$CE,$D9,$A0,$D1,$D5,$C5,$D3,$D4	; 9223  NY QUEST
	.byte	$D3,$8D,$C2,$C5,$C6,$CF,$D2,$C5	; 922B  SMBEFORE
	.byte	$A0,$D4,$C8,$C5,$C5,$AC,$A0,$C1	; 9233   THEE, A
	.byte	$CE,$C4,$8D,$C8,$CF,$CE,$CF,$D2	; 923B  NDMHONOR
	.byte	$A0,$D3,$C8,$C1,$CC,$CC,$A0,$C2	; 9243   SHALL B
	.byte	$C5,$8D,$C1,$A0,$D2,$C5,$D7,$C1	; 924B  EMA REWA
	.byte	$D2,$C4,$A1,$8D			; 9253  RD!M
hint_spirituality_0:
	.byte	$00,$D3,$C5,$C5,$CB,$A0,$D9,$C5	; 9257  .SEEK YE
	.byte	$A0,$D4,$CF,$A0,$CB,$CE,$CF,$D7	; 925F   TO KNOW
	.byte	$8D,$D4,$C8,$D9,$D3,$C5,$CC,$C6	; 9267  MTHYSELF
	.byte	$AC,$A0,$D6,$C9,$D3,$C9,$D4,$8D	; 926F  , VISITM
	.byte	$D4,$C8,$C5,$A0,$D3,$C5,$C5,$D2	; 9277  THE SEER
	.byte	$A0,$CF,$C6,$D4,$C5,$CE,$8D,$C6	; 927F   OFTENMF
	.byte	$CF,$D2,$A0,$C8,$C5,$A0,$C3,$C1	; 9287  OR HE CA
	.byte	$CE,$8D,$D3,$C5,$C5,$A0,$C9,$CE	; 928F  NMSEE IN
	.byte	$D4,$CF,$A0,$D4,$C8,$D9,$8D,$C9	; 9297  TO THYMI
	.byte	$CE,$CE,$C5,$D2,$A0,$C2,$C5,$C9	; 929F  NNER BEI
	.byte	$CE,$C7,$A1,$8D			; 92A7  NG!M
hint_spirituality_1:
	.byte	$00,$CD,$C5,$C4,$C9,$D4,$C1,$D4	; 92AB  .MEDITAT
	.byte	$C9,$CF,$CE,$A0,$CC,$C5,$C1,$C4	; 92B3  ION LEAD
	.byte	$D3,$8D,$D4,$CF,$A0,$C5,$CE,$CC	; 92BB  SMTO ENL
	.byte	$C9,$C7,$C8,$D4,$C5,$CE,$CD,$C5	; 92C3  IGHTENME
	.byte	$CE,$D4,$8D,$D3,$C5,$C5,$CB,$A0	; 92CB  NTMSEEK 
	.byte	$D9,$C5,$A0,$C1,$CC,$CC,$8D,$D7	; 92D3  YE ALLMW
	.byte	$C9,$D3,$C4,$CF,$CD,$A0,$C1,$CE	; 92DB  ISDOM AN
	.byte	$C4,$8D,$CB,$CE,$CF,$D7,$CC,$C5	; 92E3  DMKNOWLE
	.byte	$C4,$C7,$C5,$A1,$8D		; 92EB  DGE!M
hint_spirituality_2:
	.byte	$00,$C9,$C6,$A0,$D4,$C8,$CF,$D5	; 92F0  .IF THOU
	.byte	$A0,$C4,$CF,$D3,$D4,$8D,$D3,$C5	; 92F8   DOSTMSE
	.byte	$C5,$CB,$A0,$D4,$C8,$C5,$A0,$D7	; 9300  EK THE W
	.byte	$C8,$C9,$D4,$C5,$8D,$D3,$D4,$CF	; 9308  HITEMSTO
	.byte	$CE,$C5,$AC,$A0,$D3,$C5,$C1,$D2	; 9310  NE, SEAR
	.byte	$C3,$C8,$A0,$D9,$C5,$8D,$CE,$CF	; 9318  CH YEMNO
	.byte	$D4,$A0,$D5,$CE,$C4,$C5,$D2,$A0	; 9320  T UNDER 
	.byte	$D4,$C8,$C5,$8D,$C7,$D2,$CF,$D5	; 9328  THEMGROU
	.byte	$CE,$C4,$AC,$A0,$C2,$D5,$D4,$A0	; 9330  ND, BUT 
	.byte	$C9,$CE,$8D,$D4,$C8,$C5,$A0,$D3	; 9338  INMTHE S
	.byte	$CB,$D9,$A0,$CE,$C5,$C1,$D2,$8D	; 9340  KY NEARM
	.byte	$D3,$C5,$D2,$D0,$C5,$CE,$D4,$D3	; 9348  SERPENTS
	.byte	$A0,$D3,$D0,$C9,$CE,$C5,$A1,$8D	; 9350   SPINE!M
hint_humility_0:
	.byte	$00,$C3,$CC,$C1,$C9,$CD,$A0,$CE	; 9358  .CLAIM N
	.byte	$CF,$D4,$A0,$D4,$CF,$A0,$C2,$C5	; 9360  OT TO BE
	.byte	$8D,$D4,$C8,$C1,$D4,$A0,$D7,$C8	; 9368  MTHAT WH
	.byte	$C9,$C3,$C8,$A0,$D4,$C8,$CF,$D5	; 9370  ICH THOU
	.byte	$8D,$C1,$D2,$D4,$A0,$CE,$CF,$D4	; 9378  MART NOT
	.byte	$AC,$A0,$C8,$D5,$CD,$C2,$CC,$C5	; 9380  , HUMBLE
	.byte	$8D,$C1,$C3,$D4,$C9,$CF,$CE,$D3	; 9388  MACTIONS
	.byte	$A0,$D3,$D0,$C5,$C1,$CB,$8D,$D7	; 9390   SPEAKMW
	.byte	$C5,$CC,$CC,$A0,$D4,$C8,$C5,$C5	; 9398  ELL THEE
	.byte	$A1,$8D				; 93A0  !M
hint_humility_1:
	.byte	$00,$D3,$D4,$D2,$C9,$D6,$C5,$A0	; 93A2  .STRIVE 
	.byte	$CE,$CF,$D4,$A0,$D4,$CF,$8D,$D7	; 93AA  NOT TOMW
	.byte	$C9,$C5,$CC,$C4,$A0,$D4,$C8,$C5	; 93B2  IELD THE
	.byte	$A0,$C7,$D2,$C5,$C1,$D4,$8D,$C6	; 93BA   GREATMF
	.byte	$CF,$D2,$C3,$C5,$A0,$CF,$C6,$A0	; 93C2  ORCE OF 
	.byte	$C5,$D6,$C9,$CC,$8D,$C6,$CF,$D2	; 93CA  EVILMFOR
	.byte	$A0,$C9,$D4,$D3,$A0,$D0,$CF,$D7	; 93D2   ITS POW
	.byte	$C5,$D2,$8D,$D7,$C9,$CC,$CC,$A0	; 93DA  ERMWILL 
	.byte	$CF,$D6,$C5,$D2,$C3,$CF,$CD,$C5	; 93E2  OVERCOME
	.byte	$8D,$D4,$C8,$C5,$C5,$A1,$8D	; 93EA  MTHEE!M
hint_humility_2:
	.byte	$00,$C9,$C6,$A0,$D4,$C8,$CF,$D5	; 93F1  .IF THOU
	.byte	$A0,$C4,$CF,$D3,$D4,$8D,$D3,$C5	; 93F9   DOSTMSE
	.byte	$C5,$CB,$A0,$D4,$C8,$C5,$A0,$C2	; 9401  EK THE B
	.byte	$CC,$C1,$C3,$CB,$8D,$D3,$D4,$CF	; 9409  LACKMSTO
	.byte	$CE,$C5,$AC,$A0,$D3,$C5,$C1,$D2	; 9411  NE, SEAR
	.byte	$C3,$C8,$A0,$D9,$C5,$8D,$C1,$D4	; 9419  CH YEMAT
	.byte	$A0,$D4,$C8,$C5,$A0,$D4,$C9,$CD	; 9421   THE TIM
	.byte	$C5,$A0,$C1,$CE,$C4,$8D,$D0,$CC	; 9429  E ANDMPL
	.byte	$C1,$C3,$C5,$A0,$CF,$C6,$A0,$D4	; 9431  ACE OF T
	.byte	$C8,$C5,$8D,$C7,$C1,$D4,$C5,$A0	; 9439  HEMGATE 
	.byte	$CF,$CE,$A0,$D4,$C8,$C5,$8D,$C4	; 9441  ON THEMD
	.byte	$C1,$D2,$CB,$C5,$D3,$D4,$A0,$CF	; 9449  ARKEST O
	.byte	$C6,$A0,$C1,$CC,$CC,$8D,$CE,$C9	; 9451  F ALLMNI
	.byte	$C7,$C8,$D4,$D3,$A1,$8D		; 9459  GHTS!M
hint_end:
	.byte	$00				; 945F  .

draw_rune:
	pha					; 9460
	jsr	swap_buf			; 9461
	jsr	j_clearview			; 9464
	jsr	clear_view_colors		; 9467
	pla					; 946A
	tax					; 946B
	lda	infinity,x			; 946C
	asl	a				; 946F
	tax					; 9470
	lda	rune_addr,x			; 9471
	sta	key_buf				; 9474
	lda	rune_addr+1,x			; 9476
	sta	key_buf+1			; 9479
	ldx	#$50				; 947B  P
	lda	bmplineaddr_lo,x		; 947D
	clc					; 9480
	adc	#$48				; 9481  H
	sta	key_buf+2			; 9483
	lda	bmplineaddr_hi,x		; 9485
	adc	#$00				; 9488  .
	sta	key_buf+3			; 948A
	lda	#$04				; 948C  D
	sta	row_ctr				; 948E
@nextline:
	ldy	#$00				; 9491  .
:	lda	(key_buf),y			; 9493
	sta	(key_buf+2),y			; 9495
	iny					; 9497
	cpy	#$18				; 9498  X
	bne	:-				; 949A
	lda	key_buf				; 949C
	clc					; 949E
	adc	#$18				; 949F  X
	sta	key_buf				; 94A1
	lda	key_buf+1			; 94A3
	adc	#$00				; 94A5  .
	sta	key_buf+1			; 94A7
	lda	key_buf+2			; 94A9
	clc					; 94AB
	adc	#$40				; 94AC  @
	sta	key_buf+2			; 94AE
	lda	key_buf+3			; 94B0
	adc	#$01				; 94B2  A
	sta	key_buf+3			; 94B4
	dec	row_ctr				; 94B6
	bne	@nextline			; 94B9
	jsr	swap_buf			; 94BB
	rts					; 94BE

clear_view_colors:
	lda	#$29				; 94BF  )
	sta	key_buf				; 94C1
	lda	#$04				; 94C3  D
	sta	key_buf+1			; 94C5
	ldx	#$16				; 94C7  V
@nextline:
	ldy	#$00				; 94C9  .
@nextchar:
	lda	#$10				; 94CB  P
	sta	(key_buf),y			; 94CD
	iny					; 94CF
	cpy	#$16				; 94D0  V
	bne	@nextchar			; 94D2
	lda	key_buf				; 94D4
	clc					; 94D6
	adc	#$28				; 94D7  (
	sta	key_buf				; 94D9
	bcc	:+				; 94DB
	inc	key_buf+1			; 94DD
:	dex					; 94DF
	bne	@nextline			; 94E0
	rts					; 94E2

swap_buf:
	ldx	#$07				; 94E3  G
:	lda	key_buf,x			; 94E5
	tay					; 94E7
	lda	key_buf_tmp,x			; 94E8
	sta	key_buf,x			; 94EB
	tya					; 94ED
	sta	key_buf_tmp,x			; 94EE
	dex					; 94F1
	bpl	:-				; 94F2
	rts					; 94F4

key_buf_tmp:
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 94F5  ........
row_ctr:
	.byte	$00				; 94FD  .
infinity:
	.byte	$00,$01,$02,$00,$01,$00,$03,$04	; 94FE  .AB.A.CD

rune_addr:
	.addr	rune_i				; 9506
	.addr	rune_n				; 9508
	.addr	rune_f				; 950A
	.addr	rune_t				; 950C
	.addr	rune_y				; 950E

rune_i:
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9510  ........
	.byte	$0E,$3E,$3C,$1C,$1C,$1C,$1C,$1C	; 9518  N><\\\\\
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9520  ........
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9528  ........
	.byte	$1C,$1C,$1C,$1C,$1C,$1C,$1C,$1C	; 9530  \\\\\\\\
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9538  ........
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9540  ........
	.byte	$1C,$1C,$1C,$1C,$1C,$1C,$1C,$1C	; 9548  \\\\\\\\
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9550  ........
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9558  ........
	.byte	$1C,$1E,$3E,$38,$00,$00,$00,$00	; 9560  \^>8....
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9568  ........
rune_n:
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9570  ........
	.byte	$0E,$3E,$3C,$1C,$1C,$1C,$1C,$1C	; 9578  N><\\\\\
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9580  ........
	.byte	$00,$00,$00,$03,$07,$0E,$0C,$0C	; 9588  ...CGNLL
	.byte	$1C,$1C,$1C,$DC,$FC,$7C,$3C,$1E	; 9590  \\\\||<^
	.byte	$00,$00,$00,$00,$70,$38,$18,$18	; 9598  ....p8XX
	.byte	$0E,$07,$00,$00,$00,$00,$00,$00	; 95A0  NG......
	.byte	$1F,$1F,$1D,$1C,$1C,$1C,$1C,$1C	; 95A8  __]\\\\\
	.byte	$38,$F0,$E0,$00,$00,$00,$00,$00	; 95B0  8p`.....
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 95B8  ........
	.byte	$1C,$1E,$3E,$38,$00,$00,$00,$00	; 95C0  \^>8....
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 95C8  ........
rune_f:
	.byte	$03,$0F,$0F,$07,$07,$07,$07,$07	; 95D0  COOGGGGG
	.byte	$9E,$9E,$0C,$0C,$0C,$1C,$F8,$F0	; 95D8  ^^LLL\xp
	.byte	$78,$78,$30,$30,$30,$30,$30,$60	; 95E0  xx00000`
	.byte	$07,$07,$07,$07,$07,$07,$07,$07	; 95E8  GGGGGGGG
	.byte	$00,$00,$03,$FF,$FC,$00,$00,$00	; 95F0  ..C.|...
	.byte	$60,$E0,$C0,$80,$00,$00,$00,$00	; 95F8  ``@.....
	.byte	$07,$07,$07,$07,$07,$07,$07,$07	; 9600  GGGGGGGG
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9608  ........
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9610  ........
	.byte	$07,$07,$0F,$0E,$00,$00,$00,$00	; 9618  GGON....
	.byte	$00,$80,$80,$00,$00,$00,$00,$00	; 9620  ........
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9628  ........
rune_t:
	.byte	$00,$00,$01,$07,$1F,$1C,$00,$00	; 9630  ..AG_\..
	.byte	$1C,$7F,$FF,$DD,$1C,$1C,$1C,$1C	; 9638  \..]\\\\
	.byte	$00,$00,$C0,$F0,$7C,$1C,$00,$00	; 9640  ..@p|\..
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9648  ........
	.byte	$1C,$1C,$1C,$1C,$1C,$1C,$1C,$1C	; 9650  \\\\\\\\
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9658  ........
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9660  ........
	.byte	$1C,$1C,$1C,$1C,$1C,$1C,$1C,$1C	; 9668  \\\\\\\\
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9670  ........
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9678  ........
	.byte	$1C,$1E,$3E,$38,$00,$00,$00,$00	; 9680  \^>8....
	.byte	$00,$00,$00,$00,$00,$00,$00,$00	; 9688  ........
rune_y:
	.byte	$E0,$FC,$7F,$77,$70,$70,$70,$70	; 9690  `|.wpppp
	.byte	$00,$00,$80,$F0,$FE,$1F,$03,$00	; 9698  ...p~_C.
	.byte	$00,$00,$00,$00,$00,$C0,$F8,$7F	; 96A0  .....@x.
	.byte	$70,$70,$70,$70,$70,$70,$7F,$7F	; 96A8  pppppp..
	.byte	$00,$00,$00,$00,$00,$00,$FF,$FF	; 96B0  ........
	.byte	$0F,$0E,$0E,$0E,$0E,$0E,$FE,$FE	; 96B8  ONNNNN~~
	.byte	$70,$70,$70,$70,$70,$70,$70,$70	; 96C0  pppppppp
	.byte	$30,$30,$30,$30,$30,$30,$30,$30	; 96C8  00000000
	.byte	$0E,$0E,$0E,$0E,$0E,$0E,$0E,$0E	; 96D0  NNNNNNNN
	.byte	$70,$78,$F8,$E0,$00,$00,$00,$00	; 96D8  pxx`....
	.byte	$30,$38,$78,$70,$00,$00,$00,$00	; 96E0  08xp....
	.byte	$0E,$0F,$1F,$1C,$00,$00,$00,$00	; 96E8  NO_\....

	lda	#$00				; 96F0  .
	rts					; 96F2

	jsr	j_primm				; 96F3
	.byte	$C4,$C9,$D2,$C5,$C3,$D4,$C9,$CF	; 96F6  DIRECTIO
	.byte	$CE,$AD				; 96FE  N-
Valid HTML 4.01 Strict82-original.html; generated on Thu Oct 5 16:16:55 2006 by ca65html
uz@cc65.org