> CeefaxTime : ! ctrl% 31:X%=ctrl%:Y%=X%256 (% inBuf% &4F,outBuf% &1F:rxNum%=0 2: A%:Try%=Try%-1 0(TxErr%=&41 TxErr%=&42) Try%<1:=TxErr% : 'ݤNet_RxOpen(Stn%,Port%,Addr%,Len%) CX%?0=0:X%?1=&7F:X%?2=Port%:X%!3=Stn%:X%!5=Addr%:X%!9=Addr%+Len% A%=&11: &FFF1:=X%?0 : 2ݤNet_Rx(RxNum%):=(byte(&33,RxNum%,0)&80)<>0 : ݤNet_RxRead(RxNum%) 6X%?0=RxNum%:A%=&11: &FFF1:A%=X%!9-X%!5:X%!5=0:=A% : 1Net_RxKill(RxNum%):A%=byte(&34,RxNum%,0): : ݤNet_Err(A%):A%=0:="" ="Line jammedNet errorNot listeningNo clockBad Tx blockNo reply","011221344254",(A%-&40)*2+1,2),"110913081208",(A%-&40)*2+1,2)) &: 0@ݤNet_Stn(A%):=d0(A%256,3)+".",(A%256)<>0)+d0(A%255,3) :7ݤNet_StnFixed(A%):=d0(A%256,3)+"."+d0(A%255,3) D: N)ݤbyte(A%,X%,Y%)=((&FFF4)&FF00)256 X#ݤd0(A%,N%)="00000000"+A%,N%) b#ݤh0(A%,N%)="0000000"+~A%,N%) l Delay(A%):A%=+A%:>A%: