CPU-Z80-Disassembler

 view release on metacpan or  search on metacpan

t/data/zx48.asm  view on Meta::CPAN

;
;         {fl}{br}{   paper   }{  ink    }    The temporary colour attributes
;          ___ ___ ___ ___ ___ ___ ___ ___    system variable.
; ATTR_T  |   |   |   |   |   |   |   |   |
;         |   |   |   |   |   |   |   |   |
; 23695   |___|___|___|___|___|___|___|___|
;           7   6   5   4   3   2   1   0
;
;
;         {fl}{br}{   paper   }{  ink    }    The temporary mask used for
;          ___ ___ ___ ___ ___ ___ ___ ___    transparent colours. Any bit
; MASK_T  |   |   |   |   |   |   |   |   |   that is 1 shows that the
;         |   |   |   |   |   |   |   |   |   corresponding attribute is
; 23696   |___|___|___|___|___|___|___|___|   taken not from ATTR-T but from
;           7   6   5   4   3   2   1   0     what is already on the screen.
;
;
;         {paper9 }{ ink9 }{ inv1 }{ over1}   The print flags. Even bits are
;          ___ ___ ___ ___ ___ ___ ___ ___    temporary flags. The odd bits
; P_FLAG  |   |   |   |   |   |   |   |   |   are the permanent flags.
;         | p | t | p | t | p | t | p | t |

t/data/zx48_base.asm  view on Meta::CPAN

;
;         {fl}{br}{   paper   }{  ink    }    The temporary colour attributes
;          ___ ___ ___ ___ ___ ___ ___ ___    system variable.
; ATTR_T  |   |   |   |   |   |   |   |   |
;         |   |   |   |   |   |   |   |   |
; 23695   |___|___|___|___|___|___|___|___|
;           7   6   5   4   3   2   1   0
;
;
;         {fl}{br}{   paper   }{  ink    }    The temporary mask used for
;          ___ ___ ___ ___ ___ ___ ___ ___    transparent colours. Any bit
; MASK_T  |   |   |   |   |   |   |   |   |   that is 1 shows that the
;         |   |   |   |   |   |   |   |   |   corresponding attribute is
; 23696   |___|___|___|___|___|___|___|___|   taken not from ATTR-T but from
;           7   6   5   4   3   2   1   0     what is already on the screen.
;
;
;         {paper9 }{ ink9 }{ inv1 }{ over1}   The print flags. Even bits are
;          ___ ___ ___ ___ ___ ___ ___ ___    temporary flags. The odd bits
; P_FLAG  |   |   |   |   |   |   |   |   |   are the permanent flags.
;         | p | t | p | t | p | t | p | t |

t/data/zx48_benchmark.asm  view on Meta::CPAN

S_POSN        equ $5C88         ; 33 column number for PRINT position
S_POSN_hi     equ $5C89         ; 24 line number for PRINT position.
SPOSNL        equ $5C8A         ; Like S POSN for lower part
SCR_CT        equ $5C8C         ; Counts scrolls: it is always 1 more than the number
                                ; of scrolls that will be done before stopping with
                                ; scroll? If you keep poking this with a number
                                ; bigger than 1 (say 255), the screen will scroll
                                ; on and on without asking you.
ATTR_P        equ $5C8D         ; Permanent current colours, etc (as set up by colour
                                ; statements).
MASK_P        equ $5C8E         ; Used for transparent colours, etc. Any bit that
                                ; is 1 shows that the corresponding attribute bit
                                ; is taken not from ATTR P, but from what is already
                                ; on the screen.
ATTR_T        equ $5C8F         ; Temporary current colours, etc (as set up by
                                ; colour items).
MASK_T        equ $5C90         ; Like MASK P, but temporary.
P_FLAG        equ $5C91         ; More flags.
MEMBOT        equ $5C92         ; Calculator's memory area; used to store numbers
                                ; that cannot conveniently be put on
                                ; the calculator stack.

t/data/zx48_benchmark.asm  view on Meta::CPAN

;
;         {fl}{br}{   paper   }{  ink    }    The temporary colour attributes
;          ___ ___ ___ ___ ___ ___ ___ ___    system variable.
; ATTR_T  |   |   |   |   |   |   |   |   |
;         |   |   |   |   |   |   |   |   |
; 23695   |___|___|___|___|___|___|___|___|
;           7   6   5   4   3   2   1   0
;
;
;         {fl}{br}{   paper   }{  ink    }    The temporary mask used for
;          ___ ___ ___ ___ ___ ___ ___ ___    transparent colours. Any bit
; MASK_T  |   |   |   |   |   |   |   |   |   that is 1 shows that the
;         |   |   |   |   |   |   |   |   |   corresponding attribute is
; 23696   |___|___|___|___|___|___|___|___|   taken not from ATTR-T but from
;           7   6   5   4   3   2   1   0     what is already on the screen.
;
;
;         {paper9 }{ ink9 }{ inv1 }{ over1}   The print flags. Even bits are
;          ___ ___ ___ ___ ___ ___ ___ ___    temporary flags. The odd bits
; P_FLAG  |   |   |   |   |   |   |   |   |   are the permanent flags.
;         | p | t | p | t | p | t | p | t |

t/dis_zx48.t  view on Meta::CPAN

	$self->labels->add(0x5C88, 'S_POSN'    )->comment("33 column number for PRINT position");
	$self->labels->add(0x5C89, 'S_POSN_hi' )->comment("24 line number for PRINT position.");
	$self->labels->add(0x5C8A, 'SPOSNL'    )->comment("Like S POSN for lower part");
	$self->labels->add(0x5C8C, 'SCR_CT'    )->comment("Counts scrolls: it is always 1 more than the number\n".
													  "of scrolls that will be done before stopping with\n".
													  "scroll? If you keep poking this with a number\n".
													  "bigger than 1 (say 255), the screen will scroll\n".
													  "on and on without asking you.");
	$self->labels->add(0x5C8D, 'ATTR_P'    )->comment("Permanent current colours, etc (as set up by colour\n".
													  "statements).");
	$self->labels->add(0x5C8E, 'MASK_P'    )->comment("Used for transparent colours, etc. Any bit that\n".
													  "is 1 shows that the corresponding attribute bit\n".
													  "is taken not from ATTR P, but from what is already\n".
													  "on the screen.");
	$self->labels->add(0x5C8F, 'ATTR_T'    )->comment("Temporary current colours, etc (as set up by\n".
													  "colour items).");
	$self->labels->add(0x5C90, 'MASK_T'    )->comment("Like MASK P, but temporary.");
	$self->labels->add(0x5C91, 'P_FLAG'    )->comment("More flags.");
	$self->labels->add(0x5C92, 'MEMBOT'    )->comment("Calculator's memory area; used to store numbers\n".
													  "that cannot conveniently be put on\n".
													  "the calculator stack.");