1 ; 10.11.2007 HR
2 ;
3
4        ORG 0000h
5
6 T0000H:
7   LD A,4h
8   OUT (10H),A
9   NOP
10  NOP
11  NOP
12
13
14 ; STATT .PHASE WIE M80
15 PHASE1:   EQU $ ; ADRESSE MERKEN
16 SETBASE 8200H ; ADRESSE SETZEN
17 PLACE:    EQU $
18 ;
19 D8200H:
20 ;
21  LD A,7h
22  OUT (10H),A
23  NOP
24  NOP
25  NOP
26 ;
27 ;
28 ;
29 ; STATT .DEPHASE WIE M80
30 PHASE2:   EQU $ ; ADRESSE MERKEN
31 PHASE3:   EQU PHASE2-PLACE
32 ;
33 DEPHASE: EQU PHASE1+PHASE3 ; ADRESSE SETZEN
34 SETBASE DEPHASE
35 ;
36  LD A,7h
37  OUT (10H),A
38  NOP
39  NOP
40  NOP
41 D0015H:
42 ;
43 ;
44  END
45
46





00000h               ; 10.11.2007 HR
00000h               ;
00000h
00000h        ORG    0000H
00000h
00000h     T0000H:
00000h 3E04     LD    A,4H
00002h D310     OUT    (10H),A
00004h 00      NOP
00005h 00      NOP
00006h 00      NOP
00007h
00007h
00007h               ; STATT .PHASE WIE M80
00007h     PHASE1: EQU  $    ; ADRESSE MERKEN
00007h      SETBASE  8200H  ; ADRESSE SETZEN
08200h     PLACE: EQU  $
08200h               ;
08200h     D8200H:
08200h               ;
08200h 3E07     LD    A,7H
08202h D310     OUT    (10H),A
08204h 00      NOP
08205h 00      NOP
08206h 00      NOP
08207h               ;
08207h               ;
08207h               ;
08207h               ; STATT .DEPHASE WIE M80
08207h     PHASE2: EQU  $  ; ADRESSE MERKEN
08207h     PHASE3: EQU  PHASE2-PLACE
08207h               ;
08207h     DEPHASE: EQU PHASE1+PHASE3 ; ADRESSE SETZEN
08207h      SETBASE  DEPHASE
0000Eh               ;
0000Eh 3E07     LD    A,7H
00010h D310     OUT    (10H),A
00012h 00      NOP
00013h 00      NOP
00014h 00      NOP
00015h     D0015H:
00015h               ;
00015h               ;
00015h        END