I don't seem to be able to access port registers using PEEK/POKE. I wrote a test program to read all registers in the range 0xff80 to 0xffff, which includes PC8 (0xffeb) and PD8 (0xffdb). Port 8, pin 7 of the H8/3664 is P15 on the Atom Pro X. I can switch on and off an LED connected to P15 by hitting the "1" and "2" keys on my keyboard, but the displayed contents of PD8, as well as every other register in the range 0xff80 to 0xffff, is always 0xff.
Reg var Byte
DReg var Word
Main:
Serout S_OUT, I9600, ["Go:"]
For DReg = 0xff80 to 0xffff
Peek Dreg, Reg
Serout S_OUT, I9600, [hex Reg]
Serout S_OUT, I9600, [","]
Next
Serout S_OUT, I9600, [13]
Serin S_IN, I9600, [Reg]
If Reg = "1" Then Gosub Lite
If Reg = "2" Then Gosub Dark
Goto Main
Lite:
LOW 15
Return
Dark:
HIGH 15
Return