mov al,[4000h]
mov [4001h],al ;取數,放到4001h單元
mov cl,4
shr byte ptr [4001h],cl ;右移四位,移位超過1位時,移動的位數要放到cl中
mov [4002h],al ;把原數放到4002h單元
and byte ptr [4002H],0fh ;高四位清零