0060:0000 B80000            mov     ax, 0000
0060:0003 8ED8              mov     ds, ax
0060:0005 668B1E4C00        mov     ebx, [004C]
0060:000A 0E                push    cs
0060:000B 680010            push    word 1000
0060:000E 662E891E0020      mov     [cs:2000], ebx
0060:0014 668F064C00        pop     dword [004C]
0060:0019 90                nop
0060:001A CC                int3
0060:001B 90                nop

0060:1000 80FC08            cmp     ah, 08
0060:1003 751B              jnz     1020
0060:1005 9C                pushf
0060:1006 2EFF1E0020        call    far [cs:2000]
0060:100B 7203              jb      1010
0060:100D B10F              mov     cl, 0F
0060:100F 90                nop
0060:1010 55                push    bp
0060:1011 89E5              mov     bp, sp
0060:1013 D05E06            rcr     byte [bp+06], 1
0060:1016 D04606            rol     byte [bp+06], 1
0060:1019 5D                pop     bp
0060:101A CF                iret

0060:1020 2EFF2E0020        jmp     far [cs:2000]