Subversion Repositories Kolibri OS

Rev

Rev 1998 | Rev 2743 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1998 Rev 2234
1 
;
 1 
;
2 
;   DEBUG BOARD for APPLICATIONS and KERNEL DEVELOPMENT
 2 
;   DEBUG BOARD for APPLICATIONS and KERNEL DEVELOPMENT
3 
;
 3 
;
4 
;   See f63
 4 
;   See f63
5 
;
 5 
;
6 
;   Compile with FASM for Menuet
 6 
;   Compile with FASM for Menuet
7 
;
 7 
;
8 
WRITE_LOG  equ 1
 8 
WRITE_LOG  equ 1
9 
 
 9 
 
10 
include 'lang.inc'
 10 
include 'lang.inc'
11 
 
 11 
 
12 
   use32
 12 
   use32
13 
   org	  0x0
 13 
   org	  0x0
14 
   db	  'MENUET01'		  ; 8 byte id
 14 
   db	  'MENUET01'		  ; 8 byte id
15 
   dd	  0x01			  ; header version
 15 
   dd	  0x01			  ; header version
16 
   dd	  START 		  ; start of code
 16 
   dd	  START 		  ; start of code
17 
   dd	  I_END 		  ; size of image
 17 
   dd	  I_END 		  ; size of image
18 
   dd	  mem			; memory for app
 18 
   dd	  mem			; memory for app
19 
   dd	  mem			; esp
 19 
   dd	  mem			; esp
20 
   dd	  filename , 0x0	  ; I_Param , I_Icon
 20 
   dd	  filename , 0x0	  ; I_Param , I_Icon
21 
include '../../../macros.inc'
 21 
include '../../../macros.inc'
22 
include 'debug.inc'
 22 
include 'debug.inc'
23 
purge newline
 23 
purge newline
24 
MAXSTRINGS = 16
 24 
MAXSTRINGS = 16
25 
TMP = 80*(MAXSTRINGS+1)
 25 
TMP = 80*(MAXSTRINGS+1)
26 
 
 - 
 
- 
 
 26 
;------------------------------------------------------------------------------
27 
START:				; start of execution
 27 
START:				; start of execution
28 
	mov	edi, filename
 28 
	mov	edi,filename
29 
	cmp	byte [edi], 0
 29 
	cmp	[edi],byte 0
30 
	jnz	param
 30 
	jnz	param
31 
	mov	esi, default_filename
 31 
	mov	esi,default_filename
32 
@@:
 32 
@@:
33 
	lodsb
 33 
	lodsb
34 
	stosb
 34 
	stosb
35 
	test	al, al
 35 
	test	al,al
36 
	jnz	@b
 36 
	jnz	@b
37 
param:
 37 
param:
38 
 
 38 
 
39 
; allow user to see messages written before start
 39 
; allow user to see messages written before start
40 
;     mov  ecx,4096
 40 
;	mov	ecx,4096
41 
;    flush:
 41 
;flush:
42 
;     mov  eax,63
 - 
 
43 
;     mov  ebx,2
 - 
 
44 
;     mcall
 42 
;	mcall	63,2
45 
;     loop flush
 43 
;	loop	flush
46 
 
 44
47 
     mov  ecx, TMP
 45 
	mov	ecx,TMP
48 
     xor  eax, eax
 46 
	xor	eax,eax
49 
     mov  edi, [targ]
 47 
	mov	edi,[targ]
50 
     rep  stosb
 48 
	rep	stosb
51 
 
 49 
 
52 
     mov  [tmp1],'x'
 50 
	mov	[tmp1],'x'
53 
     mov  [tmp2],'x'
 51 
	mov	[tmp2],'x'
54 
 
 - 
 
55 
     mov  eax,14
 52
56 
     mcall
 53 
	mcall	14
57 
     and  eax,0xffff0000
 54 
	and	eax,0xffff0000
58 
     sub  eax,399 shl 16
 55 
	sub	eax,399 shl 16
59 
     add  eax,399
 56 
	add	eax,399
60 
     mov  [xstart],eax
 57 
	mov	[xstart],eax
61 
 
 - 
 
62 
     mov  eax,48
 - 
 
63 
     mov  ebx,3
 - 
 
64 
     mov  ecx,sc
 - 
 
65 
     mov  edx,sizeof.system_colors
 58 
	mcall	48,3,sc,sizeof.system_colors
66 
     mcall
 - 
 
67 
  if WRITE_LOG
 59 
if WRITE_LOG
68 
     mov  esi, filename
 60 
	mov	esi,filename
69 
     call CreateFile
 61 
	call	CreateFile
70 
  end if
 62 
end if
71 
 
 - 
 
- 
 
 63 
;------------------------------------------------------------------------------
72 
  red:
 64 
red:
73 
     call draw_window
 65 
	call draw_window
74 
 
 - 
 
- 
 
 66 
;------------------------------------------------------------------------------
75 
still:
 67 
still:
76 
 
 - 
 
77 
    mov  eax,23 		; wait here for event
 68 
	mcall	23,1		; wait here for event
78 
    mov  ebx,1
 - 
 
79 
    mcall
 - 
 
80 
 
 - 
 
81 
    cmp  eax,1			; redraw request ?
 69 
	cmp	eax,1			; redraw request ?
82 
    je	 red
 70 
	je	red
- 
 
 71 
 
83 
    cmp  eax,2			; key in buffer ?
 72 
	cmp	eax,2			; key in buffer ?
84 
    je	 key
 73 
	je	key
- 
 
 74 
 
85 
    cmp  eax,3			; button in buffer ?
 75 
	cmp	eax,3			; button in buffer ?
86 
    je	 button
 76 
	je	button
87 
 
 - 
 
88 
    mov  eax,63
 - 
 
89 
    mov  ebx,2
 77 
 
90 
    mcall
 - 
 
91 
 
 78 
	mcall	63,2
92 
    cmp  ebx,1
 79 
	cmp	ebx,1
93 
    jne  still
 80 
	jne	still
94 
 
 81 
 
95 
  new_data:
 82 
new_data:
96 
  if WRITE_LOG
 83 
if WRITE_LOG
97 
     pusha
 84 
	pusha
98 
     mov  [tmp], al
 85 
	mov	[tmp],al
99 
     mov  edx, tmp
 86 
	mov	edx,tmp
100 
     mov  ecx, 1
 87 
	mov	ecx,1
101 
     mov  esi, filename
 88 
	mov	esi,filename
102 
  .write_to_logfile:
 89 
.write_to_logfile:
103 
     call WriteToFile
 90 
	call	WriteToFile
104 
     cmp  eax, 5
 91 
	cmp	eax,5
105 
     jne  @f
 92 
	jne	@f
106 
     mov  esi, filename
 93 
	mov	esi,filename
107 
     mov  [filepos], 0
 94 
	mov	[filepos],0
108 
     call CreateFile
 95 
	call	CreateFile
109 
     jnc  .write_to_logfile
 96 
	jnc	.write_to_logfile
110 
  @@:
 97 
@@:
111 
     inc  [filepos]
 98 
	inc	[filepos]
112 
     popa
 99 
	popa
113 
  end if
 100 
end if
114 
 
 - 
 
115 
    mov  ebp,[targ]
 101 
	mov	ebp,[targ]
116 
  .no4:
 102 
.no4:
117 
    cmp  al,13
 103 
	cmp	al,13
118 
    jne  no13
 104 
	jne	no13
119 
    and  dword[ebp-8],0
 105 
	and	[ebp-8],dword 0
120 
    jmp  new_check
 106 
	jmp	new_check
- 
 
 107 
;------------------------------------------
121 
   no13:
 108 
no13:
122 
    cmp  al,10
 109 
	cmp	al,10
123 
    jne  no10
 110 
	jne	no10
124 
    and  dword[ebp-8],0
 111 
	and	[ebp-8],dword 0
125 
    inc  dword[ebp-4]
 112 
	inc	dword [ebp-4]
126 
    cmp  dword[ebp-4],MAXSTRINGS
 113 
	cmp	[ebp-4],dword MAXSTRINGS
127 
    jbe  .noypos
 114 
	jbe	.noypos
128 
    mov  dword[ebp-4],MAXSTRINGS
 115 
	mov	[ebp-4],dword MAXSTRINGS
129 
    lea  esi,[ebp+80]
 116 
	lea	esi,[ebp+80]
130 
    mov  edi,ebp
 117 
	mov	edi,ebp
131 
    mov  ecx,80*(MAXSTRINGS)
 118 
	mov	ecx,80*(MAXSTRINGS)
132 
    cld
 119 
	cld
133 
    rep  movsb
 120 
	rep	movsb
134 
 
 121 
 
135 
    mov  esi,[ebp-4]
 122 
	mov	esi,[ebp-4]
136 
    imul esi,80
 123 
	imul	esi,80
137 
    add  esi,[ebp-8]
 124 
	add	esi,[ebp-8]
138 
    add  esi,ebp
 125 
	add	esi,ebp
139 
    mov  ecx,80
 126 
	mov	ecx,80
140 
    xor  al,al
 127 
	xor	al,al
141 
    rep  stosb
 128 
	rep	stosb
142 
  .noypos:
 129 
.noypos:
143 
    mov  [targ],text2
 130 
	mov	[targ],text2
144 
    and  [krnl_cnt],0
 131 
	and	[krnl_cnt],0
145 
    jmp  new_check
 132 
	jmp	new_check
- 
 
 133 
;------------------------------------------
146 
  no10:
 134 
no10:
147 
    cmp  ebp,text1
 135 
	cmp	ebp,text1
148 
    je	 add2
 136 
	je	add2
149 
		mov  ecx,[krnl_cnt]
 137 
	mov	ecx,[krnl_cnt]
150 
		  cmp  al,[krnl_msg+ecx]
 138 
	cmp	al,[krnl_msg+ecx]
151 
		jne  .noknl
 139 
	jne	.noknl
152 
		  inc  [krnl_cnt]
 140 
	inc	[krnl_cnt]
153 
		cmp  [krnl_cnt],4
 141 
	cmp	[krnl_cnt],4
154 
		jne  new_check
 142 
	jne	new_check
155 
    mov  [targ],text1
 143 
	mov	[targ],text1
156 
	.noknl:
 144 
.noknl:
157 
    mov  ebp,[targ]
 145 
	mov	ebp,[targ]
158 
	   jecxz .add
 146 
	jecxz	.add
159 
    push eax
 147 
	push	eax
160 
    mov  esi,krnl_msg
 148 
	mov	esi,krnl_msg
161 
   .l1:
 149 
.l1:
162 
    lodsb
 150 
	lodsb
163 
    call add_char
 151 
	call	add_char
164 
    loop .l1
 152 
	loop	.l1
165 
    pop  eax
 153 
	pop	eax
166 
   .add:
 154 
.add:
167 
    and  [krnl_cnt],0
 155 
	and	[krnl_cnt],0
168 
  add2:
 156 
add2:
169 
    call add_char
 157 
	call	add_char
170 
 
 158 
 
171 
  new_check:
 159 
new_check:
172 
 
 - 
 
173 
    mov  eax,63
 - 
 
174 
    mov  ebx,2
 - 
 
175 
    mcall
 160 
	mcall	63,2
176 
 
 - 
 
177 
    cmp  ebx,1
 161 
	cmp	ebx,1
178 
    je	 new_data
 162 
	je	new_data
179 
 
 - 
 
180 
    call draw_window
 163 
	call	draw_text
181 
 
 - 
 
182 
    jmp  still
 164 
	jmp	still
183 
 
 - 
 
- 
 
 165 
;------------------------------------------------------------------------------
184 
  key:				; key
 166 
key:
185 
    mov  al,2		       ; just read it and ignore
 - 
 
186 
    mcall
 167 
	mcall	2
187 
    cmp  ah,' '
 168 
	cmp	ah,' '
188 
    je	 button.noclose
 169 
	je	button.noclose
189 
    jmp  still
 170 
	jmp	still
190 
 
 - 
 
- 
 
 171 
;------------------------------------------------------------------------------
191 
  button:			; button
 172 
button:
192 
    mov  al,17		       ; get id
 173 
	mcall	17	; get id
193 
    mcall
 - 
 
194 
 
 - 
 
195 
    cmp  ah,1			; button id=1 ?
 174 
	cmp	ah,1		; button id=1 ?
196 
    jne  .noclose
 175 
	jne	.noclose
197 
 
 - 
 
198 
    or	 eax,-1 		; close this program
 176 
	or	eax,-1 		; close this program
199 
    mcall
 177 
	mcall
200 
  .noclose:
 178 
.noclose:
201 
    xor  [vmode],1
 179 
	xor	[vmode],1
202 
    jmp  red
 180 
	jmp	red
203 
 
 - 
 
- 
 
 181 
;------------------------------------------------------------------------------
204 
add_char:
 182 
add_char:
205 
    push esi
 183 
	push	esi
206 
    mov  esi,[ebp-4]
 184 
	mov	esi,[ebp-4]
207 
    imul esi,80
 185 
	imul	esi,80
208 
    add  esi,[ebp-8]
 186 
	add	esi,[ebp-8]
209 
    mov  [ebp+esi],al
 187 
	mov	[ebp+esi],al
210 
    inc  dword[ebp-8]
 188 
	inc	dword[ebp-8]
211 
    cmp  dword[ebp-8],80
 189 
	cmp	dword[ebp-8],80
212 
    jb	 .ok
 190 
	jb	.ok
213 
    mov  dword[ebp-8],79
 191 
	mov	dword[ebp-8],79
214 
  .ok:
 192 
.ok:
215 
    pop  esi
 193 
	pop	esi
216 
    ret
 194 
	ret
217 
 
 - 
 
- 
 
 195 
;------------------------------------------------------------------------------
218 
;   *********************************************
 196 
;   *********************************************
219 
;   *******  WINDOW DEFINITIONS AND DRAW ********
 197 
;   *******  WINDOW DEFINITIONS AND DRAW ********
220 
;   *********************************************
 198 
;   *********************************************
221 
 
 - 
 
222 
 
 - 
 
223 
draw_window:
 199 
draw_window:
224 
 
 - 
 
225 
    mov  eax,12 		   ; function 12:tell os about windowdraw
 - 
 
226 
    mov  ebx,1			   ; 1, start of draw
 200 
	mcall	12,1	; 1, start of draw
227 
    mcall
 - 
 
228 
 
 - 
 
229 
				   ; DRAW WINDOW
 - 
 
230 
    xor  eax,eax		     ; function 0 : define and draw window
 201 
	xor	eax,eax		     ; function 0 : define and draw window
231 
;   mov  ebx,50*65536+400          ; [x start] *65536 + [x size]
 - 
 
232 
    mov  ebx,[xstart]
 - 
 
233 
    mov  ecx,MAXSTRINGS*10+45	   ; [y start] *65536 + [y size]
 202 
	mov	ecx,MAXSTRINGS*10+45	   ; [y start] *65536 + [y size]
234 
    mov  edx,[sc.work]		   ; color of work area RRGGBB,8->color gl
 203 
	mov	edx,[sc.work]		   ; color of work area RRGGBB,8->color gl
235 
    or	 edx,0x13000000
 204 
	or	edx,0x13000000
236 
    mov  edi,title		  ; WINDOW LABEL
 - 
 
237 
    mcall
 - 
 
238 
 
 - 
 
239 
    mov  ecx,4
 205 
	xor	esi,esi
240 
    mov  esi,[sc.work]
 206 
	mcall	,[xstart],,,,title
241 
    mov  ebx,296 shl 16+5*6
 207 
	mov	ebx,296 shl 16+5*6
242 
    mov  edx,3;+1 shl 30
 - 
 
243 
    mcall 8,,<5,12>
 208 
	mcall	8,,<5,12>,3,[sc.work]
244 
    mov  edx,[vmode]
 209 
	mov	edx,[vmode]
245 
    lea  edx,[edx*4+duk]
 210 
	lea	edx,[edx*4+duk]
246 
    mcall 4,<300,8>,,,4
 211 
	mcall	4,<300,8>,,,4
- 
 
 212 
	call	draw_text
- 
 
 213 
	mcall	12,2	; 2, end of draw
247 
 
 214 
	ret
- 
 
 215 
;------------------------------------------------------------------------------
- 
 
 216 
draw_text:
248 
    mov  ebx,15*65536+33	   ; draw info text with function 4
 217 
	mov	ebx,15*65536+30	   ; draw info text with function 4
249 
    mov  ecx,[sc.work_text]
 218 
	mov	ecx,[sc.work_text]
- 
 
 219 
	or	ecx,0x40000000
- 
 
 220 
	mov	edi,[sc.work]
250 
    mov  edx,text1
 221 
	mov	edx,text1
251 
    cmp  [vmode],0
 222 
	cmp	[vmode],0
252 
    je	 .kern
 223 
	je	.kern
253 
    mov  edx,text2
 224 
	mov	edx,text2
254 
  .kern:
 225 
.kern:
- 
 
 226 
	push	ebx ecx edx
- 
 
 227 
	mcall	9,procinfo,-1
- 
 
 228 
	mov	eax,[ebx+42]
- 
 
 229 
	xor	edx,edx
- 
 
 230 
	mov	ebx,6
- 
 
 231 
	div	ebx
- 
 
 232 
	pop	edx ecx ebx
255 
    mov  esi,80
 233 
	mov	esi,80
- 
 
 234 
	cmp	eax,esi
- 
 
 235 
	ja	@f
- 
 
 236 
	mov	esi,eax
- 
 
 237 
@@:
- 
 
 238 
	cmp	esi,5
- 
 
 239 
	ja	@f
- 
 
 240 
	mov	esi,5
- 
 
 241 
@@:
- 
 
 242 
	sub	esi,4
256 
    mov  eax,4
 243 
	mov	eax,4
257 
  newline:
 244 
newline:
258 
    mcall
 245 
	mcall
259 
    add  ebx,10
 246 
	add	ebx,10
260 
    add  edx,80
 247 
	add	edx,80
261 
    cmp  [edx],byte 'x'
 248 
	cmp	[edx],byte 'x'
262 
    jne  newline
 249 
	jne	newline
263 
    mov  eax,12 		   ; function 12:tell os about windowdraw
 - 
 
264 
    mov  ebx,2			   ; 2, end of draw
 - 
 
265 
    mcall
 - 
 
266 
 
 - 
 
267 
    ret
 250 
	ret
268 
 
 - 
 
269 
 
 - 
 
- 
 
 251 
;------------------------------------------------------------------------------
270 
if WRITE_LOG
 252 
if WRITE_LOG
271 
;********************************************
 253 
;********************************************
272 
;*  input:  esi = pointer to the file name  *
 254 
;*  input:  esi = pointer to the file name  *
273 
;********************************************
 255 
;********************************************
274 
 
 256 
 
275 
CreateFile:
 257 
CreateFile:
276 
    pusha
 258 
	pusha
277 
    mov      dword [InfoStructure],    2   ; create file
 259 
	mov	dword [InfoStructure],2		; create file
278 
    mov      dword [InfoStructure+4],  0   ; reserved
 260 
	mov	dword [InfoStructure+4],0	; reserved
279 
    mov      dword [InfoStructure+8],  0   ; reserved
 261 
	mov	dword [InfoStructure+8],0	; reserved
280 
    mov      dword [InfoStructure+12], 0   ; 0 bytes to write (just create)
 262 
	mov	dword [InfoStructure+12],0	; 0 bytes to write (just create)
281 
    mov      dword [InfoStructure+16], 0   ; NULL data pointer (no data)
 263 
	mov	dword [InfoStructure+16],0	; NULL data pointer (no data)
282 
    mov      dword [InfoStructure+20], 0   ; reserved
 264 
	mov	dword [InfoStructure+20],0	; reserved
283 
    mov      dword [InfoStructure+21], esi ; pointer to the file name
 265 
	mov	dword [InfoStructure+21],esi	; pointer to the file name
284 
    mcall    70, InfoStructure
 266 
	mcall	70, InfoStructure
285 
    test     eax, eax
 267 
	test	eax,eax
286 
    jz	     .out
 268 
	jz	.out
287 
    stc
 269 
	stc
288 
  .out:
 270 
.out:
289 
    popa
 271 
	popa
290 
    ret
 272 
	ret
291 
 
 - 
 
- 
 
 273 
;------------------------------------------------
292 
;********************************************
 274 
;********************************************
293 
;*  input:  esi = pointer to the file name  *
 275 
;*  input:  esi = pointer to the file name  *
294 
;*          edx = pointer to data buffer    *
 276 
;*          edx = pointer to data buffer    *
295 
;*          ecx = data length               *
 277 
;*          ecx = data length               *
296 
;********************************************
 278 
;********************************************
297 
 
 279 
 
298 
WriteToFile:
 280 
WriteToFile:
299 
    push     ebx
 281 
	push	ebx
300 
    mov      dword [InfoStructure],    3   ; write to file
 282 
	mov	dword [InfoStructure],3		; write to file
301 
    mov      eax,  [filepos]
 283 
	mov	eax,  [filepos]
302 
    mov      dword [InfoStructure+4],  eax ; lower position addr
 284 
	mov	dword [InfoStructure+4],eax	; lower position addr
303 
    mov      dword [InfoStructure+8],  0   ; upper position addr (0 for FAT)
 285 
	mov	dword [InfoStructure+8],0	; upper position addr (0 for FAT)
304 
    mov      dword [InfoStructure+12], ecx ; number of bytes to write
 286 
	mov	dword [InfoStructure+12],ecx	; number of bytes to write
305 
    mov      dword [InfoStructure+16], edx ; pointer to data buffer
 287 
	mov	dword [InfoStructure+16],edx	; pointer to data buffer
306 
    mov      dword [InfoStructure+20], 0   ; reserved
 288 
	mov	dword [InfoStructure+20],0	; reserved
307 
    mov      dword [InfoStructure+21], esi ; pointer to the file name
 289 
	mov	dword [InfoStructure+21],esi	; pointer to the file name
308 
    mcall    70, InfoStructure
 290 
	mcall	70, InfoStructure
309 
    clc
 291 
	clc
310 
    test     eax, eax
 292 
	test	eax,eax
311 
    jz	     .out
 293 
	jz	.out
312 
    stc
 294 
	stc
313 
  .out:
 295 
.out:
314 
    pop      ebx
 296 
	pop      ebx
315 
    ret
 297 
	ret
316 
 
 - 
 
317 
 
 - 
 
- 
 
 298 
;--------------------------------------------------
318 
InfoStructure:
 299 
InfoStructure:
319 
		     dd      0x0     ; subfunction number
 300 
	dd 0x0	; subfunction number
320 
		     dd      0x0     ; position in the file in bytes
 301 
	dd 0x0	; position in the file in bytes
321 
		     dd      0x0     ; upper part of the position address
 302 
	dd 0x0	; upper part of the position address
322 
		     dd      0x0     ; number of     bytes to read
 303 
	dd 0x0	; number of bytes to read
323 
		     dd      0x0     ; pointer to the buffer to write data
 304 
	dd 0x0	; pointer to the buffer to write data
324 
		     db      0
 305 
	db 0
325 
		     dd      0	     ; pointer to the filename
 306 
	dd 0	; pointer to the filename
326 
 
 307 
 
327 
filepos  dd 0
 308 
filepos	dd 0
328 
default_filename db '/sys/boardlog.txt',0
 309 
default_filename db '/sys/boardlog.txt',0
329 
tmp	 db 0
 310 
tmp	db 0
330 
end if
 311 
end if
331 
 
 - 
 
332 
 
 - 
 
333 
 
 - 
 
334 
 
 - 
 
- 
 
 312 
;------------------------------------------------------------------------------
335 
krnl_msg db 'K : '
 313 
krnl_msg db 'K : '
336 
duk db 'KernUser'
 314 
duk db 'KernUser'
337 
 
 315 
 
338 
; DATA AREA
 316 
; DATA AREA
339 
 
 317 
 
340 
; 11,11 > 0,-1
 318 
; 11,11 > 0,-1
341 
; 5,11  > 0,-1
 319 
; 5,11  > 0,-1
342 
if lang eq ru
 320 
if lang eq ru
343 
   title    db	 '„®áª  ®â« ¤ª¨ ¨ á®®¡é¥­¨©',0
 321 
 title	db '„®áª  ®â« ¤ª¨ ¨ á®®¡é¥­¨©',0
344 
else if lang eq en
 322 
else if lang eq en
345 
   title    db	 'General debug & message board',0
 323 
 title	db 'General debug & message board',0
346 
else
 324 
else
347 
   title    db	 'Allgemeines debug- & nachrichtenboard',0
 325 
 title	db 'Allgemeines debug- & nachrichtenboard',0
348 
end if
 326 
end if
349 
   krnl_cnt dd 0
 327 
krnl_cnt	dd 0
350 
   vmode dd 1
 328 
vmode		dd 1
351 
   targ  dd text2
 329 
targ		dd text2
- 
 
 330 
;------------------------------------------------------------------------------
352 
I_END:
 331 
I_END:
- 
 
 332 
;------------------------------------------------------------------------------
353 
     offs dd ?
 333 
offs	dd ?
354 
     flag rb 1
 334 
flag	rb 1
355 
     rd 2
 335 
	rd 2
356 
;     x1pos  dd ?
 336 
;x1pos	dd ?
357 
;     y1pos  dd ?
 337 
;y1pos	dd ?
358 
     text1 rb 80*(MAXSTRINGS+1)
 338 
text1	rb 80*(MAXSTRINGS+1)
359 
     tmp1  db ?
 339 
tmp1	db ?
360 
     rd 2
 340 
	rd 2
361 
;     x2pos  dd ?
 341 
;x2pos	dd ?
362 
;     y2pos  dd ?
 342 
;y2pos	dd ?
363 
     text2 rb 80*(MAXSTRINGS+1)
 343 
text2	rb 80*(MAXSTRINGS+1)
364 
     tmp2  db ?
 344 
tmp2	db ?
365 
     xstart dd ?
 345 
xstart	dd ?
- 
 
 346 
 
366 
     sc system_colors
 347 
sc system_colors
- 
 
 348 
 
367 
i_end:
 349 
i_end:
368 
 
 350 
 
369 
filename	rb	256
 351 
filename	rb 256
- 
 
 352 
;------------------------------------------------------------------------------
- 
 
 353 
align 4
- 
 
 354 
procinfo:
- 
 
 355 
	rb 1024
- 
 
 356 
;------------------------------------------------------------------------------
370 
align 4
 357 
align 4
371 
stackbuf	rb	2000h
 358 
stackbuf	rb 2000h
- 
 
 359 
;------------------------------------------------------------------------------
372 
mem:
 360 
mem: