Subversion Repositories NedoOS

Rev

Rev 55 | Details | Compare with Previous | Last modification | View Log

Rev Author Line No. Line
11 dimkam 1 
;startup
2 
FCB1=0xe800 ;aligned ;len=0x0200*files
3 
DOSBUF=0xfe00 ;aligned
55 Alone 4 
	include "../../_sdk/sysdefs.asm"
20 dimkam 5 
;COMMANDLINE=0x0080
6 
;COMMANDLINE_sz=0x0080
7 
;PROGSTART=0x0100
11 dimkam 8 
_STRLEN=80
9 
_STRMAX=(_STRLEN-1)
10 
	org PROGSTART
708 alone 11 
        ld hl,0xe800 ;FCB1
12 
        ld de,0xe801
13 
        ld bc,0x17ff
14 
        ld [hl],0
15 
        ldir
16 
 
11 dimkam 17 
        ld e,6 ;textmode
18 
        ;OS_SETGFX
20 dimkam 19 
        ld c,CMD_SETGFX;0xf9
20 
        call BDOS;0x0005
11 dimkam 21 
	ld hl,COMMANDLINE
22 
skipword0
23 
        ld a,(hl)
24 
        inc hl
25 
        or a
26 
        jr z,cmdquit ;хёыш ярЁрьхЄЁют тююс∙х эхЄ
27 
        cp ' '
28 
        jr nz,skipword0
29 
skipwordq
30 
 
31 
	ld de,fn1.
32 
	ld (diff.fn1),de
33 
	call copyfn.
34 
	ld de,fn2.
35 
	ld (diff.fn2),de
36 
	call copyfn.
37 
 
38 
        call diff
39 
cmdquit
40 
        rst 0x00 ;QUIT
41 
 
42 
copyfn.
43 
l0.
44 
	ld a,(hl)
45 
	inc hl
46 
	ld (de),a
47 
	inc de
48 
	cp ' '+1
49 
	jr nc,l0. ;read until space or CR
50 
	xor a
51 
	dec de
52 
	ld (de),a ;'\0'
53 
	ret
54 
 
20 dimkam 55 
	include "diff.ast"
11 dimkam 56 
	include "../_sdk/lib.i"
57 
	include "../_sdk/print_os.i"
58 
	include "../_sdk/str.i"
59 
	include "../_sdk/io_os.i"
60 
 
61 
fn1.
62 
	db "nedoasm"
63 
	db 0
64 
        ds 50 ;for long filenames
65 
fn2.
66 
	db "bin.f"
67 
	db 0
68 
        ds 50 ;for long filenames
69 
 
70 
	include "diff.var"