gc db 18H，31H，05H，06H，09H，0AH，0CH，11H，12H，14H；定義格雷碼表
結果db？,?,"$";存儲轉換後的格雷碼。
數據結束
代碼段
假設ds:數據，cs:代碼
開始:移動軸，數據
移動ds，ax
lea bx，gc
下壹個:mov啊，1；從鍵盤輸入壹個字符。
int 21h；
化學機械拋光鋁，30小時；判斷輸入的字符是否在0到9之間，如果不是，重新輸入。
jb下壹個
化學機械拋光鋁，39h
ja下壹個
sub al，30h如果是，將其ASCII碼轉換成數字0 ~ 9。
xlat查表得到輸入數字的格雷碼。
mov ah，al
mov cl，4
噓啊，cl
加啊，30h
mov結果+1，啊；存儲在結果單元中。
還有al，0fh
添加鋁，30h
移動結果，al
lea dx，結果；在屏幕上輸出轉換後的格雷碼。
mov ah，9
int 21h
mov ax，4c00h程序結束
int 21h
代碼結束
結束開始