grip 调用子函数难题【怎么才能 参数 是混合行的 】

1113824550

$$ 由于 字库内容太大 我想分开来做
$$ 发现 子程序不能 编译生成 *.gri
! F, I) i( M7 s2 k. K) ~; M' ~" n5 Z3 n$$ 如下 部分代码
4 r9 R: S6 |' Q0 S* }$$ 是不是 grip调用子函数 参数不能 是混合行的 [怎么才能做到  混合行的]
$$ CALL/'SUB1',SF,JG,HG,zf,gg1,gg2
$$ zf 是 字符串
$ T5 u' G- T9 {+ ^1 ?, q$$ SF,JG,HG,gg1,gg2 是数字
+ @' B! z+ e- `+ }% ?' y/ R
ENTITY/obj(99),ln(999),p(9999),ol(3),HI(2)
STRING/zf(132),zm(5),zmm(5)
NUMBER/mat1(12),mat2(12),d(6),dzb(3)
% C7 y+ t1 z6 e6 v( c1 y$$ 调用VB  
XSPAWN/'C:\MeiLei_ug_WG\MeiLei_UG_WG\刻字.exe',IFERR,END:
4 w' k0 J+ T8 }7 q! E' b7 DFETCH/TXT,1,'C:\MeiLei_UG_WG\MeiLei_UG_WG\111222333444555666.ini',IFERR,END:
RESET/1
READ/1,SF   $$ 大小
% y2 F0 D( q4 {READ/1,JG   $$ 间隔
READ/1,HG   $$ 高度
- C* ~" O$ h. i( D& i& `READ/1,zf   $$ 字符串
3 O) W+ z3 Y, c' F. sREAD/1,gg1  $$ 字体类型(宋体、黑体)
READ/1,gg2  $$ 类型(常规、斜体)
, v) w! e* P  t3 [' w6 j: O2 ?4 hFTERM/TXT,1
4 J8 Z$ Q0 {! I5 z7 D1 O- I( {$$ 调用子函数
6 Y. u) V, f# l: JCALL/'SUB1',SF,JG,HG,zf,gg1,gg2

( Q! W# `0 |  P& }/ u' ]END:
6 I- @" j1 R3 Z& x7 g  W6 AHALT
6 f0 {- F/ D7 m- u
$$ 子程序 宋体字库 常规字体
1 C+ d6 g) I  `8 G8 P! M( \  ]  QPROC/SF,JG,HG,zf,gg1,gg2
ENTITY/obj(99),ln(999),p(9999),ol(3),HI(2)
STRING/zf(132),zm(5),zmm(5)
$ J0 R9 r3 b6 k7 lNUMBER/mat1(12),mat2(12),d(6),dzb(3)
# _, x: _: v( @3 N" ?0 Cprint/zf
RETURN

one6363

改成 STRING/zf，zm，zmm试一试