No Subject
Don Pomplun
Posts: 116
[noparse][[/noparse]code]pub start | TTdata
ParamNum := 0
bytefill ( @Buf, 0, 5 )
PoundsReqd := 0
ParamLen := 0
cognew ( Paw(@TTdata), @PawStack)
text.start(0) ' crt on pins 0-2
' TTdata := cognew ( X10.Start( @X10Head, BufLen ), @dummyStack)
' text.str ( string("new cog="))
' text.dec(TTdata)
' text.out(13)
ParamNum := 0
bytefill ( @Buf, 0, 5 )
PoundsReqd := 0
ParamLen := 0
cognew ( Paw(@TTdata), @PawStack)
text.start(0) ' crt on pins 0-2
' TTdata := cognew ( X10.Start( @X10Head, BufLen ), @dummyStack)
' text.str ( string("new cog="))
' text.dec(TTdata)
' text.out(13)