Hallo,
Ik ben nieuw hier en ik ben ook behoorlijk nieuw in VB. Maar je leert het pas door het gewoon te doen en te ervaren.
Voor ons schip van de duikvereniging ben ik bezig met een stuurautomaat-project waar ik wel wat sturing en richting bij kan gebruiken.
Ik zal proberen duidelijk de probleemstelling en wensen weer te geven:
Huidige situatie:
- We zijn in bezit van een nautisch navigatieprograma op de PC (WaypointsGPS) wat de mogelijkheid heeft een externe stuurautomaatcomputer aan te sturen.
- Op dit moment is er geen stuurautomaat aanwezig.
- De GPS-info voor het navigatieprogramma wordt geleverd door een SirfIII USB-GPS ontvanger.
Wat we willen:
- Electromotor, verbonden met het stuurwiel, aansluiten op de PC.
- Een VB-programma stuurt de electromotor aan op basis van de info uit het navigatieprogramma.
Wat doet het navigatieprogramma WGPS:
- In het programma zet je een route uit doormiddel van opeenvolgende waypoints. Wanneer deze route actief gemaakt wordt, stuurt het navigatieprogramma een NMEA-signaal naar de seriële com-poort, zodat hier weer een externe stuurautomaatcomputer op aangesloten kan worden.
- In deze string staat de zijdelingse afstand in meters van het schip ten opzichte van de actieve routelijn (XTE) en stuurinstructies om weer op de routelijn terecht te komen: steer left, steer right.
Hoe ik het in denk te gaan richten met VB:
- De NMEA-info onderscheppen die naar de com-poort gestuurd wordt door het navigatieprogramma
- De XTE laten zien. De instructie "steer left" of "steer right" laten zien dmv pijlen.
Variabelen, in te stellen door eindgebruiker:
- Demping (timer): Onderstaande events 1 keer per AA seconden uitvoeren
- Als XTE groter is dan XX meter dan electromotor BB seconden rechtsom laten draaien
- Als XTE kleiner is dan -XX meter dan electromotor BB seconden linksom laten draaien
Via de parallele poort zal dan een relais ingeschakeld worden wat de electromotor stuurt.
Is mijn opzet de juiste, of zie ik een aantal belangrijke zaken over het hoofd?
Groet,
Kees
Ik ben nieuw hier en ik ben ook behoorlijk nieuw in VB. Maar je leert het pas door het gewoon te doen en te ervaren.
Voor ons schip van de duikvereniging ben ik bezig met een stuurautomaat-project waar ik wel wat sturing en richting bij kan gebruiken.
Ik zal proberen duidelijk de probleemstelling en wensen weer te geven:
Huidige situatie:
- We zijn in bezit van een nautisch navigatieprograma op de PC (WaypointsGPS) wat de mogelijkheid heeft een externe stuurautomaatcomputer aan te sturen.
- Op dit moment is er geen stuurautomaat aanwezig.
- De GPS-info voor het navigatieprogramma wordt geleverd door een SirfIII USB-GPS ontvanger.
Wat we willen:
- Electromotor, verbonden met het stuurwiel, aansluiten op de PC.
- Een VB-programma stuurt de electromotor aan op basis van de info uit het navigatieprogramma.
Wat doet het navigatieprogramma WGPS:
- In het programma zet je een route uit doormiddel van opeenvolgende waypoints. Wanneer deze route actief gemaakt wordt, stuurt het navigatieprogramma een NMEA-signaal naar de seriële com-poort, zodat hier weer een externe stuurautomaatcomputer op aangesloten kan worden.
- In deze string staat de zijdelingse afstand in meters van het schip ten opzichte van de actieve routelijn (XTE) en stuurinstructies om weer op de routelijn terecht te komen: steer left, steer right.
Hoe ik het in denk te gaan richten met VB:
- De NMEA-info onderscheppen die naar de com-poort gestuurd wordt door het navigatieprogramma
- De XTE laten zien. De instructie "steer left" of "steer right" laten zien dmv pijlen.
Variabelen, in te stellen door eindgebruiker:
- Demping (timer): Onderstaande events 1 keer per AA seconden uitvoeren
- Als XTE groter is dan XX meter dan electromotor BB seconden rechtsom laten draaien
- Als XTE kleiner is dan -XX meter dan electromotor BB seconden linksom laten draaien
Via de parallele poort zal dan een relais ingeschakeld worden wat de electromotor stuurt.
Is mijn opzet de juiste, of zie ik een aantal belangrijke zaken over het hoofd?
Groet,
Kees
