16F628
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
ERROR line 12: ENDIF without a matching IF..THEN.
IF PORTA.0 = 1 Then V1
EndIF
V1:
PORTD.1 = 1 ' 1STE VERSNELLING
Volgens mij staat er toch wel n matching IF..THEN in die regel
IF PORTA.0 = 1 Then V1
EndIF
V1:
PORTD.1 = 1 ' 1STE VERSNELLING
Volgens mij staat er toch wel n matching IF..THEN in die regel
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Moderator
- Berichten: 11503
- Lid geworden op: wo 10 dec 2003, 18:36
- Locatie: nederweert. .. .. .. .. .. .. .. .. .
Hallo Jari N,
Je bent vergeten in het boekje te kijken hoe de if then else endif syntax eruit moet zien !!
Hier wat juiste voorbeelden en dan hoor ik je ochja zeggen.
Hier heb je 3 voorbeelden hoe het moet.
Je bent vergeten in het boekje te kijken hoe de if then else endif syntax eruit moet zien !!
Hier wat juiste voorbeelden en dan hoor ik je ochja zeggen.
Code: Selecteer alles
IF versn = 0 then goto V1
IF versn = 1 then
C= 5
goto V1
ENDIF
IF versn = 3 then
A = 4
goto V1
ELSE
B = 2
goto V2
ENDIF
signature ruimte te huur
Verhuurd
Verhuurd
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
Mat Janssen schreef:Hallo Jari N,
Je bent vergeten in het boekje te kijken hoe de if then else endif syntax eruit moet zien !!
Hier wat juiste voorbeelden en dan hoor ik je ochja zeggen.Hier heb je 3 voorbeelden hoe het moet.Code: Selecteer alles
IF versn = 0 then goto V1 IF versn = 1 then C= 5 goto V1 ENDIF IF versn = 3 then A = 4 goto V1 ELSE B = 2 goto V2 ENDIF
N ELSE is toch optioneel, n ENDIF niet.
IF ....THEN kan op 2 manieren,
de THEN in n IF....THEN is eigenlijk n GOTO.
Als de conditie WAAR is zal het programma gaan naar het label na de THEN.
Is de conditie fout het programma zal verder gaan met de regel na te IF...THEN.
zo las ik het volgens mij op pag 89 van het groene boekje
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Moderator
- Berichten: 11503
- Lid geworden op: wo 10 dec 2003, 18:36
- Locatie: nederweert. .. .. .. .. .. .. .. .. .
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
oke, dat scheelde n hoop,
nog n vraag waardoor ontstaat n compile timeout??
nog n vraag waardoor ontstaat n compile timeout??
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Moderator
- Berichten: 11503
- Lid geworden op: wo 10 dec 2003, 18:36
- Locatie: nederweert. .. .. .. .. .. .. .. .. .
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
oke, dank je Mat
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
@ DEVICE PIC16F877a,BOD_OFF
@ DEVICE PIC16F877a,LVP_OFF
@ DEVICE PIC16F877a,CPD_OFF
@ DEVICE PIC16F877a,PROTECT_OFF
DEFINE OSC 20
DEFINE LCD_DREG PORTB ' set LCD Data Port
DEFINE LCD_DBIT 4 ' set starting Data bit if 4 bit
DEFINE LCD_RSREG PORTB.3 ' set LCD Register Select port
DEFINE LCD_RSBIT 0 ' set LCD Register Select bit
DEFINE LCD_EREG PORTB.1 ' set LCD Enable port
DEFINE LCD_EBIT 1 ' set LCD enable bit
DEFINE LCD_BITS 4 ' set LCD bus size ( 4 bits )
DEFINE LCD_LINES 2 ' set number of lines on LCD ( 2 lines )
DEFINE LCD_COMMANDUS 2000 ' set command delay time in us
DEFINE LCD_DATAUS 50 ' set data delay time in us
TRISA %00111111
TRISE %00000111
TRISD %00000000
CMCON=7
Krijg ik n foutmelding op de 3 TRIS regels
???
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
je moet er een = tussen zetten.
TRISA = %00111111
TRISE = %00000111
TRISD = %00000000
TRISA = %00111111
TRISE = %00000111
TRISD = %00000000
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 .. .. .. .. .. .. ...
EDIT
En n syntax error na n ENDIF , wat kan daar de oorzaak van zijn??
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
hier het bestandje waar ik mee bezig ben
- Bijlagen
-
- versnellingsbak-2.txt
- (2.08 KiB) 1575 keer gedownload
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
progje iets aangepast, zaten nog enkele fouten in zag ik,
de fouten die er nu nog in zitten moet ik nog n tijdje op turen
om te zien hoe die zijn op te lossen
de fouten die er nu nog in zitten moet ik nog n tijdje op turen
om te zien hoe die zijn op te lossen
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Ik denk dat het fouten geeft omdat je na else verder hebt geschreven.
Moet dit worden:
Code: Selecteer alles
IF PORTA.0 = 1 Then
GoSub V1
Else PORTD.1 = 0
EndIF
Code: Selecteer alles
IF PORTA.0 = 1 Then
GoSub V1
Else
PORTD.1 = 0
EndIF
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 .. .. .. .. .. .. ...
OKE, dank je.
is er n stelregel voor om te bepalen hoe groot de pull-up weerstand moet zijn die je plaatst tussen mclr en de vdd??
is er n stelregel voor om te bepalen hoe groot de pull-up weerstand moet zijn die je plaatst tussen mclr en de vdd??
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
- Stynus
- Site Admin
- Berichten: 5910
- Lid geworden op: vr 16 mei 2003, 20:45
- Locatie: Overpelt (België)
- Contacteer:
Ik neem meestal 4K7. Maar alles tussen 1k en 40K moet werken meen ik.
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 .. .. .. .. .. .. ...
SORRY, maar ik blijf maar vragen.
@ DEVICE PIC16F877a,BOD_OFF
@ DEVICE PIC16F877a,LVP_OFF
@ DEVICE PIC16F877a,CPD_OFF
@ DEVICE PIC16F877a,PROTECT_OFF
DEFINE OSC 20
TRISA = %00111111
TRISE = %00000111
TRISD = %00000000
CMCON=7
UITLEZING:
IF PORTA.0 = 1 Then
PORTD.0 = 1
Else
PORTD.1 = 0
EndIF
IF PORTA.1 = 1 Then
PORTD.1 = 1
Else
PORTD.1 = 0
EndIF
GoTo UITLEZING
End
als ik port a.0 n voeding geef dmv n dip-switch
dan zal toch als het goed is port d.0 n led aan moeten sturen??
het zelfde geldt toch voor a.1 en d.1
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
daar zit idd n fout, zal het eens veranderen
en daarna weer eens proberen
EDIT:
hmmm, het heeft nix geholpen, de leds vertikken het gewoon om op te lichten
en daarna weer eens proberen
EDIT:
hmmm, het heeft nix geholpen, de leds vertikken het gewoon om op te lichten
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Berichten: 316
- Lid geworden op: wo 7 feb 2007, 22:54
- Locatie: lummen. .. .. .. .. .. .. .. .. .....
Kun je niet eens een led gewoon laten oplichten bv door PORTD.0 = 1 in je programma te zetten. Licht die niet op zijn er nog andere problamen. Soms laat ik ook eerst een led pinken op een uitgang. Ben je zeker dat voeding en kristal juist zijn, en de led natuurlijk.
Professioneel LED Temmer alléé dat hoop ik.
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
voeding is oke, heb daar n led overheen staan op breadboard.
xtal 20 MHz en 2 condensatoren van 22pF naar de 0 (VSS)
xtal op de pinnen 13 en 14 (osc1 en osc2) van pic16f877a
VDD op pin 32 en pin 11
VSS op pin 31 en pin 12
heb nu zelfs n led gezet over de doorverbonden voedinges pennen 11 en 12
doorverbonden naar 32 en 31
lange poot van de led op de + en de korte op de min
xtal 20 MHz en 2 condensatoren van 22pF naar de 0 (VSS)
xtal op de pinnen 13 en 14 (osc1 en osc2) van pic16f877a
VDD op pin 32 en pin 11
VSS op pin 31 en pin 12
heb nu zelfs n led gezet over de doorverbonden voedinges pennen 11 en 12
doorverbonden naar 32 en 31
lange poot van de led op de + en de korte op de min
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Moderator
- Berichten: 11503
- Lid geworden op: wo 10 dec 2003, 18:36
- Locatie: nederweert. .. .. .. .. .. .. .. .. .
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
heb er n weerstand van 1K tussen zitten
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Berichten: 1697
- Lid geworden op: zo 23 apr 2006, 19:01
- Locatie: Hedalen. .. Noorwegen .. .. .. .. .. .. ...
ja die led gaat vanaf pin19 (d0) naar de ground
http://pent.no/Vaer.aspx?ID=84337
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
600 MOH
tot nu toe koudste temp -29,9
De logica van Windows: klik op START om af te sluiten.
Mijn verrekijker vergroot 10x, maar bij de 11e keer werkte hij ook nog
-
- Moderator
- Berichten: 11503
- Lid geworden op: wo 10 dec 2003, 18:36
- Locatie: nederweert. .. .. .. .. .. .. .. .. .