RYELLOW1.S (1782B)
1 * Ryellow1 (put this file!!!) 2 3 * This code sets the high bit of $7C in aux mem 4 * if signature is found on track zero. 5 6 * NOTE: make sure the x register has a number 7 * greater than 4 when calling YELLOW. 8 9 YELLrun = $AAAA 10 11 YELLOW 12 :0 sec 13 rol 14 clc 15 rol 16 dex 17 bne :0 18 sta 4 19 20 jsr YELLsub 21 jmp YELLnothing 22 23 *------------------------------------------------- 24 25 YELLcode 26 hex 27A26A0C5717236A8AAD0603AA8A3401 27 hex 03A02F9E0C5717246A03012F9D03E92F 28 hex 9C032A2F9F6C9F5AF68AF8011AFD0F9B 29 hex 63AD7A5B0AAA17266ABA51225AED637F 30 hex 7A5E0AAA17266ABA51225A93634D7A5E 31 hex 17266ABA51634D7A8617266ABA51634D 32 hex 7A8917276A0ABA8EAC17266ABA51225A 33 hex BE63447A5E0AAD17266ABA517B9C7AAF 34 hex 22BA5E9AA9E696018AAD06374215DCF1 35 hex B2CA6C9E5AA1E66100564444564D4456 36 hex 4D8AAD06374215CA0A572E92627AAE4C 37 hex 925A9717266ABA51637F7A5A4017266A 38 hex BA5163007A580AA917266ABA51633C7A 39 hex 4D03AA2F9317266ABA51802F9217266A 40 hex BA518F92339AAAEF9322BA4D0240B2CA 41 hex 92CA03AE27620E6F555AFC03AA27670E 42 hex 0F55276F0E9247620E5A9F1AACE3554C 43 hex 553AAEC3546C5567670E3AA907670E63 44 hex A61AAB02928A440113B3068A5601076F 45 hex 0EB28A5A01138F068A560144670E7A6A 46 hex 8A5601B20F5583A980AF5700172A6A0C 47 hex 57CA08B8607A579243AB7A5CCA08AA16 48 hex 0E0E1F9A3E9A370E0E424A8B7A5BCAAB 49 hex 9A828E8AB4B7B6B6B6B6B6DA868C88B5 50 hex B4B7B6B6B6B6B655A9 51 52 *------------------------------------------------- 53 54 YELLlen = *-YELLcode 55 56 * Routine to decode code 57 58 hex 20 ;jsr 59 60 YELLsub sta 5 61 ldy #0 62 :0 lda YELLcode,y 63 eor 4 64 sta (4),y 65 inc 5 66 lda YELLcode+256,y 67 eor 4 68 sta (4),y 69 dec 5 70 iny 71 bne :0 72 lda 4 73 eor #$4C!$AA ;jmp instruction 74 sta 3 75 jmp 3 76 77 *------------------------------------------------- 78 79 hex a9 ;lda #imm 80 81 YELLnothing ldy #0 82 inc 5 83 :0 tya 84 :1 sta (4),y 85 iny 86 bne :1 87 rts 88 89 90 *------------------------------------------------- EOF