C64 BTII: FILE0637245.PRG (CHAR) - OSCON'S FORTRESS

Any developer realated stuff
Post Reply
User avatar
Darendor
Posts: 1502
Joined: Wed Jan 14, 2009 1:53 am
Location: Red Deer, Alberta, Canada

C64 BTII: FILE0637245.PRG (CHAR) - OSCON'S FORTRESS

Post by Darendor »

BT2 Character Disk
"FILE0637245" PRG ACCESS TO OSCON'S FORTRESS
#$EA | 234 | EOR all bytes against 11101010
2 blocks; 394 bytes (70EA TO 7274 Inclusive)

This is the file for when the party attempts to enter Oscon's Fortress.

The file loads the picture, prints "Fortress" in the caption, then scans the roster of each party member looking for the byte that corresponds to the "Item of K". If it finds it, it branches to the code that allows the party to either (T)ake the stairs in or E(x)it the fortress. Otherwise, it simply branches to the code that displays only the one option, (E)xit the fortress.

Pretty basic. I guess.

Code: Select all

70ea 0c       ???
70eb 2b       ???
70ec 48       pha 
70ed fb       ???
70ee ca       dex 
70ef f1
70f0 e2    sbc ($e2),y
70f1 43       ???
70f2 70
72f3 6f    bvs $7163
70f4 b3       ???
70f5 43       ???
70f6 85
70f7 6f    sta $6f
70f8 b2       ???
70f9 ca       dex 
70fa e5
70fb e2    sbc $e2
70fc 43       ???
70fd ea       nop 
70fe 6f       ???
70ff ae
7100 4c
7101 ae ldx $ae4c
7102 43       ???
7103 fa       ???
7104 ca       dex 
7105 1a       ???
7106 e2       ???
7107 7a       ???
7108 f5
7109 0c    sbc $0c,x
710a ae
710b 4f
710c ae ldx $ae4f
710d 23       ???
710e ed
710f 7a
7110 05 sbc $057a
7111 ca       dex 
7112 0b       ???
7113 e2       ???
7114 4a       lsr a
7115 70
7116 48    bvs $715f
7117 11
7118 ca    ora ($ca),y
7119 ec
711a e2
711b ca cpx $cae2
711c 92       ???
711d e2       ???
711e ca       dex 
711f 6d
7120 e2
7121 23 adc $23e2
7122 2f       ???
7123 3a       ???
7124 1c       ???
7125 a6
7126 bc    ldx $bc
7127 70
7128 ca    bvs $70f3
7129 0b       ???
712a e2       ???
712b 4a       lsr a
712c 70
712d 48    bvs $7176
712e 92       ???
712f ca       dex 
7130 ec
7131 e2
7132 ca cpx $cae2
7133 92       ???
7134 e2       ???
7135 ca       dex 
7136 6d
7137 e2
7138 23 adc $23e2
7139 3e
713a 1a
713b fe rol $fe1a,x
713c 23       ???
713d 2f       ???
713e 3a       ???
713f 18       clc 
7140 43       ???
7141 e8       inx 
7142 6f       ???
7143 ce
7144 2c
7145 c2 dec $c22c
7146 43       ???
7147 ea       nop 
7148 6f       ???
7149 c5
714a ca    cmp $ca
714b 0b       ???
714c e2       ???
714d a6
714e ea    ldx $ea
714f 7a       ???
7150 43       ???
7151 fa       ???
7152 6f       ???
7153 0a       asl a
7154 43       ???
7155 eb       ???
7156 a6
7157 73    ldx $73
7158 e2       ???
7159 2c				F
715a 05				o
715b 18 bit $1805		r
715c 1e				t
715d 18				r
715e 0f asl $0f18,x		e
715f 19				s
7160 19				s
7161 36 ora $3619,y		[EOT]
7162 33       ???		Y
7163 05				o
7164 1f    ora $1f		u
7165 4a       lsr a		[SPC]
7166 19				s
7167 1e				t
7168 0b ora $0b1e,y		a
7169 04       ???		n
716a 0e				d
716b 4a				[SPC]
716c 03 asl $034a		i
716d 04       ???		n
716e 4a       lsr a		[SPC]
716f 1e				t
7170 02				h
7171 0f asl $0f02,x		e
7172 4a       lsr a		[SPC]
7173 0f       ???		e
7174 04       ???		n
7175 1e				t
7176 18				r
7177 13 asl $1318,x		y
7178 4a       lsr a		[SPC]
7179 1e				t
717a 05				o
717b 4a asl $4a05,x		[SPC]
717c 25				O
717d 19    and $19		s
717e 09				c
717f 05    ora #$05		o
7180 04       ???		n
7181 4d				'
7182 19				s
7183 4a eor $4a19		[SPC]
7184 2c				F
7185 05				o
7186 18 bit $1805		r
7187 1e				t
7188 18				r
7189 0f asl $0f18,x		e
718a 19				s
718b 19				s
718c 44 ora $4419,y		.
718d 4a       lsr a		[SPC]
718e 2b       ???		A
718f 4a       lsr a		[SPC]
7190 19				s
7191 1e				t
7192 0b ora $0b1e,y		a
7193 03       ???		i
7194 18       clc 		r
7195 1d				w
7196 0b				a
7197 13 ora $130b,x		y
7198 4a       lsr a		[SPC]
7199 06				l
719a 0f    asl $0f		e
719b 0b       ???		a
719c 0e				d
719d 19				s
719e 4a asl $4a19		[SPC]
719f 1e				t
71a0 05				o
71a1 4a asl $4a05,x		[SPC]
71a2 1e				t
71a3 02				h
71a4 0f asl $0f02,x		e
71a5 4a       lsr a		[SPC]
71a6 1f       ???		u
71a7 1a       ???	`	p
71a8 1a       ???		p
71a9 0f       ???		e
71aa 18       clc 		r
71ab 4a       lsr a		[SPC]
71ac 06				l
71ad 0f    asl $0f		e
71ae 1c       ???		v
71af 0f       ???		e
71b0 06				l
71b1 19    asl $19		s
71b2 44       ???		.
71b3 4a       lsr a		[SPC]
71b4 33       ???		Y
71b5 05				o
71b6 1f    ora $1f		u
71b7 4a       lsr a		[SPC]
71b8 09				c
71b9 0b    ora #$0b		a
71ba 04       ???		n
71bb ea       nop 		[CR]
71bc ea       nop 		[CR]
71bd 42       ???		(
71be 3e				T
71bf 43				)
71c0 0b rol $0b43,x		a
71c1 01				k
71c2 0f    ora ($0f,x)		e
71c3 4a       lsr a		[SPC]
71c4 1e				t
71c5 02				h
71c6 0f asl $0f02,x		e
71c7 4a       lsr a		[SPC]
71c8 19				s
71c9 1e				t
71ca 0b ora $0b1e,y		a
71cb 03       ???		i
71cc 18       clc 		r
71cd 1d				w
71ce 0b				a
71cf 13 ora $130b,x		y
71d0 ea       nop 		[CR]
71d1 42       ???		(
71d2 2f       ???		E
71d3 43       ???		)
71d4 12       ???		x
71d5 03       ???		i
71d6 1e				t
71d7 4a				[SPC]
71d8 1e asl $1e4a,x		t
71d9 02       ???		h
71da 0f       ???		e
71db 4a       lsr a		[SPC]
71dc 0c       ???		f
71dd 05				o
71de 18    ora $18		r
71df 1e				t
71e0 18				r
71e1 0f asl $0f18,x		e
71e2 19				s
71e3 19				s
71e4 36 ora $3619,y		[EOT]
71e5 33       ???		Y
71e6 05				o
71e7 1f    ora $1f		u
71e8 4a       lsr a		[SPC]
71e9 19				s
71ea 1e				t
71eb 0b ora $0b1e,y		a
71ec 04       ???		n
71ed 0e				d
71ee 4a				[SPC]
71ef 03 asl $034a		i
71f0 04       ???		n
71f1 4a       lsr a		[SPC]
71f2 1e				t
71f3 02				h
71f4 0f asl $0f02,x		e
71f5 4a       lsr a		[SPC]
71f6 0f       ???		e
71f7 04       ???		n
71f8 1e				t
71f9 18				r
f1fa 13 asl $1318,x		y
71fb 4a       lsr a		[SPC]
71fc 1e				t
71fd 05				o
71fe 4a asl $4a05,x		[SPC]
71ff 25				O
7200 19    and $19		s
7201 09				c
7202 05    ora #$05		o
7203 04       ???		n
7204 4d				'
7205 19				s
7206 4a eor $4a19		[SPC]
7207 2c				F
7208 05				o
7209 18 bit $1805		r
720a 1e				t
720b 18				r
720c 0f asl $0f18,x		e
720d 19				s
720e 19				s
720f 46 ora $4619,y		,
7210 4a       lsr a		[SPC]
7211 1d				w
7212 02				h
7213 03 ora $0302,x		i
7214 09				c
7215 02    ora #$02		h
7216 4a       lsr a		[SPC]
7217 0b       ???		a
7218 1a       ???		p
7219 1a       ???		p
721a 0f       ???		e
721b 0b       ???		a
721c 18       clc 		r
721d 19				s
721e 4a				[SPC]
721f 1e ora $1e4a,y		t
7220 05				o
7221 4a    ora $4a		[SPC]
7222 08       php 		b
7223 0f       ???		e
7224 4a       lsr a		[SPC]
7225 0e				d
7226 0f				e
7227 19 asl $190f		s
7228 0f       ???		e
7229 18       clc 		r
722a 1e				t
722b 0f				e
722c 0e asl $0e0f,x		d
722d 44       ???		.
722e 4a       lsr a		[SPC]
722f 33       ???		Y
7230 05				o
7231 1f    ora $1f		u
7232 4a       lsr a		[SPC]
7233 19				s
7234 0f				e
7235 0f ora $0f0f,y		e
7236 4a       lsr a		[SPC]
7237 04       ???		n
7238 05				o
7239 4a    ora $4a		[SPC]
723a 0f       ???		e
723b 04       ???		n
723c 1e				t
723d 18				r
723e 0b asl $0b18,x		a
723f 04       ???		n
7240 09				c
7241 0f    ora #$0f		e
7242 4a       lsr a		[SPC]
7243 1e				t
7244 05				o
7245 4a asl $4a05,x		[SPC]
7246 1e				t
7247 02				h
7248 0f asl $0f02,x		e
7249 4a       lsr a		[SPC]
724a 1f       ???		u
724b 1a       ???		p
724c 1a       ???		p
724d 0f       ???		e
724e 18       clc 		r
724f 4a       lsr a		[SPC]
7250 06				l
7251 0f    asl $0f		e
7252 1c       ???		v
7253 0f       ???		e
7254 06				l
7255 19    asl $19		s
7256 44       ???		.
7257 4a       lsr a		[SPC]
7258 33       ???		Y
7259 05				o
725a 1f    ora $1f		u
725b 4a       lsr a		[SPC]
725c 09				c
725d 0b    ora #$0b		a
725e 04       ???		n
725f ea       nop 		[SPC]
7260 ea       nop 		[SPC]
7261 42       ???		(
7262 2f       ???		E
7263 43       ???		)
7264 12       ???		x
7265 03       ???		i
7266 1e				t
7267 4a				[SPC]
7268 1e asl $1e4a,x		t
7269 02       ???		h
726a 0f       ???		e
726b 4a       lsr a		[SPC]
726c 0c       ???		f
726d 05				o
726e 18    ora $18		r
726f 1e				t
7270 18				r
7271 0f asl $0f18,x		e
7272 19				s
7273 19				s
7374 00 ora $0019,y		[CR]
Post Reply