Hallo
nieuw hier op het forum en dus ken ik nog niet alle regeltjes maar dat went snel
het gegeven probleem
ik ben een schakel paneel aan het maken om op de club een depot te sturen wat wissels en verlichting en dergelijke aan gaat
het probleem heb ik bij mijn eigen baan niet voorgehad omdat de sturing iets anders was dan wat er nu gevraagd is geworden
door een knop in te drukken worden er rijwegen aangelegd en deze worden op een schakel paneel weer gegeven door middel van led's
een 16f628 kon dit mooi doen maar mis poes
normaal heb ik dus 16 in/uitgangen waar van porta.5 alleen ingang kan zijn en porta.4 met een pullup aan de positief moet hangen
tot zover geen probleem porta.5 is ingang van de bus waar ik mee werk en die pullup laat alleen tijdens het opstarten de leds eventjes branden en dat is een goede controle dat alles opstart
maar nu het probleem ik kan niet alle combinaties van poorten hoog maken die ik zou willen
als ik Bv porta = %11001001 doe dan gaat bij port b ook een led beginnen te knipperen BV portb. 3
terwijl die in de software toch op nul staat
tijd voor een slecht filmpje waar je ziet wat ik bedoel
YouTube: YouTube
je ziet dus dat bij B een led mee pinkt en dat is niet de bedoeling
ik heb het nu wel klaar gekregen door dat ik de combinaties zo heb aangepast dat die waar de andere poorten mee begonnen te werken niet voor komen en die poorten die mee knipperen niet te gebruiken
weer een flimpje
YouTube: demo stand schakel paneel
blijft dus waarom de andere uitgangen mee knipperen
het programma is in pic basic
deze staat nu in demo mode want ik maak geen gebruik van de PulsIn PORTA.5,1
deze staat nu uit en nu verhoogd w3 met "inc w3"
via pulsin werkt de schakeling al wel maar dat stukje met de 20 knoppen moet nog gebouwd worden en bestaat alleen op een test bord
hopelijk iemand met een verklaring van die poorten en ik heb de handleiding reeds meermaals gelezen en daar ook niets over gevonden
gr raf
nieuw hier op het forum en dus ken ik nog niet alle regeltjes maar dat went snel
het gegeven probleem
ik ben een schakel paneel aan het maken om op de club een depot te sturen wat wissels en verlichting en dergelijke aan gaat
het probleem heb ik bij mijn eigen baan niet voorgehad omdat de sturing iets anders was dan wat er nu gevraagd is geworden
door een knop in te drukken worden er rijwegen aangelegd en deze worden op een schakel paneel weer gegeven door middel van led's
een 16f628 kon dit mooi doen maar mis poes
normaal heb ik dus 16 in/uitgangen waar van porta.5 alleen ingang kan zijn en porta.4 met een pullup aan de positief moet hangen
tot zover geen probleem porta.5 is ingang van de bus waar ik mee werk en die pullup laat alleen tijdens het opstarten de leds eventjes branden en dat is een goede controle dat alles opstart
maar nu het probleem ik kan niet alle combinaties van poorten hoog maken die ik zou willen
als ik Bv porta = %11001001 doe dan gaat bij port b ook een led beginnen te knipperen BV portb. 3
terwijl die in de software toch op nul staat
tijd voor een slecht filmpje waar je ziet wat ik bedoel
YouTube: YouTube
je ziet dus dat bij B een led mee pinkt en dat is niet de bedoeling
ik heb het nu wel klaar gekregen door dat ik de combinaties zo heb aangepast dat die waar de andere poorten mee begonnen te werken niet voor komen en die poorten die mee knipperen niet te gebruiken
weer een flimpje
YouTube: demo stand schakel paneel
blijft dus waarom de andere uitgangen mee knipperen
het programma is in pic basic
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
| Device 16F628A
Config INTRC_OSC_NOCLKOUT,_ ; Interne oscilator aan
WDT_OFF,_ ; WatchDog Timer uit
PWRTE_Off,_ ; Power-up Timer Enable aan
MCLRE_OFF,_ ; Externe Master Reset Enable aan
BODEN_OFF,_ ; Brown Out Detectie Enable uit
CP_Off ; Code Protection aan
'76543210
PORTA = %00000000 ;Eerst alle PORTA uitgang registers uit (laag maken)
TRISA = %00100000
'76543210
PORTB = %00000000 ;Eerst alle PORTB uitgang registers uit (laag maken)
TRISB = %00000000
PORTA = %00000000
All_Digital TRUE ;Alle ingangen digitaal
Declare Xtal = 4
Dim w3 As Word
Dim a As Word
Symbol ingang = PORTA.5
PORTB = %11111111
PORTA = %11111111
main:
w3 = 0
While 1 = 1
'w3 = PulsIn PORTA.5,1
'onbruikbare poorten b2,b3,b4,b5,b6,b7
Inc w3
Select w3
Case 8 To 12 '1
PORTA = %00000111
PORTB = %00000000
Case 18 To 22 '2
PORTA = %00001011
PORTB = %00000000
Case 28 To 32 '3
PORTA = %11010010
PORTB = %00000001
Case 38 To 42 '4
PORTA = %11010010
PORTB = %00000010
Case 48 To 52 '5
PORTA = %01010010
PORTB = %00000000
Case 58 To 62 '6
PORTA = %01010010
PORTB = %00000000
Case 68 To 72 '7
PORTA = %00010010
PORTB = %00000000
Case 78 To 82 '8
PORTA = %00000000
PORTB = %00000000
Case 88 To 92 '9
PORTA = %00000000
PORTB = %00000000
EndSelect
DelayMS 200
Cls
If w3 > 100 Then GoTo main
Wend |
deze staat nu in demo mode want ik maak geen gebruik van de PulsIn PORTA.5,1
deze staat nu uit en nu verhoogd w3 met "inc w3"
via pulsin werkt de schakeling al wel maar dat stukje met de 20 knoppen moet nog gebouwd worden en bestaat alleen op een test bord
hopelijk iemand met een verklaring van die poorten en ik heb de handleiding reeds meermaals gelezen en daar ook niets over gevonden
gr raf