← Back to branch summary

~z88dk-team/z88dk-pkg/trunk

« back to all changes in this revision

Viewing changes to libsrc/zx81/_clg_hr.asm

  • Committer: Bazaar Package Importer
  • Author(s): Krystian Wlosek, Krystian Wlosek
  • Date: 2008-03-25 11:46:11 UTC
  • mfrom: (1.1.2 upstream) (3.1.1 lenny)
  • Revision ID: james.westby@ubuntu.com-20080325114611-u89smn2ccknl8avt
Tags: 1.8.ds1-2
[ Krystian Wlosek ]
* Enable 64bit architecture.
* Added '-m32' switch to CFLAGS and LDFLAGS for 64bit machines.
* Changed Architecture: to `any' in z88dk and z88dk-bin package.
* Added gcc-multilib to Build-Depends: for 64bit
* Fixed problem with x11.lib
  - created symlink from include/x11 to include/X11
  - improved Makefile for x11.lib
    patch debian/patches/03_libsrc_graphics_x11_Makefile.diff
* Fixed library ozansi.lib
  - patch debian/patches/03_libsrc_oz_ozinput_Makefile.diff
* Changed Copyright notice.
* Fixed gcc warnings:
  - in src/appmake dir - debian/patches/04_src_appmake.diff
  - in src/zcc/zcc.c - debian/patches/04_src_zcc_zcc.c.diff

Show diffs side-by-side

added added

removed removed

Lines of Context:
libsrc/zx81/_clg_hr.asm
 
1
;--------------------------------------------------------------
 
2
; This code comes from the 'HRG_Tool' 
 
3
; by Matthias Swatosch
 
4
;--------------------------------------------------------------
 
5
;
 
6
;       Fast CLS for hi-rez ZX81
 
7
;
 
8
;       Stefano - 10/1/2007
 
9
;
 
10
;
 
11
;       $Id: _clg_hr.asm,v 1.1 2007/10/02 11:20:24 stefano Exp $
 
12
;
 
13
 
 
14
                XLIB    _clg_hr
 
15
                XREF    base_graphics
 
16
                XREF    hr_rows
 
17
 
 
18
._clg_hr
 
19
;----------------------------------------------------------------
 
20
;
 
21
; HRG_Tool_Clear
 
22
; hl = pointer to display array
 
23
;
 
24
; to fill hr_rows lines by 32 characters
 
25
; here we use the stack (!) to fill hr_rows x 8 x 16 words with push
 
26
;
 
27
;----------------------------------------------------------------
 
28
 
 
29
        ld      hl,(base_graphics)
 
30
        ld      a,(hr_rows)             ; 8 or 24
 
31
 
 
32
        ld      b,a                     ; * 256
 
33
        ld      c,0
 
34
        add     hl,bc
 
35
        ld      (HRG_ClearSpReg),sp
 
36
        ld      sp,hl
 
37
 
 
38
        ld      hl,0
 
39
        
 
40
        add     a                       ; 8 or 24
 
41
        add     a
 
42
        add     a                       ; * 8
 
43
        ld      b,a
 
44
        
 
45
HRG_ClearLoop:
 
46
        push    hl
 
47
        push    hl
 
48
        push    hl
 
49
        push    hl
 
50
        push    hl
 
51
        push    hl
 
52
        push    hl
 
53
        push    hl
 
54
        push    hl
 
55
        push    hl
 
56
        push    hl
 
57
        push    hl
 
58
        push    hl
 
59
        push    hl
 
60
        push    hl
 
61
        push    hl
 
62
        djnz    HRG_ClearLoop
 
63
 
 
64
        ld      sp,(HRG_ClearSpReg)
 
65
        
 
66
        ret
 
67
 
 
68
HRG_ClearSpReg: defw    0