> USBLib 1.00 :  USB access routines ( =================== 2+usb_Sync:A%=?usb_D:(?usb_S 128): A%:(?usb_S 128): ZVݤusb_Err:?usb_result%=13 usb_result%?1=":":=0 "USB Error: "$usb_result%:= d1usb_Cmd(A$):usb_WrStr(A$+13):usb_RdStr: n(ݤusb_Cmd(A$):usb_Cmd(A$):=usb_Err x3usb_WrStr(A$): A%=1 A$:(?usb_S 64)=0 ?usb_D=A$,A%,1):: ?usb_RdStr:A%=usb_result%-1:A%=A%+1:?A%=usb_Rd:?A%=13: .usb_Wr(A%):(?usb_S 64)=0:?usb_D=A%: 'ݤusb_Rd:(?usb_S 128)=0:=?usb_D usb_Init usb_D=&FCF8:usb_S=&FCF9 +usb_result%=usb_result%: usb_result%:  usb_result% 63,mc% 99  P=0 1:P%=mc%:[OPT P*2 .usb_RdData 'TAY:LDA #data% 255:STA usb_RdLp+4 *LDA #data% 256:STA usb_RdLp+5:LDX #0 5.usb_RdLp:JSR usb_Rd:STA data%,X:INX:BNE usb_RdLp 'INC usb_RdLp+5:DEY:BNE usb_RdLp:RTS 4.usb_Rd:BIT usb_S:BPL usb_Rd2:BIT &FF:BPL usb_Rd .usb_Rd2:LDA usb_D:RTS ".usb_WrData ,'TAY:LDA #data% 255:STA usb_WrLp+1 6*LDA #data% 256:STA usb_WrLp+2:LDX #0 @$.usb_WrLp:LDA data%,X:JSR usb_Wr J0.usb_WrLp2:LDA usb_D:BIT usb_S:BPL usb_WrLp2 TINX:BNE usb_WrLp ^'INC usb_WrLp+2:DEY:BNE usb_WrLp:RTS h4.usb_Wr:BIT usb_S:BVC usb_Wr2:BIT &FF:BPL usb_Wr r.usb_Wr2:STA usb_D:RTS |]: :