|
第五节 程式写作
说了不少，才真正到了写作程式的时候，运用指令就相当于写程式。只是，在运用指令前，一定要充份瞭解一应相关的课题。否则，应用指令如同和稀泥一般，堆砌出一团可以运作的成品，我个人不认为那能叫做「写程式」，充其量只是涂鸦罢了。
一、暂存器安排
因为暂存器不足，必须事先安排妥当，才能有效应用。
再以前例说明，需要安排的因素有：
1,字形大小：此项有两个变数需要安排，一是横向之始、终值; 另一是纵向之始、终值。因为在设计之初，我已经 考虑到极限值的问题，将上限定在 256点，恰在一个字元 的范围内。所以我们可以把横向始值放在暂存器BL中，终值放在BH，而纵向始值放在DL，终值放进DH。
2,笔画粗细：有四个变数值，放在CL中，并使CH为０。( 这点相当重要，为了精简和效率，最好有一个暂存器为０)
3,字码送入：在始存器SI中。
4,字形输出：在终存器DI中，根据BX及DX值求得。
二、程式规格
第二章第四节已介绍过，在此从略。
三、程式及说明
------程 式 部 份----- ----说明部份----
1: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2: ;功能：仓颉表格码绘图用。";"后，皆为注解。 ;
3: ;输入参数：DS:SI＝字码（1-2 码），＝0为终止。;
4: ; BL=X1 BH=X2 ;
5: ; DL=Y1 DH=Y2 ;
6: ; CX= 笔画粗细值。 ;
7: ;输出结果：点阵在ES:DI中。 ;
8: ;破坏暂存器：全部。 ;
9: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
10: CCODIN: ; 字码输入
11: LODSB ; 取一码以作图
12: MOV CL,AL ; 取粗细值
13: INC AX ; 调整码值
14: AND AX,001EH ; 24个有效双数值
15: PUSH BX ; 保留后用
16: PUSH DX ; 同上
17: MOV SI,AX ; AX不能间接定址
18: AND CL,07H ; 有效值
19: CALL CCODTB[SI] ; 假设CS=DS
20: POP DX
21: POP BX
22: JMP CCODIN ; 本程式主流程
23: CCOD00: ; CODe为码
24: ADD SP,6 ; 本程式为子程序
25: RET ; 码为０执行完毕
26: CCOD06: ; 06为 E,F
27: SHL CL,1 ; E,F 粗细值加倍
28: CLFT02: ; LeFT指左横
29: ADD BH,BL ; 02为输入码 A,B
30: SHR BH,1 ; 左起BH中点值
31: JMP CHOR00 ; HORizon 画横
32: CCOD08: ; 08为G,H
33: SHL CL,1
34: CLEF04: ; 04为C,D
35: ADD DH,DL
36: SHR DH,1 ; 上起DH为中点值
37: JMP CVER00 ; VERtical画直
38: CCOD0E:
39: SHL CL,1
40: CRGT0A: ; RiGhT 指右横
41: ADD BL,BH ; 0A为码I,J
42: SHR BL,1 ; BL为中点值
43: JMP CHOR00
44: CCOD10:
45: SHL CL,1
46: CCOD0C:
47: ADD DL,DH
48: SHR DL,1 ; DL为中点值
49: JMP CVER00
50: CCOD16:
51: SHL CL,1
52: CCOD12:
53: JMP CHOR00
54: CCOD18:
55: SHL CL,1
56: CCOD14:
57: JMP CVER00
58: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
59: ;以下为各码之模组程式，间接定址表 ;
60: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
61: CCODTB DW CCOD00 ; 结束
62: DW CCOD02 ; 码 A,B左横细轻
63: DW CCOD04 ; 码 C,D上直细轻
64: DW CCOD06 ; 码 E,F左横粗重
65: DW CCOD08 ; 码 G,H上直粗重
66: DW CCOD0A ; 码 I,J右横细轻
67: DW CCOD0C ; 码 K,L下直细轻
68: DW CCOD0E ; 码 M,N右横粗重
69: & [1] [2] [3] [4] 下一页 |
