Subversion Repositories Kolibri OS

Rev

Rev 1200 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1200 Rev 1206
Line 33... Line 33...
33 
 
 33 
 
Line 34... Line 34...
34 
    mcall   0, 100 shl 16 + 520, 100 shl 16 + 240, 0x34bcbcbc, ,name
 34 
    mcall   0, 100 shl 16 + 520, 100 shl 16 + 240, 0x34bcbcbc, ,name
Line 35... Line -...
35 
 
 - 
 
36 
    mcall   4, 25 shl 16 + 31, 0x80000000, title
 - 
 
37 
 
 35 
 
Line 38... Line -...
38 
;;    call    draw_stats
 - 
 
39 
 
 - 
 
40 
    mcall   12, 2
 - 
 
41 
 
 - 
 
42 
    jmp     draw_stats
 - 
 
43 
 
 - 
 
44 
  mainloop:
 - 
 
45 
 
 - 
 
46 
    mcall   23,50		   ; wait for event with timeout    (0,5 s)
 - 
 
47 
 
 - 
 
48 
    cmp     eax, 1
 - 
 
49 
    je	    redraw
 - 
 
50 
    cmp     eax, 2
 - 
 
51 
    je	    key
 - 
 
52 
    cmp     eax, 3
 36 
    mcall   4, 25 shl 16 + 31, 0x80000000, title
Line 53... Line 37...
53 
    je	    button
 37 
 
- 
 
 38 
    mcall   12, 2
Line 54... Line 39...
54 
 
 39 
 
55 
 
 40 
  draw_stats:
56 
  draw_stats:
 41 
 
57 
 
 42 
	mov	edx, 50 shl 16 + 50
Line 128... Line 113...
128 
	rol	edx, 16
 113 
	rol	edx, 16
129 
	inc	[last]
 114 
	inc	[last]
Line 130... Line 115...
130 
 
 115 
 
Line -... Line 116...
- 
 
 116 
	jmp	.loop
- 
 
 117 
 
- 
 
 118 
  mainloop:
- 
 
 119 
 
- 
 
 120 
    mcall   23,50		   ; wait for event with timeout    (0,5 s)
- 
 
 121 
 
- 
 
 122 
    cmp     eax, 1
- 
 
 123 
    je	    redraw
- 
 
 124 
    cmp     eax, 2
- 
 
 125 
    je	    key
- 
 
 126 
    cmp     eax, 3
- 
 
 127 
    je	    button
- 
 
 128 
 
Line 131... Line 129...
131 
	jmp	.loop
 129 
    jmp     draw_stats
132 
 
 130 
 
133 
 
 131