ô > CMLoad/src ô Source for LoadCMOS ô *LoadCMOS ()ô NB: Naming convention back to front 2: <*OSARGS=&FFDA:OSFILE=&FFDD:OSBYTE=&FFF4 Flptr=&A8:tmp=&A8 P: Z!Þ mcode% &200:load%=&FFFF0900 d ã P=0 ¸ 1 nP%=load%:O%=mcode% x[OPT P*3+4 ‚.errBadFile Œ)BRK:EQUB 225:EQUS "Bad CMOS file":BRK –.go% &LDA #1:LDY #0:LDX #lptr:JSR OSARGS ª$LDA lptr+0:STA info+0:STA load+0 ´$LDA lptr+1:STA info+1:STA load+1 ¾#LDX #info € 255:LDY #info 256 È1LDA #5:JSR OSFILE :\ Read file info ÒLDA info+11:„A info+12 Ü,„A info+13:BNE errBadFile :\ Length>255 æ-LDA info+10:BMI errBadFile :\ Length>127 ð,CMP #50:BCC errBadFile:PHA :\ Length<50 ú#LDX #load € 255:LDY #load 256 ,LDA #255:JSR OSFILE :\ Load file 2PLA:TAX:DEX :\ Get file length .lp "