|
Post by pcollins on Oct 21, 2022 6:43:31 GMT
Hello, I want to change the colors of the default Rom of the C128. but how to do this? I found this for the C64: www.breadbox64.com/blog/c64-kernal-mods/but I need this for the C128? Any Idea? reagrds pcollins
|
|
|
Post by mirkosoft on Oct 22, 2022 3:08:01 GMT
Here is modifiable Basic startup where is possible to find it - even you can modify startup text
; Basic Cold Start 4023: 20 7A 41 JSR $417A ; Set Preconfig Registers 4026: 20 51 42 JSR $4251 ; Set Basic Links 4029: 20 45 40 JSR $4045 ; Set-Up Basic Constants 402C: 20 9B 41 JSR $419B ; Print Startup Message - look at 419b, if I'll find old notes to mods I will reply 402F: AD 04 0A LDA $0A04 4032: 09 01 ORA #$01 4034: 8D 04 0A STA $0A04 4037: A2 03 LDX #$03 4039: 8E 00 0A STX $0A00 ; Restart System (BASIC Warm) [4000] 403C: A2 FB LDX #$FB 403E: 9A TXS 403F: 20 56 FF JSR $FF56 ; foenix 4042: 4C 1C 40 JMP $401C
here starts output:
; Print Startup Message 419B: A0 00 LDY #$00 419D: B9 BB 41 LDA $41BB,Y ; Startup Message 41A0: C9 40 CMP #$40 41A2: D0 0E BNE $41B2 41A4: 24 D7 BIT $D7 ; 40 / 80 columns: 0 = 40, 128 = 80 41A6: 10 0D BPL $41B5 41A8: A2 13 LDX #$13 41AA: A9 20 LDA #$20 41AC: 20 69 92 JSR $9269 ; Call 'chrout' 41AF: CA DEX 41B0: D0 F8 BNE $41AA 41B2: 20 69 92 JSR $9269 ; Call 'chrout' 41B5: C8 INY 41B6: C0 96 CPY #$96 41B8: D0 E3 BNE $419D 41BA: 60 RTS
and here is text:
; Startup Message 41BB: 93 0D 40 20 43 4F 4D 4D ; '{CLR}{CR}@ comm' 41C3: 4F 44 4F 52 45 20 42 41 ; 'odore ba' 41CB: 53 49 43 20 56 37 2E 30 ; 'sic v7.0' 41D3: 20 31 32 32 33 36 35 20 ; ' 122365 ' 41DB: 42 59 54 45 53 20 46 52 ; 'bytes fr' 41E3: 45 45 0D 40 20 20 20 28 ; 'ee{CR}@ (' 41EB: 43 29 31 39 38 36 20 43 ; 'c)1986 c' 41F3: 4F 4D 4D 4F 44 4F 52 45 ; 'ommodore' 41FB: 20 45 4C 45 43 54 52 4F ; ' electro' 4203: 4E 49 43 53 2C 20 4C 54 ; 'nics, lt' 420B: 44 2E 0D 40 20 20 20 20 ; 'd.{CR}@ ' 4213: 20 20 20 20 20 28 43 29 ; ' (c)' 421B: 31 39 37 37 20 4D 49 43 ; '1977 mic' 4223: 52 4F 53 4F 46 54 20 43 ; 'rosoft c' 422B: 4F 52 50 2E 0D 40 20 20 ; 'orp.{CR}@ ' 4233: 20 20 20 20 20 20 20 20 ; ' ' 423B: 20 41 4C 4C 20 52 49 47 ; ' all rig' 4243: 48 54 53 20 52 45 53 45 ; 'hts rese'424B: 52 56 45 44 0D 00 ; 'rved{CR}{0}' ; Set Basic Links 4251: A2 11 LDX #$11
|
|