write.prg

常用的金融读写卡机ghc715 上位机程序。

DECLARE INTEGER writecard IN ghc715.dll INTEGER com,INTEGER track ,STRING data1,STRING data2
com=1

data1='0889014999999999999999'
data2=space(104)
R=writecard(com,2,data1,data2)
?r

data1=space(40)
data2='11111111444444444444444444'
R=writecard(com,3,data1,data2)
?r

clea dlls