journal of all scince V.1. NO.1 | Page 48

:local (< " @ +_H _ ?% 8 _ n7-_ local 8 _ Z M @ . % @I label % %8 K B %8U% 2 M, % 6 .* % $ „ label % % I 8 = label I "%8U % ,. B% %8U% 2 : fact macro x,y local L mov ax,1 mov cx,x L:mul cx dec cx jnz L mov y,ax endm seg1 segment fact 5,bx fact 7,dx seg1 ends G duplicate declaration of: L (10) .8 AU # F ' 10 A ] % ,Z (< " ,Z ( imul idiv _C _ _T. _ \ ] . " C mov al,FFH mov bl,2 imul bl - % B% . 8 . J. mov al,FFH mov bl,2 mul bl J % = ? 8X / ` . 8 "%8U ? J div mul %8. 8 mov ax,8000H mov dx,0 mov bx,2 div bx ‚^3 % # A B% ( : & 01/ !K " K 2 " div mul ?% 8 % $ I % 8 g d J mov ax,8000H mov dx,0 mov bx,2 idiv bx : $ : $ : $ : $ 15 14 ax=-1*2=-2=FFFEH ax=255*2=510=01FEH ax= 2 /2=2 =4000H ax= -215/2=-214=C000H dx=0 dx=0 : \ " Q : (< " dest . % $ and * * % : and % and dest,source 1 and 1=1 0 and x =0 . dest or * % $ * % % : or or dest,source 0 or 0=0 1 or x =1 dest . xor dest,source 0 xor 0=1 1 xor 1 =0 0 xor 1=1 % $ xor * * % % : xor 1 xor 0=1 . mov ax,0FE0H I 1 + , % dest : not