git @ Cat's Eye Technologies BefOS / master src / kernel / copypaste.s
master

Tree @master (Download .tar.gz)

copypaste.s @master — raw · history · blame 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
;--- BEGIN ---------------------------------------------------;

;--- CONSTANTS -----------------------------------------------;

;--- DATA ----------------------------------------------------;

SEGMENT	.data

coybyte:	db 01

;--- BSS -----------------------------------------------------;

SEGMENT	.bss

;--- CODE ----------------------------------------------------;

SEGMENT	.text

		;;--------------------------------------------;
		;; Copy page in memory to clipboard.
		;; ax: * -> GARBAGE
		;; di: * -> GARBAGE
CopyPage:	mov	di, 0
.Copy:		mov	ax, di
		mov	al, [cbuffer + di]
		mov	[bbuffer + di], al
		inc	di
		cmp	di, 2048
		jne	.Copy
		jmp	OKLight


		;;--------------------------------------------;
		;; Copy page in memory to clipboard and erase it.
		;; ax: * -> GARBAGE
		;; di: * -> GARBAGE
CutPage:	call	EditModeOnly
		call	CopyPage
		jmp	FillPage



		;;--------------------------------------------;
		;; Copy clipboard contents to page buffer.
		;; ax: * -> GARBAGE
		;; di: * -> GARBAGE
PastePage:	call	EditModeOnly
		mov	di, 0
.Copy:		mov	ax, di
		mov	al, [bbuffer + di]
		mov	[cbuffer + di], al
		inc	di
		cmp	di, 2048
		jne	.Copy
		jmp	DisplayPage



		;;--------------------------------------------;
		;; Fill page buffer with current byte.
		;; bl: * -> GARBAGE
		;; di: * -> GARBAGE
		;; *: * -> GARBAGE
FillPage:	call	EditModeOnly
		mov	di, [bufptr]
		mov	bl, [cbuffer + di]
		mov	di, 0
.Fill:		mov	[cbuffer + di], bl
		inc	di
		cmp	di, 2000
		jne	.Fill
		jmp	DisplayPage


		;;--------------------------------------------;
		;; Copy current byte from page to clipbyte.
		;; al: * -> GARBAGE
		;; di: * -> GARBAGE
CopyByte:	mov	di, [bufptr]
		mov	al, [cbuffer + di]
		mov	[coybyte], al
		jmp	OKLight


		; PasteByte - copy byte from clipboard to page
		; al,cl,di=DESTROYED
PasteByte:	call	EditModeOnly
		mov	di, [bufptr]
		mov	al, [coybyte]
		mov	[cbuffer + di], al
		mov	cl, al
		call	ShowByte
                jmp     Advance

;--- END -----------------------------------------------------;