unit KCHdr; interface {$C MOVEABLE PRELOAD PERMANENT} {gleiche Attribute wie Unit SYSTEM} uses WinTypes; var hKBWnd: HWnd; {Tastaturfokus fr nichtmodale Dialoge} hDebug: HWnd; {Windows oder BP setzen auf Null!(?)} hModul: HWnd; hKeymap: HWnd; type TRegs=record case Integer of 0: (BC,DE,HL,AF,BC_,DE_,HL_,AF_,PC,SP_,IX,IY:Word); 1: (C,B,E,D,L,H,F,A:Byte; rsv: array[0..7] of Word; I,R,IM,IFF: Byte); end; var MemKCSel: Word; Regs: TRegs; MainWnd: HWnd; implementation end.
Detected encoding: UTF-8 | 0 |