Subversion Repositories zxusbnet

Rev

Rev 194 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 194 Rev 195
Line 129... Line 129...
129
 
129
 
130
 
130
 
131
abaut_proc
131
abaut_proc
132
        LD IX,abaut_win
132
        LD IX,abaut_win
133
        CALL MAKEWIND
133
        CALL MAKEWIND
134
		ld c,1
134
		ld c,3
135
		exx
135
		exx
136
		ld hl,0x0202
136
		ld hl,0x0202
137
		ld bc,0x0606
137
		ld bc,0x0606
138
		ld de,nedo_qr
138
		ld de,nedo_qr
139
		call PUT_SPRT
139
		call PUT_SPRT
-
 
140
		;ld c,2
-
 
141
		;exx
-
 
142
		;ld hl,0x0202
-
 
143
		;ld bc,0x0606
-
 
144
		;ld de,nedo_qr_attr
-
 
145
		;call PUT_SPRT
140
		CALL WAITKEY
146
		CALL WAITKEY
141
		CALL NOKEY
147
		CALL NOKEY
142
        CALL CLOSE
148
        CALL CLOSE
143
        JP PROGR_UPD 
149
        JP PROGR_UPD 
144
 
150
 
Line 371... Line 377...
371
	DEFB 0xE6, 0x06, 0x79, 0x86, 0x66, 0x67, 0xE7, 0xFE, 0x60, 0x61, 0x99, 0xFF
377
	DEFB 0xE6, 0x06, 0x79, 0x86, 0x66, 0x67, 0xE7, 0xFE, 0x60, 0x61, 0x99, 0xFF
372
	DEFB 0xE7, 0xFE, 0x60, 0x61, 0x99, 0xFF, 0xE0, 0x00, 0x60, 0x7E, 0x7F, 0x9F
378
	DEFB 0xE7, 0xFE, 0x60, 0x61, 0x99, 0xFF, 0xE0, 0x00, 0x60, 0x7E, 0x7F, 0x9F
373
	DEFB 0xE0, 0x00, 0x60, 0x7E, 0x7F, 0x9F, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF
379
	DEFB 0xE0, 0x00, 0x60, 0x7E, 0x7F, 0x9F, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF
374
	DEFB 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF
380
	DEFB 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF
375
	
381
 
-
 
382
nedo_qr_attr:
-
 
383
	DEFB 0x07, 0x07, 0x07, 0x07, 0x07, 0x07
-
 
384
	DEFB 0x07, 0x07, 0x07, 0x07, 0x07, 0x07
-
 
385
	DEFB 0x07, 0x07, 0x07, 0x07, 0x07, 0x07
-
 
386
	DEFB 0x07, 0x07, 0x07, 0x07, 0x07, 0x07
-
 
387
	DEFB 0x07, 0x07, 0x07, 0x07, 0x07, 0x07
-
 
388
	DEFB 0x07, 0x07, 0x07, 0x07, 0x07, 0x07
376
    #include "COVER.s01"
389
    #include "COVER.s01"
377
		
390
		
378
	END
391
	END
379
	
392
	
380
393