30 IF PEEK(&4000)=&C7 THEN PRINT"PAL chip absent/inactive":END
40 OUT &3FFF,&C7
Deprecated: The each() function is deprecated. This message will be suppressed on further calls in /mnt/cpcwiki-httpdocs/includes/diff/DairikiDiff.php on line 434
50 IF PEEK(&4000)=&C7 THEN PRINT"PAL I/O layout Bit 14IO Bit14=0 PAL Selectselected":GOTO 8060 IF PEEK(&4000)=&C0 THEN ELSE PRINT"PAL I/O layout Bit 14IO Bit14=0 PAL not selected":GOTO 8070 PRINT"Error!"OUT &7F00,&CO:POKE &C000,&C0
80 OUT &7F00,&C3:POKE &4000,&C3:OUT &7F00,&C0
90 IF PEEK(&C000)=&C3 THEN PRINT"Valid RAM mode &C3" ELSE PRINT"Invalid RAM mode &C3"