16F628
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Ja, ik heb die al jaaaren, werkt gewoon goed. Op de site kan je ook regelmatig updaten naar nieuwere versies. Enigste nadeel (nuja groot nadeel is het niet) is dat de licentie een usb dongle is welke dus een usb poort in neemt.
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Het programma kan je van de site downloaden. Best registreer je even op het forum dan kan je bij de aller laatste versie.
http://www.protonbasic.co.uk/vbdownload ... nloadid=58
http://www.protonbasic.co.uk/vbdownload ... nloadid=58
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Deze zit bij het programma. Vanboven Help -> documents -> proton compiler manual.
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
kan iemand mij helpen?
ik wilde in basic een programmaatje schrijven, die het volgende zou moeten doen:
als ik op 1 van de drie drukknoppen druk, zou de bijbehoorende poort op n 16F877A moeten toggelen
tevens zou op n lcd (type HD44780) n tekst moeten komen te staan.
ik heb geprobeerd om er iets van te maken in picbasic, maar het werkt totaal niet
hieronder staat de listing die ik maakte, waar gaat het fout?
;-------------------------------------------------------------------------------
;**** Added by Fuse Configurator ****
; Use the Fuse Configurator plug-in to change these settings
Device = 16F877A
Config FOSC_HS, WDTE_ON, PWRTE_OFF, BOREN_ON, LVP_ON, CPD_OFF, WRT_OFF, DEBUG_OFF, CP_OFF
;**** End of Fuse Configurator Settings ****
;-------------------------------------------------------------------------------
All_Digital true
Xtal 20
Declare LCD_Lines 4
DelayMS 50
PORTA=%00000000
TRISA=%11111000
PORTC=%00000000
TRISC=%11111111
Symbol UITGANG1 = PORTA.0 ;Poort A.0 heeft nu de naam UITGANG1
Symbol UITGANG2 = PORTA.1 ;Poort A.1 heeft nu de naam UITGANG2
Symbol UITGANG3 = PORTA.2 ;Poort A.2 heeft nu de naam UITGANG3
Symbol S1 = PORTC.0 ;Poort C.0 heeft nu de naam S1
Symbol S2 = PORTC.1 ;Poort C.1 heeft nu de naam S2
Symbol S3 = PORTC.2 ;Poort C.2 heeft nu de naam S3
Symbol AntiDender = 20
Symbol Wachttijd = 1000
Cls
Print At 1, 1, "Lys i garage er "
Print At 2, 1, "Lys i waskerom er "
Print At 3, 1, "Lys i korridor er "
Print At 4, 1, "innen "
Print At 4, 11, "uten "
While 1 = 1 ;Oneindige lus
If S1 = 0 Then Toggle UITGANG1 ;S1 gesloten (=laag) VERANDER UITGANG1
If S2 = 0 Then Toggle UITGANG2 ;S2 gesloten (=laag) VERANDER UITGANG2
If S3 = 0 Then Toggle UITGANG3 ;S3 gesloten (=laag) VERANDER UITGANG3
DelayMS Wachttijd
If UITGANG1 = 0 Then Print At 1, 19, "AV"
If UITGANG1 = 1 Then Print At 1, 19, "PA"
If UITGANG2 = 0 Then Print At 2, 19, "AV"
If UITGANG2 = 1 Then Print At 2, 19, "PA"
If UITGANG3 = 0 Then Print At 3, 19, "AV"
If UITGANG3 = 1 Then Print At 3, 19, "PA"
Wend
End ;Einde programma
ik wilde in basic een programmaatje schrijven, die het volgende zou moeten doen:
als ik op 1 van de drie drukknoppen druk, zou de bijbehoorende poort op n 16F877A moeten toggelen
tevens zou op n lcd (type HD44780) n tekst moeten komen te staan.
ik heb geprobeerd om er iets van te maken in picbasic, maar het werkt totaal niet
hieronder staat de listing die ik maakte, waar gaat het fout?
;-------------------------------------------------------------------------------
;**** Added by Fuse Configurator ****
; Use the Fuse Configurator plug-in to change these settings
Device = 16F877A
Config FOSC_HS, WDTE_ON, PWRTE_OFF, BOREN_ON, LVP_ON, CPD_OFF, WRT_OFF, DEBUG_OFF, CP_OFF
;**** End of Fuse Configurator Settings ****
;-------------------------------------------------------------------------------
All_Digital true
Xtal 20
Declare LCD_Lines 4
DelayMS 50
PORTA=%00000000
TRISA=%11111000
PORTC=%00000000
TRISC=%11111111
Symbol UITGANG1 = PORTA.0 ;Poort A.0 heeft nu de naam UITGANG1
Symbol UITGANG2 = PORTA.1 ;Poort A.1 heeft nu de naam UITGANG2
Symbol UITGANG3 = PORTA.2 ;Poort A.2 heeft nu de naam UITGANG3
Symbol S1 = PORTC.0 ;Poort C.0 heeft nu de naam S1
Symbol S2 = PORTC.1 ;Poort C.1 heeft nu de naam S2
Symbol S3 = PORTC.2 ;Poort C.2 heeft nu de naam S3
Symbol AntiDender = 20
Symbol Wachttijd = 1000
Cls
Print At 1, 1, "Lys i garage er "
Print At 2, 1, "Lys i waskerom er "
Print At 3, 1, "Lys i korridor er "
Print At 4, 1, "innen "
Print At 4, 11, "uten "
While 1 = 1 ;Oneindige lus
If S1 = 0 Then Toggle UITGANG1 ;S1 gesloten (=laag) VERANDER UITGANG1
If S2 = 0 Then Toggle UITGANG2 ;S2 gesloten (=laag) VERANDER UITGANG2
If S3 = 0 Then Toggle UITGANG3 ;S3 gesloten (=laag) VERANDER UITGANG3
DelayMS Wachttijd
If UITGANG1 = 0 Then Print At 1, 19, "AV"
If UITGANG1 = 1 Then Print At 1, 19, "PA"
If UITGANG2 = 0 Then Print At 2, 19, "AV"
If UITGANG2 = 1 Then Print At 2, 19, "PA"
If UITGANG3 = 0 Then Print At 3, 19, "AV"
If UITGANG3 = 1 Then Print At 3, 19, "PA"
Wend
End ;Einde programma
ben super tevredenstynus schreef:Het programma kan je van de site downloaden. Best registreer je even op het forum dan kan je bij de aller laatste versie.
http://www.protonbasic.co.uk/vbdownload ... nloadid=58
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Je print telkens over de zelfde karakters heen op je lcd, daarom zie je wss alleen de laatste waarde staan.
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Je hebt in het programma nog niet aangegeven op welke pinnen het lcd is aangesloten. Verder kan je na cls best een kleine delay (100ms ofzo) zetten.
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Het programma kan zonder hulp niet weten op welke pinnen jij het lcd hangt.
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
In je fuses: WDTE_ON
Dit zet de watchdog aan, als je die niet elke x mS reset dan reset je microcontroller. Bij de meeste toepassingen kan je de watchdog daarom beter uitzetten.
LVP_ON
Deze kan je ook beter op off zetten, anders is er een pin (ik dacht ook op port b) die niet bruikbaar is.
Even voor de zekerheid: er hangt een pull up weerstand op de MCLR pin?
Als het nu nog niet werkt:
Kan je eens proberen een LED op een uitgang te laten knipperen? Dan weet je zeker dat de pic draait (om die reden probeer ik ook in elk ontwerp min 1 ledje te zetten).
Dit zet de watchdog aan, als je die niet elke x mS reset dan reset je microcontroller. Bij de meeste toepassingen kan je de watchdog daarom beter uitzetten.
LVP_ON
Deze kan je ook beter op off zetten, anders is er een pin (ik dacht ook op port b) die niet bruikbaar is.
Even voor de zekerheid: er hangt een pull up weerstand op de MCLR pin?
Als het nu nog niet werkt:
Kan je eens proberen een LED op een uitgang te laten knipperen? Dan weet je zeker dat de pic draait (om die reden probeer ik ook in elk ontwerp min 1 ledje te zetten).
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Kan je enkele foto's plaatsen van het printje? Is er een stabiele 5V aanwezig? Zitten de juiste condensatoren bij het kirstal? Heb je de fuses aangepast die ik aanhaalde in mijn vorige post?
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
dit is het printje, voor alleen de led om die telaten knipperen
op n 16f877a
condensators zijn 20pF de r aan pin 1 is 1k
;-------------------------------------------------------------------------------
;**** Added by Fuse Configurator ****
; Use the Fuse Configurator plug-in to change these settings
Device = 16F877A
Config FOSC_EXTRC, WDTE_OFF, PWRTE_OFF, BOREN_ON, LVP_OFF, CPD_OFF, WRT_OFF, DEBUG_OFF, CP_OFF
;**** End of Fuse Configurator Settings ****
;-------------------------------------------------------------------------------
PORTD=%00000000
TRISD=%00000000
All_Digital TRUE
Xtal 20
Opnieuw:
Toggle PORTD.1
DelayMS 500
GoTo Opnieuw
End
op n 16f877a
condensators zijn 20pF de r aan pin 1 is 1k
;-------------------------------------------------------------------------------
;**** Added by Fuse Configurator ****
; Use the Fuse Configurator plug-in to change these settings
Device = 16F877A
Config FOSC_EXTRC, WDTE_OFF, PWRTE_OFF, BOREN_ON, LVP_OFF, CPD_OFF, WRT_OFF, DEBUG_OFF, CP_OFF
;**** End of Fuse Configurator Settings ****
;-------------------------------------------------------------------------------
PORTD=%00000000
TRISD=%00000000
All_Digital TRUE
Xtal 20
Opnieuw:
Toggle PORTD.1
DelayMS 500
GoTo Opnieuw
End
- Bijlagen
-
- IMG_0515-002.jpg (29.81 KiB) 57914 keer bekeken
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Het kan zijn dat ik het niet goed zie, maar het lijkt er op of de voeding aan de bovenkant niet op de juiste pinnen zit.
Voor een 20Mhz kristal moet de fuse idd FOSC_HS zijn.
Verder mis ik ook nog 2x 100nF op de 5V vlak bij de pic.
Even voor de zekerheid: De power rails op het breadboard boven en onder zijn doorverbonden?
Voor een 20Mhz kristal moet de fuse idd FOSC_HS zijn.
Verder mis ik ook nog 2x 100nF op de 5V vlak bij de pic.
Even voor de zekerheid: De power rails op het breadboard boven en onder zijn doorverbonden?
Met vriendelijke groet,
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--
Stynus
http://www.elektronicastynus.be
--> Elektronica bouwpakketten en componenten te koop. <--