1		cpu	80196
2
3                include reg96
4
5ax		equ	20h
6al		equ	ax
7ah		equ	ax+1
8eax		equ	ax
9bx		equ	24h
10bl		equ	bx
11bh		equ	bx+1
12ebx		equ	bx
13cx		equ	28h
14cl		equ	cx
15ch		equ	cx+1
16ecx		equ	cx
17dx		equ	2ch
18dl		equ	dx
19dh		equ	dx+1
20edx		equ	dx
21
22		CLRC
23		CLRVT
24		DI
25		EI
26		NOP
27		POPF
28		PUSHF
29		RET
30		RSC
31		SETC
32		TRAP
33                PUSHA
34                POPA
35                EPTS
36                DPTS
37
38targ:
39		JC 	targ
40		JE	targ
41		JGE	targ
42		JGT	targ
43		JH	targ
44		JLE	targ
45		JLT	targ
46		JNC	targ
47		JNE	targ
48		JNH	targ
49		JNST	targ
50		JNV	targ
51		JNVT	targ
52		JST	targ
53		JV	targ
54		JVT	targ
55
56                bmov	eax,cx
57                bmovi	eax,cx
58
59		add	ax,bx
60		add	ax,2000h
61		add	ax,[bx]
62		add	ax,[bx]+
63		add	ax,2[bx]
64		add	ax,-15[bx]
65		add	ax,700[bx]
66		add	ax,-300[bx]
67		add	ax,#1234h
68
69		add	ax,cx,bx
70		add	ax,cx,2000h
71		add	ax,cx,[bx]
72		add	ax,cx,[bx]+
73		add	ax,cx,2[bx]
74		add	ax,cx,-15[bx]
75		add	ax,cx,700[bx]
76		add	ax,cx,-300[bx]
77		add	ax,cx,#1234h
78
79		addb	al,bl
80		addb	al,2000h
81		addb	al,[bx]
82		addb	al,[bx]+
83		addb	al,2[bx]
84		addb	al,-15[bx]
85		addb	al,700[bx]
86		addb	al,-300[bx]
87		addb	al,#12h
88
89		addb	al,cl,bl
90		addb	al,cl,2000h
91		addb	al,cl,[bx]
92		addb	al,cl,[bx]+
93		addb	al,cl,2[bx]
94		addb	al,cl,-15[bx]
95		addb	al,cl,700[bx]
96		addb	al,cl,-300[bx]
97		addb	al,cl,#12h
98
99		and	dx,300h
100		mulu	eax,bx,cx
101		mulb	ax,cl,ch
102		subb	cl,#5
103
104		addc	ax,bx
105		addcb	al,[bx]
106		cmp	ax,[bx]+
107		cmpb	al,2[bx]
108                cmpl	ecx,edx
109		div	eax,-15[bx]
110		divb	ax,200[bx]
111		divu	eax,-300[bx]
112		divub	ax,200
113		ld	ax,#2345h
114		ldb	al,#16
115		st	ax,bx
116		stb	al,[bx]
117		subc	ax,[bx]+
118		subcb	al,2[bx]
119		xor	ax,-15[bx]
120		xorb	al,200[bx]
121
122		push	ax
123		push	[bx]
124		push	#1234h
125		pop	2000h
126		pop	10[cx]
127
128                xch	ax,bx
129                xch	ax,[bx]
130                xch	ax,10[bx]
131                xch	ax,-150[bx]
132                xch	ax,[bx]+
133                xch	ax,2000h
134                xchb	bl,al
135                xchb	[bx],al
136                xchb	10[bx],al
137                xchb	-150[bx],al
138                xchb	[bx]+,al
139                xchb	2000h,al
140
141		clr	ax
142		clrb	al
143		dec	bx
144		decb	bh
145		ext	eax
146		extb	ax
147		inc	cx
148		incb	cl
149		neg	dx
150		negb	dh
151		not	ax
152		notb	al
153
154		scall	targ
155		expect	20
156		 lcall	 targ
157		endexpect
158		call	targ
159
160		sjmp	targ
161		expect	20
162		 ljmp	 targ
163		endexpect
164		br	targ
165		br	[dx]
166
167		djnz	cl,$
168                djnzw	cx,$
169
170		jbc	dh,3,$
171		jbs	al,1,$
172
173                tijmp	bx,ax,#127
174
175		ldbse	ax,#-1
176		ldbze	cx,[bx]+
177
178		norml	eax,cl
179
180		shl	ax,#5
181		shl	ax,cl
182		shlb	al,#6
183		shlb	al,cl
184		shll	eax,#7
185		shll	eax,cl
186		shr	ax,#5
187		shr	ax,cl
188		shrb	al,#6
189		shrb	al,cl
190		shrl	eax,#7
191		shrl	eax,cl
192		shra	ax,#5
193		shra	ax,cl
194		shrab	al,#6
195		shrab	al,cl
196		shral	eax,#7
197		shral	eax,cl
198
199		skip	dl
200
201                idlpd	#2
202
203
204                ldb	al,100h		; lang
205                ldb	al,0c0h		; kurz
206                ldb	al,000h		; kurz
207                ldb	al,140h		; lang
208                ldb     al,[0c0h]
209                ldb     al,[000h]
210
211                assume	wsr:24h		; =100h..13fh auf 0c0h..0ffh
212
213                ldb	al,100h		; jetzt kurz
214                ldb	al,0c0h		; jetzt lang
215                ldb	al,000h		; immmer noch kurz
216                ldb	al,140h		; immer noch lang
217                ldb     al,[100h]
218                ldb     al,[000h]
219
220                bne     2000h
221                bc      2000h
222