Rev 994 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log
| Rev 994 | Rev 1005 | ||
|---|---|---|---|
| Line 1... | Line 1... | ||
| 1 | ;*L+ |
1 | ;*L+ |
| 2 | ;*D- |
2 | ;*D- |
| 3 | 3 | ||
| 4 | ;(C) 1996 Медноногов Алексей |
4 | ;(C) 1996 Медноногов Алексей |
| 5 | ;Подводный бой с НЛО |
5 | ;Подводный бой с НЛО |
| 6 | DEFM "Alex " |
6 | db "Alex " |
| 7 | ANGSNUM EQU 33 |
7 | ANGSNUM EQU 33 |
| 8 | SHDSCR EQU #9000 |
8 | SHDSCR EQU #9000 |
| 9 | VISSCR EQU #C000 |
9 | VISSCR EQU #C000 |
| 10 | 10 | ||
| 11 | ; ORG #B000 ;не трогать |
11 | ; ORG #B000 ;не трогать |
| Line 1937... | Line 1937... | ||
| 1937 | JR Z,MG4_ |
1937 | JR Z,MG4_ |
| 1938 | AND %11000;RT-retry |
1938 | AND %11000;RT-retry |
| 1939 | JP NZ,MANAGER |
1939 | JP NZ,MANAGER |
| 1940 | CPL |
1940 | CPL |
| 1941 | JR MG3_ |
1941 | JR MG3_ |
| - | 1942 | MG4_ |
|
| - | 1943 | if CHEATS |
|
| - | 1944 | ld a,1 |
|
| - | 1945 | ld (HISPWR),a |
|
| - | 1946 | jp MANAGER |
|
| - | 1947 | endif |
|
| 1942 | MG4_ LD A,2 |
1948 | LD A,2 |
| 1943 | LD (RETURN),A |
1949 | LD (RETURN),A |
| 1944 | LD A,(OURPWR) |
1950 | LD A,(OURPWR) |
| 1945 | SLA A |
1951 | SLA A |
| 1946 | JR C,MGEND |
1952 | JR C,MGEND |
| 1947 | LD HL,OINIPWR |
1953 | LD HL,OINIPWR |