; Program P13.asm
	.MODEL	small
	.STACK	100h
; gen_header: Rd=0 Wr=0
; gen_header: # of identifiers=1
	.DATA
F	DW	0
dTv0	DW	0
dTv1	DW	0
; gen_header: code segment'll start
	.CODE
ProgramStart:
	mov	ax,@data
	mov	ds,ax

Stack
1

Stack
1
2
; compiling the operator  (1*2)
*
1
2
3
constant expression, I'll optimize..
2 = 1 * 2

Stack
3
; compiling the operator  ((1*2)*3)
*
*
1
2
3
*
1
3
constant expression, I'll optimize..
6 = 2 * 3

Stack
1

Stack
1
3
; compiling the operator  (1*3)
*
1
3
constant expression, I'll optimize..
3 = 1 * 3
; compiling the operator  (((1*2)*3)=(1*3))
=
*
*
1
2
3
*
1
3
constant expression, I'll optimize..
6 = 3 ?
; compiling the operator  IF (((1*2)*3)=(1*3)) THEN 
IF 
=
*
*
1
2
3
*
1
3
:=
F
*
7
+
3
*
2
5
:=
F
100

Stack

Stack
F

Stack
F
7

Stack
F
7
3

Stack
F
7
3
2

Stack
F
7
3
2
5
; compiling the operator  (2*5)
*
2
5
#:constant expression, I'll optimize..
10 = 2 * 5
; compiling the operator  (3+(2*5))
+
3
*
2
5
constant expression, I'll optimize..
13 = 3 + 10
; compiling the operator  (7*(3+(2*5)))
*
7
+
3
*
2
5
constant expression, I'll optimize..
91 = 7 * 13
; compiling the operator  F:=(7*(3+(2*5)))
:=
F
*
7
+
3
*
2
5
:=
F
100
	mov	ax,91
	mov	F,ax

Stack

Stack
F

Stack
F
100
; compiling the operator  F:=100
:=
F
100
;:	mov	ax,100
	mov	F,ax

Stack
	mov	ah,4ch
	int	21h
	END	ProgramStart
programm P13.asm is compiled

 I'll start compiler from assembler, and linker

tasm P13 >>P13oc.htm

Turbo Assembler  Version 3.1  Copyright (c) 1988, 1992 Borland International

Assembling file:   P13.ASM
**Error** P13.ASM(14) Unknown character
Error messages:    1
Warning messages:  None
Passes:            1
Remaining memory:  458k


tlink P13+teek >>P13oc.htm

Turbo Link  Version 2.0  Copyright (c) 1987, 1988 Borland International
p13.obj : unable to open file
Compiler ended at  Sun Oct 05 17:19:32 2003