 
ф > MkHeaders ф Make sample code headers : (Ю mcode% 255 2г cpu%=0 ё 15 <"з §"0123789BD",Г~cpu%):тheader F
н cpu% Pа Z dЭтheader nг opt%=4 ё 7 € 2 xP%=&A000:O%=mcode% ‚[OPT opt%:.Start:] Њ: –Nз cpu%<3 :[OPT opt%:EQUB &4C:EQUW Entry:]              :ф 65x2   JMP Entry  Oз cpu%=3 :[OPT opt%:EQUB &7E:EQUW Entry:]              :ф 68xx   JMP >Entry ЄNз cpu%=7 :[OPT opt%:EQUW (Entry-Start-2)/2+256:EQUB 0:]:ф PDP11  BR  Entry ґNз cpu%=8 :[OPT opt%:EQUB &C3:EQUW Entry:]              :ф Z80    JP  Entry ѕOз cpu%=9 :[OPT opt%:EQUB &60:EQUW Entry:]              :ф 32000  RTS (6502) ИNз cpu%=11:[OPT opt%:EQUB &E9:EQUW Entry:]              :ф 80x86  JMP Entry ТNз cpu%=13:[OPT opt%:EQUW (Entry-Start-8)/4:EQUW &EA00:]:ф ARM    B   Entry Ь: ж4з cpu%<>13:[OPT opt%:EQUB &60:EQUW 0:]:ф Service р4з cpu%= 13:[OPT opt%:EQUB &60:EQUB 0:]:ф Service ъ:[OPT opt%EQUB &E0+cpu%EQUB Copyright-Start"$EQUB 0:EQUS "Sample CPU "+Г~cpu%,$EQUB 0:EQUS "0.01 (01 Jan 2007)"6.Copyright@EQUB 0:EQUS "(C)":EQUB 0JEQUD Start:]T2з cpu%=7 :[OPT opt%:EQUD Entry-Start:]:ф PDP11^2з cpu%=9 :[OPT opt%:EQUD Entry-Start:]:ф 32000h0з cpu%=13:[OPT opt%:EQUD End-Entry:]  :ф ARMr[OPT opt%|EQUS Д(4-P%)Ђ3,Ѕ0)†
.EntryђEQUS "code is here"љ.End¤]н opt%®8я "SAVE cpu"+Г~cpu%+"/rom "+Г~mcode%+" "+Г~O%+" 0 0"ёCA%=Ћ("cpu"+Г~cpu%+"/inf"):зA%:Щ#A%:я "DELETE cpu"+Г~cpu%+"/inf"Вбя