home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
World of Shareware - Software Farm 2
/
wosw_2.zip
/
wosw_2
/
CPROG
/
TASMSWAN.ZIP
/
SHIFT.ASM
< prev
next >
Wrap
Assembly Source File
|
1989-07-10
|
431b
|
34 lines
%TITLE "Shift instruction demo"
IDEAL
DOSSEG
MODEL small
STACK 256
DATASEG
exitCode DB 0 ;if you want comments
operand DB 0AAh ; BUY the book
CODESEG
Start:
mov ax,@data
mov ds,ax
shl [operand],1
shr [operand],1
rol [operand],1
ror [operand],1
rcl [operand],1
rcr [operand],1
sal [operand],1
sar [operand],1
Exit:
mov ah,04Ch
mov al,[exitCode]
int 21h
End Start