USB på en stämpel (5 / 6 steg)
Steg 5: Macintosh testa programmet
Här är ett enkelt test program för Mac.Obs: Du måste se till att du har FTDI utsträckande installerat på din Mac.
Programmet är skrivet i verkliga grundläggande. Det enkelt sänder meddelandet som anges i editfield till USBMOD2 och använder programmet i steg 1, att meddelandet ska visas i Hyperterminal på datorn.
Programmet börjar genom att kontrollera din Mac för att se vad seriella portar har (inklusive VPC som tillhandahålls av FTDI förlängning). Om det inte finns USBMOD2, kommer att det sluta.
Källkoden för ansökan finns nedan.
Window1.Open:
Sub Open()
Dim jag som heltal, port som sträng
"Kolla vad seriella portar är tillgängliga inklusive
"VPCS gillar den som tillhandahålls av FTDI förlängning
för i = 0 till System.serialPortCount - 1
Port = System.serialport(i). Namn
om port = "USBHighSpeedSerialConverter" sedan
serial1. SerialPort = system. SerialPort(i)
gå till endFTDIcheck
slut om
Nästa
om port <> "USBHighSpeedSerialConverter" sedan
MsgBox "USBMOD2 är inte ansluten, nu sluta"
avsluta
slut om
endFTDIcheck:
End Sub
Window1.PushButton1.Action:
Sub Action()
serial1.Write editField1.text
End Sub