首先选程序类创建一个filename.tns文件
并在文件中定义函数(库访问为LibPub)
//int,string,string
Define LibPub pinmode(pinnum,mode,pin)=
Prgm
Local str
str:="CONNECT "&mode&" "&string(pinnum)&" TO "&pin
Send str
EndPrgm
Define LibPub set_init()=
Prgm
Send "BEGIN"
DelVar iostr.str0
GetStr iostr.str0
Disp iostr.str0
EndPrgm
//int,int
Define LibPub digitalwrite(pin,data)=
Prgm
str:="SET DIGITAL.OUT "&string(pin)&" TO "&data
Send str
EndPrgm
//int,int
Define analogwrite(pin,data)=
Prgm
str:="SET ANALOG.OUT "&string(pin)&" TO "&string(data)
Send str
EndPrgm
//int,int
Define LibPub digitalread(pin,buffer)=
Prgm
str:="READ DIGITAL.IN "&string(pin)
Get x
buffer:=x
DelVar str
EndPrgm
//int,int
Define LibPub analogread(pin,buffer)=
Prgm
str:="READ ANALOG.IN "&string(pin)
Send str
Get x
buffer:=x
DelVar str
EndPrgm
放入libraries文件夹,然后就可以调用了。
在其他.tns文件中调用的语法是filename\funcname()