------+-------------------+-------------+----+---------+------+-----------------------+------------------------------------------------------------------- Line | # File Line | Line Type | MX | Reloc | Size | Address Object Code | Source Code ------+-------------------+-------------+----+---------+------+-----------------------+------------------------------------------------------------------- 1 | 1 dlld2.s 1 | Comment | 11 | | 0 | 00/8000 | * 2 | 1 dlld2.s 2 | Comment | 11 | | 0 | 00/8000 | * DLLD 3 | 1 dlld2.s 3 | Comment | 11 | | 0 | 00/8000 | * Let's play Dragon's Lair :-) 4 | 1 dlld2.s 4 | Comment | 11 | | 0 | 00/8000 | * 5 | 1 dlld2.s 5 | Comment | 11 | | 0 | 00/8000 | * (c) 2024, Brutal Deluxe Software 6 | 1 dlld2.s 6 | Comment | 11 | | 0 | 00/8000 | * 7 | 1 dlld2.s 7 | Empty | 11 | | 0 | 00/8000 | 8 | 1 dlld2.s 8 | Directive | 11 | | 0 | 00/8000 | mx %11 9 | 1 dlld2.s 9 | Directive | 11 | | 0 | 00/8000 | org $2000 10 | 1 dlld2.s 10 | Directive | 11 | | 0 | 00/2000 | lst off 11 | 1 dlld2.s 11 | Empty | 11 | | 0 | 00/2000 | 12 | 1 dlld2.s 12 | Directive | 11 | | 0 | 00/2000 | use 4/Int.Macs 13 | 1 dlld2.s 13 | Directive | 11 | | 0 | 00/2000 | use 4/Util.Macs 14 | 1 dlld2.s 14 | Empty | 11 | | 0 | 00/2000 | 15 | 1 dlld2.s 15 | Comment | 11 | | 0 | 00/2000 | *----------------------------------- 16 | 1 dlld2.s 16 | Comment | 11 | | 0 | 00/2000 | * MACROS 17 | 1 dlld2.s 17 | Comment | 11 | | 0 | 00/2000 | *----------------------------------- 18 | 1 dlld2.s 18 | Empty | 11 | | 0 | 00/2000 | 19 | 1 dlld2.s 19 | Directive | 11 | | 0 | 00/2000 | _sendSTRING mac 20 | 1 dlld2.s 20 | Directive | 11 | | 0 | 00/2000 | ldx #>]1 21 | 1 dlld2.s 21 | Directive | 11 | | 0 | 00/2000 | ldy #<]1 22 | 1 dlld2.s 22 | Directive | 11 | | 0 | 00/2000 | jsr sendString 23 | 1 dlld2.s 23 | Directive | 11 | | 0 | 00/2000 | eom 24 | 1 dlld2.s 24 | Empty | 11 | | 0 | 00/2000 | 25 | 1 dlld2.s 25 | Comment | 11 | | 0 | 00/2000 | *----------------------------------- 26 | 1 dlld2.s 26 | Comment | 11 | | 0 | 00/2000 | * EQUATES 27 | 1 dlld2.s 27 | Comment | 11 | | 0 | 00/2000 | *----------------------------------- 28 | 1 dlld2.s 28 | Empty | 11 | | 0 | 00/2000 | 29 | 1 dlld2.s 29 | Equivalence | 11 | | 0 | 00/2000 | SLOT = 2 30 | 1 dlld2.s 30 | Equivalence | 11 | | 0 | 00/2000 | N0 = {2}*16 31 | 1 dlld2.s 31 | Equivalence | 11 | | 0 | 00/2000 | CN = {2}!$C0 32 | 1 dlld2.s 32 | Empty | 11 | | 0 | 00/2000 | 33 | 1 dlld2.s 33 | Equivalence | 11 | | 0 | 00/2000 | dpFROM = $fc 34 | 1 dlld2.s 34 | Equivalence | 11 | | 0 | 00/2000 | dpTO = {$fc}+2 35 | 1 dlld2.s 35 | Empty | 11 | | 0 | 00/2000 | 36 | 1 dlld2.s 36 | Equivalence | 11 | | 0 | 00/2000 | chrRETURN = $0d 37 | 1 dlld2.s 37 | Empty | 11 | | 0 | 00/2000 | 38 | 1 dlld2.s 38 | Equivalence | 11 | | 0 | 00/2000 | KBD = $c000 39 | 1 dlld2.s 39 | Equivalence | 11 | | 0 | 00/2000 | KBDSTROBE = $c010 40 | 1 dlld2.s 40 | Empty | 11 | | 0 | 00/2000 | 41 | 1 dlld2.s 41 | Equivalence | 11 | | 0 | 00/2000 | HOME = $fc58 42 | 1 dlld2.s 42 | Equivalence | 11 | | 0 | 00/2000 | COUT = $fded 43 | 1 dlld2.s 43 | Empty | 11 | | 0 | 00/2000 | 44 | 1 dlld2.s 44 | Comment | 11 | | 0 | 00/2000 | *----------------------------------- 45 | 1 dlld2.s 45 | Comment | 11 | | 0 | 00/2000 | * CODE 46 | 1 dlld2.s 46 | Comment | 11 | | 0 | 00/2000 | *----------------------------------- 47 | 1 dlld2.s 47 | Empty | 11 | | 0 | 00/2000 | 48 | 1 dlld2.s 48 | Code | 11 | | 3 | 00/2000 : 20 58 FC | jsr {$fc58} 49 | 1 dlld2.s 49 | Code | 11 | | 3 | 00/2003 : 20 5A 21 | jsr initSERIAL ; set the serial addresses 50 | 1 dlld2.s 50 | Code | 11 | | 3 | 00/2006 : 20 7F 21 | jsr initPORT ; init the serial port for LD support 51 | 1 dlld2.s 51 | Empty | 11 | | 0 | 00/2009 | 52 | 1 dlld2.s 52 | Code | 11 | | 3 | 00/2009 : 20 09 21 | jsr showFRAME 53 | 1 dlld2.s 53 | Empty | 11 | | 0 | 00/200C | 54 | 1 dlld2.s 54 | Code | 11 | | 2 | 00/200C : A2 21 | ldx #>strSA ; start the player 55 | 1 dlld2.s 55 | Code | 11 | | 2 | 00/200E : A0 19 | ldy #strRJ ; Set frame and search 85 | 1 dlld2.s 85 | Code | 11 | | 2 | 00/2042 : A0 1C | ldy #strFR ; Set frame and search 90 | 1 dlld2.s 90 | Code | 11 | | 2 | 00/204A : A0 1F | ldy #strPL ; play the disc 238 | 1 dlld2.s 190 | Code | 11 | | 2 | 00/20FC : A0 29 | ldy #strST ; still me 242 | 1 dlld2.s 194 | Code | 11 | | 2 | 00/2102 : A0 2C | ldy #strDS ; on veut la frame number 251 | 1 dlld2.s 203 | Code | 11 | | 2 | 00/210B : A0 12 | ldy ##strED 321 | 1 dlld2.s 271 | Code | 11 | | 2 | 00/2188 : A0 84 | ldy #<#strED 322 | 1 dlld2.s 271 | Code | 11 | | 3 | 00/218A : 20 2C 22 | jsr sendString 323 | 1 dlld2.s 272 | Macro | 11 | | 0 | 00/218D | _sendSTRING #strBE ; Input buffering: on 324 | 1 dlld2.s 272 | Code | 11 | | 2 | 00/218D : A2 22 | ldx #>#strBE 325 | 1 dlld2.s 272 | Code | 11 | | 2 | 00/218F : A0 88 | ldy #<#strBE 326 | 1 dlld2.s 272 | Code | 11 | | 3 | 00/2191 : 20 2C 22 | jsr sendString 327 | 1 dlld2.s 273 | Macro | 11 | | 0 | 00/2194 | _sendSTRING #str12B ; Baud rate: 4800 BPS 328 | 1 dlld2.s 273 | Code | 11 | | 2 | 00/2194 : A2 22 | ldx #>#str12B 329 | 1 dlld2.s 273 | Code | 11 | | 2 | 00/2196 : A0 8C | ldy #<#str12B 330 | 1 dlld2.s 273 | Code | 11 | | 3 | 00/2198 : 20 2C 22 | jsr sendString 331 | 1 dlld2.s 274 | Macro | 11 | | 0 | 00/219B | _sendSTRING #str0D ; Data/Stop bits: 8/1 332 | 1 dlld2.s 274 | Code | 11 | | 2 | 00/219B : A2 22 | ldx #>#str0D 333 | 1 dlld2.s 274 | Code | 11 | | 2 | 00/219D : A0 91 | ldy #<#str0D 334 | 1 dlld2.s 274 | Code | 11 | | 3 | 00/219F : 20 2C 22 | jsr sendString 335 | 1 dlld2.s 275 | Macro | 11 | | 0 | 00/21A2 | _sendSTRING #str0P ; Parity: none 336 | 1 dlld2.s 275 | Code | 11 | | 2 | 00/21A2 : A2 22 | ldx #>#str0P 337 | 1 dlld2.s 275 | Code | 11 | | 2 | 00/21A4 : A0 95 | ldy #<#str0P 338 | 1 dlld2.s 275 | Code | 11 | | 3 | 00/21A6 : 20 2C 22 | jsr sendString 339 | 1 dlld2.s 276 | Macro | 11 | | 0 | 00/21A9 | _sendSTRING #str0N ; Line length: 0 340 | 1 dlld2.s 276 | Code | 11 | | 2 | 00/21A9 : A2 22 | ldx #>#str0N 341 | 1 dlld2.s 276 | Code | 11 | | 2 | 00/21AB : A0 99 | ldy #<#str0N 342 | 1 dlld2.s 276 | Code | 11 | | 3 | 00/21AD : 20 2C 22 | jsr sendString 343 | 1 dlld2.s 277 | Macro | 11 | | 0 | 00/21B0 | _sendSTRING #strAD ; Do not implement basic tabs 344 | 1 dlld2.s 277 | Code | 11 | | 2 | 00/21B0 : A2 22 | ldx #>#strAD 345 | 1 dlld2.s 277 | Code | 11 | | 2 | 00/21B2 : A0 9D | ldy #<#strAD 346 | 1 dlld2.s 277 | Code | 11 | | 3 | 00/21B4 : 20 2C 22 | jsr sendString 347 | 1 dlld2.s 278 | Macro | 11 | | 0 | 00/21B7 | _sendSTRING #strCD ; Disable line formatting 348 | 1 dlld2.s 278 | Code | 11 | | 2 | 00/21B7 : A2 22 | ldx #>#strCD 349 | 1 dlld2.s 278 | Code | 11 | | 2 | 00/21B9 : A0 A1 | ldy #<#strCD 350 | 1 dlld2.s 278 | Code | 11 | | 3 | 00/21BB : 20 2C 22 | jsr sendString 351 | 1 dlld2.s 279 | Macro | 11 | | 0 | 00/21BE | _sendSTRING #strXD ; Ignore XOFF 352 | 1 dlld2.s 279 | Code | 11 | | 2 | 00/21BE : A2 22 | ldx #>#strXD 353 | 1 dlld2.s 279 | Code | 11 | | 2 | 00/21C0 : A0 A5 | ldy #<#strXD 354 | 1 dlld2.s 279 | Code | 11 | | 3 | 00/21C2 : 20 2C 22 | jsr sendString 355 | 1 dlld2.s 280 | Macro | 11 | | 0 | 00/21C5 | _sendSTRING #strFD ; Disable keyboard input 356 | 1 dlld2.s 280 | Code | 11 | | 2 | 00/21C5 : A2 22 | ldx #>#strFD 357 | 1 dlld2.s 280 | Code | 11 | | 2 | 00/21C7 : A0 A9 | ldy #<#strFD 358 | 1 dlld2.s 280 | Code | 11 | | 3 | 00/21C9 : 20 2C 22 | jsr sendString 359 | 1 dlld2.s 281 | Macro | 11 | | 0 | 00/21CC | _sendSTRING #strLD ; Do not add line feeds after CR 360 | 1 dlld2.s 281 | Code | 11 | | 2 | 00/21CC : A2 22 | ldx #>#strLD 361 | 1 dlld2.s 281 | Code | 11 | | 2 | 00/21CE : A0 AD | ldy #<#strLD 362 | 1 dlld2.s 281 | Code | 11 | | 3 | 00/21D0 : 20 2C 22 | jsr sendString 363 | 1 dlld2.s 282 | Macro | 11 | | 0 | 00/21D3 | _sendSTRING #strME ; Mask line feed in 364 | 1 dlld2.s 282 | Code | 11 | | 2 | 00/21D3 : A2 22 | ldx #>#strME 365 | 1 dlld2.s 282 | Code | 11 | | 2 | 00/21D5 : A0 B1 | ldy #<#strME 366 | 1 dlld2.s 282 | Code | 11 | | 3 | 00/21D7 : 20 2C 22 | jsr sendString 367 | 1 dlld2.s 283 | Macro | 11 | | 0 | 00/21DA | _sendSTRING #strZ ; Suppress control characters 368 | 1 dlld2.s 283 | Code | 11 | | 2 | 00/21DA : A2 22 | ldx #>#strZ 369 | 1 dlld2.s 283 | Code | 11 | | 2 | 00/21DC : A0 B5 | ldy #<#strZ 370 | 1 dlld2.s 283 | Code | 11 | | 3 | 00/21DE : 20 2C 22 | jsr sendString 371 | 1 dlld2.s 284 | Code | 11 | | 3 | 00/21E1 : 20 E5 21 | jsr checkInputReady 372 | 1 dlld2.s 285 | Code | 11 | | 1 | 00/21E4 : 60 | rts 373 | 1 dlld2.s 286 | Empty | 11 | | 0 | 00/21E5 | 374 | 1 dlld2.s 287 | Comment | 11 | | 0 | 00/21E5 | *---------- Check the input is ready 375 | 1 dlld2.s 288 | Empty | 11 | | 0 | 00/21E5 | 376 | 1 dlld2.s 289 | Empty | 11 | | 0 | 00/21E5 | checkInputReady 377 | 1 dlld2.s 290 | Code | 11 | | 2 | 00/21E5 : A2 08 | ldx #8 378 | 1 dlld2.s 291 | Code | 11 | | 2 | 00/21E7 : A0 00 | ldy #0 379 | 1 dlld2.s 292 | Empty | 11 | | 0 | 00/21E9 | 380 | 1 dlld2.s 293 | Code | 11 | | 1 | 00/21E9 : DA | ozunid_3 phx 381 | 1 dlld2.s 294 | Code | 11 | | 1 | 00/21EA : 5A | phy 382 | 1 dlld2.s 295 | Empty | 11 | | 0 | 00/21EB | 383 | 1 dlld2.s 296 | Comment | 11 | | 0 | 00/21EB | * lda #"I" 384 | 1 dlld2.s 297 | Comment | 11 | | 0 | 00/21EB | * sta $427 385 | 1 dlld2.s 298 | Empty | 11 | | 0 | 00/21EB | 386 | 1 dlld2.s 299 | Code | 11 | | 2 | 00/21EB : A2 C2 | ldx #{{2}!$C0} 387 | 1 dlld2.s 300 | Code | 11 | | 2 | 00/21ED : A0 20 | ldy #{{2}*16} 388 | 1 dlld2.s 301 | Code | 11 | | 2 | 00/21EF : A9 01 | lda #1 389 | 1 dlld2.s 302 | Code | 11 | | 3 | 00/21F1 : 20 7C 21 | jsr dostatus 390 | 1 dlld2.s 303 | Code | 11 | | 2 | 00/21F4 : B0 0A | bcs checkIR1 391 | 1 dlld2.s 304 | Empty | 11 | | 0 | 00/21F6 | 392 | 1 dlld2.s 305 | Code | 11 | | 1 | 00/21F6 : 7A | ply 393 | 1 dlld2.s 306 | Code | 11 | | 1 | 00/21F7 : FA | plx 394 | 1 dlld2.s 307 | Code | 11 | | 1 | 00/21F8 : 88 | dey 395 | 1 dlld2.s 308 | Code | 11 | | 2 | 00/21F9 : D0 EE | bne ozunid_3 396 | 1 dlld2.s 309 | Code | 11 | | 1 | 00/21FB : CA | dex 397 | 1 dlld2.s 310 | Code | 11 | | 2 | 00/21FC : D0 EB | bne ozunid_3 398 | 1 dlld2.s 311 | Empty | 11 | | 0 | 00/21FE | 399 | 1 dlld2.s 312 | Code | 11 | | 1 | 00/21FE : 38 | sec 400 | 1 dlld2.s 313 | Code | 11 | | 1 | 00/21FF : 60 | rts 401 | 1 dlld2.s 314 | Code | 11 | | 1 | 00/2200 : 7A | checkIR1 ply 402 | 1 dlld2.s 315 | Code | 11 | | 1 | 00/2201 : FA | plx 403 | 1 dlld2.s 316 | Code | 11 | | 1 | 00/2202 : 18 | clc 404 | 1 dlld2.s 317 | Code | 11 | | 1 | 00/2203 : 60 | rts 405 | 1 dlld2.s 318 | Empty | 11 | | 0 | 00/2204 | 406 | 1 dlld2.s 319 | Comment | 11 | | 0 | 00/2204 | *---------- Check the output is ready 407 | 1 dlld2.s 320 | Empty | 11 | | 0 | 00/2204 | 408 | 1 dlld2.s 321 | Empty | 11 | | 0 | 00/2204 | checkOutputReady 409 | 1 dlld2.s 322 | Code | 11 | | 2 | 00/2204 : A2 08 | ldx #8 410 | 1 dlld2.s 323 | Code | 11 | | 2 | 00/2206 : A0 00 | ldy #0 411 | 1 dlld2.s 324 | Empty | 11 | | 0 | 00/2208 | 412 | 1 dlld2.s 325 | Code | 11 | | 1 | 00/2208 : DA | ozunid_4 phx 413 | 1 dlld2.s 326 | Code | 11 | | 1 | 00/2209 : 5A | phy 414 | 1 dlld2.s 327 | Empty | 11 | | 0 | 00/220A | 415 | 1 dlld2.s 328 | Comment | 11 | | 0 | 00/220A | * lda #"O" 416 | 1 dlld2.s 329 | Comment | 11 | | 0 | 00/220A | * sta $427 417 | 1 dlld2.s 330 | Empty | 11 | | 0 | 00/220A | 418 | 1 dlld2.s 331 | Code | 11 | | 2 | 00/220A : A2 C2 | ldx #{{2}!$C0} 419 | 1 dlld2.s 332 | Code | 11 | | 2 | 00/220C : A0 20 | ldy #{{2}*16} 420 | 1 dlld2.s 333 | Code | 11 | | 2 | 00/220E : A9 00 | lda #0 421 | 1 dlld2.s 334 | Code | 11 | | 3 | 00/2210 : 20 7C 21 | jsr dostatus 422 | 1 dlld2.s 335 | Code | 11 | | 2 | 00/2213 : B0 0A | bcs checkOR1 423 | 1 dlld2.s 336 | Empty | 11 | | 0 | 00/2215 | 424 | 1 dlld2.s 337 | Code | 11 | | 1 | 00/2215 : 7A | ply 425 | 1 dlld2.s 338 | Code | 11 | | 1 | 00/2216 : FA | plx 426 | 1 dlld2.s 339 | Code | 11 | | 1 | 00/2217 : 88 | dey 427 | 1 dlld2.s 340 | Code | 11 | | 2 | 00/2218 : D0 EE | bne ozunid_4 428 | 1 dlld2.s 341 | Code | 11 | | 1 | 00/221A : CA | dex 429 | 1 dlld2.s 342 | Code | 11 | | 2 | 00/221B : D0 EB | bne ozunid_4 430 | 1 dlld2.s 343 | Empty | 11 | | 0 | 00/221D | 431 | 1 dlld2.s 344 | Code | 11 | | 1 | 00/221D : 38 | sec 432 | 1 dlld2.s 345 | Code | 11 | | 1 | 00/221E : 60 | rts 433 | 1 dlld2.s 346 | Code | 11 | | 1 | 00/221F : 7A | checkOR1 ply 434 | 1 dlld2.s 347 | Code | 11 | | 1 | 00/2220 : FA | plx 435 | 1 dlld2.s 348 | Code | 11 | | 1 | 00/2221 : 18 | clc 436 | 1 dlld2.s 349 | Code | 11 | | 1 | 00/2222 : 60 | rts 437 | 1 dlld2.s 350 | Empty | 11 | | 0 | 00/2223 | 438 | 1 dlld2.s 351 | Comment | 11 | | 0 | 00/2223 | *---------- Send a LD command 439 | 1 dlld2.s 352 | Empty | 11 | | 0 | 00/2223 | 440 | 1 dlld2.s 353 | Empty | 11 | | 0 | 00/2223 | sendLDCommand 441 | 1 dlld2.s 354 | Code | 11 | | 3 | 00/2223 : 20 2C 22 | jsr sendString 442 | 1 dlld2.s 355 | Code | 11 | | 2 | 00/2226 : B0 03 | bcs sendLDError 443 | 1 dlld2.s 356 | Code | 11 | | 3 | 00/2228 : 20 5A 22 | jsr receiveString 444 | 1 dlld2.s 357 | Code | 11 | | 1 | 00/222B : 60 | sendLDError rts 445 | 1 dlld2.s 358 | Empty | 11 | | 0 | 00/222C | 446 | 1 dlld2.s 359 | Comment | 11 | | 0 | 00/222C | *---------- Send a string 447 | 1 dlld2.s 360 | Empty | 11 | | 0 | 00/222C | 448 | 1 dlld2.s 361 | Empty | 11 | | 0 | 00/222C | sendString 449 | 1 dlld2.s 362 | Comment | 11 | | 0 | 00/222C | * lda #"S" 450 | 1 dlld2.s 363 | Comment | 11 | | 0 | 00/222C | * sta $426 451 | 1 dlld2.s 364 | Empty | 11 | | 0 | 00/222C | 452 | 1 dlld2.s 365 | Code | 11 | | 2 | 00/222C : 84 FC | sty {$fc} 453 | 1 dlld2.s 366 | Code | 11 | | 2 | 00/222E : 86 FD | stx {$fc}+1 454 | 1 dlld2.s 367 | Empty | 11 | | 0 | 00/2230 | 455 | 1 dlld2.s 368 | Code | 11 | | 2 | 00/2230 : B2 FC | ozunid_5 lda ({$fc}) 456 | 1 dlld2.s 369 | Code | 11 | | 2 | 00/2232 : F0 0D | beq sendCRS1 ; end of string? 457 | 1 dlld2.s 370 | Code | 11 | | 3 | 00/2234 : 20 47 22 | jsr sendCharacter 458 | 1 dlld2.s 371 | Code | 11 | | 2 | 00/2237 : B0 0D | bcs sendError ; error! 459 | 1 dlld2.s 372 | Empty | 11 | | 0 | 00/2239 | 460 | 1 dlld2.s 373 | Code | 11 | | 2 | 00/2239 : E6 FC | inc {$fc} 461 | 1 dlld2.s 374 | Code | 11 | | 2 | 00/223B : D0 F3 | bne ozunid_5 462 | 1 dlld2.s 375 | Code | 11 | | 2 | 00/223D : E6 FD | inc {$fc}+1 463 | 1 dlld2.s 376 | Code | 11 | | 2 | 00/223F : D0 EF | bne ozunid_5 464 | 1 dlld2.s 377 | Empty | 11 | | 0 | 00/2241 | 465 | 1 dlld2.s 378 | Code | 11 | | 2 | 00/2241 : A9 0D | sendCRS1 lda #{$0d} ; yes, add a final CR 466 | 1 dlld2.s 379 | Code | 11 | | 3 | 00/2243 : 20 47 22 | jsr sendCharacter 467 | 1 dlld2.s 380 | Empty | 11 | | 0 | 00/2246 | 468 | 1 dlld2.s 381 | Code | 11 | | 1 | 00/2246 : 60 | sendError rts 469 | 1 dlld2.s 382 | Empty | 11 | | 0 | 00/2247 | 470 | 1 dlld2.s 383 | Comment | 11 | | 0 | 00/2247 | *---------- Send serial character 471 | 1 dlld2.s 384 | Empty | 11 | | 0 | 00/2247 | 472 | 1 dlld2.s 385 | Empty | 11 | | 0 | 00/2247 | sendCharacter 473 | 1 dlld2.s 386 | Code | 11 | | 1 | 00/2247 : 48 | pha 474 | 1 dlld2.s 387 | Empty | 11 | | 0 | 00/2248 | 475 | 1 dlld2.s 388 | Code | 11 | | 3 | 00/2248 : 20 04 22 | ozunid_6 jsr checkOutputReady 476 | 1 dlld2.s 389 | Code | 11 | | 2 | 00/224B : 90 03 | bcc sensSC1 477 | 1 dlld2.s 390 | Code | 11 | | 1 | 00/224D : 68 | pla 478 | 1 dlld2.s 391 | Code | 11 | | 1 | 00/224E : 38 | sec 479 | 1 dlld2.s 392 | Code | 11 | | 1 | 00/224F : 60 | rts 480 | 1 dlld2.s 393 | Empty | 11 | | 0 | 00/2250 | 481 | 1 dlld2.s 394 | Code | 11 | | 1 | 00/2250 : 68 | sensSC1 pla 482 | 1 dlld2.s 395 | Code | 11 | | 2 | 00/2251 : A2 C2 | ldx #{{2}!$C0} 483 | 1 dlld2.s 396 | Code | 11 | | 2 | 00/2253 : A0 20 | ldy #{{2}*16} 484 | 1 dlld2.s 397 | Code | 11 | | 3 | 00/2255 : 20 79 21 | jsr dowrite 485 | 1 dlld2.s 398 | Code | 11 | | 1 | 00/2258 : 18 | clc 486 | 1 dlld2.s 399 | Code | 11 | | 1 | 00/2259 : 60 | rts 487 | 1 dlld2.s 400 | Empty | 11 | | 0 | 00/225A | 488 | 1 dlld2.s 401 | Comment | 11 | | 0 | 00/225A | *---------- Receive string 489 | 1 dlld2.s 402 | Empty | 11 | | 0 | 00/225A | 490 | 1 dlld2.s 403 | Empty | 11 | | 0 | 00/225A | receiveString 491 | 1 dlld2.s 404 | Comment | 11 | | 0 | 00/225A | * lda #"R" 492 | 1 dlld2.s 405 | Comment | 11 | | 0 | 00/225A | * sta $426 493 | 1 dlld2.s 406 | Empty | 11 | | 0 | 00/225A | 494 | 1 dlld2.s 407 | Code | 11 | | 2 | 00/225A : A2 23 | ldx #>responseBUF 495 | 1 dlld2.s 408 | Code | 11 | | 2 | 00/225C : A0 00 | ldy #