MarKoZaKKa
| Inviato il: 3/5/2013,06:38
|
ma per invertire una valore binario, non basta lo xor? nella domotica usavo quello...
--------------- Tecnico qualificato in clownerie
Windsurfer a tempo perso
Slalomaro senza speranze
...
| |
| | alessio287
| Inviato il: 3/5/2013,07:36
|
Ciao Marko,
sono ancora a tocchi...
diciamo che nel mio ragionamento sono partito dal fatto che il valore base del pulsante è 1 (+5v)
IF (PULS = 1) AND (STATO = 1) THEN STATO = 1 IF (PULS = 1) AND (STATO = 0) THEN STATO = 0 IF (PULS = 0) AND (STATO = 1) THEN STATO = 0 IF (PULS = 0) AND (STATO = 0) THEN STATO = 1
con XOR non sono riuscito a trovare una soluzione visto che fissato un valore ad 1 l'altro ha come risultato l'inversione e questo non mi torna...
Bye Alessio287
| | | | alessio287
| Inviato il: 3/5/2013,09:55
|
Ciao,
ho implementato il pulsante per la retroill del LCD.
Ho xò un comportamento strano del ritorno pulsante... non è stabile o addirittura rimane a 0 una volta che lo premo.
Ho usato il bit7 in maniera diretta (bit7 --- puls -- gnd)
What's?
Bye Alessio287
| | | | NonSoloBolleDiA...
| Inviato il: 3/5/2013,10:20
|
Perdonami...fai così, associ una variabile allo stato del DISPLAY...poi se premi il pulsante inverti tale stato...cioè:
SUB INIT ... ... LUCE_DYSPLAY=1 ' il display parte acceso. CALL AGGIORNA_LUCE_DISPLAY
... ... SUBEND
SUB AGGIORNA_LUCE_DISPLAY OUTBIT(BIT_DISPLAY)=LUCE_DISPLAY SUBEND
Quando viene premuto il pulsante
SUB PREMUTO_PULSANTE_ACCENSIONE_DISPLAY LUCE_DISPLAY= !LUCE_DISPLAY CALL AGGIORNA_LUCE_DISPLAY WAITMS 150 SUBEND
In questo modo crei un bistabile che si accende/spegne ogni volta che premi il pulsante.
--------------- Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripet...
| | | | NonSoloBolleDiA...
| Inviato il: 3/5/2013,13:53
|
Pronta la versione full CALL, full COMMAND compresi comandi/call su ELSE.
CODICE IF CALL CIAO(3)=2 THEN CALL PLUTO(4) ELSE CALL PLUTO(5)
IF CALL CIAO(3)=2 THEN CALL PLUTO(4) ELSE A=5
IF CALL CIAO(3)=2 THEN A=3 ELSE A=5
IF BIT_ALZATO THEN A=3 ELSE A=5
IF CALL PAPERINO THEN CALL PAPERINO ELSE CALL PAPERINO
Chi si propone per un test?
--------------- Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripet...
| | | | alessio287
| Inviato il: 3/5/2013,14:03
|
Qlcn sfotte?
| | | | NonSoloBolleDiA...
| Inviato il: 3/5/2013,14:54
|
Eccola PPTEA ADVANCED 4.1.9e
FILE=PPTEACompiler4.1.9e.rar NUM=2321 SCARICATO=13
--------------- Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripet...
| | | | Luca450Mhz
| Inviato il: 3/5/2013,17:18
|
Credo che a questo punto ho bruciato il PIC.. su breadboard, componenti nuovi, il PPTEA non da segni di vita... Ma il fatto che io sia riuscito a caricare il firmware non è un segno che il PIC funziona, e non è bruciato?
--------------- Pannelli: 6975 Wp (poli e mono). Inverter UPS PSW7 6kW 48V toroidale con switch comandato dal mio si...
| | | | alessio287
| Inviato il: 3/5/2013,17:37
|
Ciao Bolle,
IF INPBIT(BIT_INP_LUCE_LCD) THEN SUBEXIT ELSE CALL PREMUTO_PULSANTE_ACCENSIONE_DISPLAY
Fase 2: Load Program in Memory mysolar_2_15.pea PRECOMPILING ERROR:IF INPBIT(BIT_INP_LUCE_LCD) THEN :ENDSUBGESTIONE_LUCE ELSE CALL PREMUTO_PULSANTE_ACCENSIONE_DISPLAY SINTAX ERROR CALL!
Non so se questo era ammissibile e cmq te lo segnalo
XLuca: scusa ma non so rispondere al tuo quesito, bisogna aspettare gli ingegneri...
Bye Alessio287
| | | | NonSoloBolleDiA...
| Inviato il: 3/5/2013,18:19
|
CITAZIONE (Luca450Mhz @ 3/5/2013, 18:18) Credo che a questo punto ho bruciato il PIC.. su breadboard, componenti nuovi, il PPTEA non da segni di vita... Ma il fatto che io sia riuscito a caricare il firmware non è un segno che il PIC funziona, e non è bruciato? Il fatto che carichi il firmware non indica il fatto che non sia bruciato.
CITAZIONE (alessio287 @ 3/5/2013, 18:37) Non so se questo era ammissibile e cmq te lo segnalo Si, DEVE essere ammissibile...dammi qualche minuto...
--------------- Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripet...
| | | | NonSoloBolleDiA...
| Inviato il: 3/5/2013,21:28
|
Eccola PPTEA ADVANCED 4.1.9f
--------------- Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripet...
| | | | MarKoZaKKa
| Inviato il: 5/5/2013,08:34
|
CITAZIONE (alessio287 @ 3/5/2013, 08:36) sono ancora a tocchi...
IF (PULS = 1) AND (STATO = 1) THEN STATO = 1 IF (PULS = 1) AND (STATO = 0) THEN STATO = 0 IF (PULS = 0) AND (STATO = 1) THEN STATO = 0 IF (PULS = 0) AND (STATO = 0) THEN STATO = 1 STATO=!(PULS XOR STATO)
Nega lo xor...
--------------- Tecnico qualificato in clownerie
Windsurfer a tempo perso
Slalomaro senza speranze
...
| | | | NonSoloBolleDiA...
| Inviato il: 6/5/2013,17:46
|
Consegna ufficiale PPTEA ADVANCED 4.2.0
LINK Bollle
--------------- Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripet...
| | | | alessio287
| Inviato il: 6/5/2013,20:00
|
Ciao,
scaricata... e grazie dell'onore
Bye Alessio287
| | | | NonSoloBolleDiA...
| Inviato il: 6/5/2013,20:02
|
Era il minimo....ma se trovi un bug ora...mi mangio il pesce che hai attaccato all'asta...
--------------- Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripet...
| |
| | |
|
Versione Completa!
|
|
|
|
|
|
|
|
|
|
|
|
|
|