Programmare i PIC in BASIC

[Alan100]

Forse ho scoperto l'acqua calda....ma a qualche principiante senza tante pretese può fare comodo.
Ho chiesto aiuto in un altro post. Dopo qualche giorno di sudore ho scoperto come un hobbysta che ha poche pretese e conosce un minimo di programmazione Basic può risolvere qualche problemino.
Mi sembra doverso ringraziare il forum postando la mia risoluzione:
Dunque:

Software free
GREAT COW BASIC
Traduce il listato Basic in file.LIST; file.ASM; file.HEX

Software free
CRIMSOM EDITOR
Si edita il programma in basic. Il file verrà salvato nella directory C:\PROGRAMM\ GCBASIC ed avrà estensione file.GCB (Cicciobello.GCB)
Sovrappore con il mouse il Cicciobello.GCB all'icona COMPILER.BAT
Dopo qualche istante vi compariranno nella directory i file:
Compiler.HEX
Compiler.LST
Compiler.ASM
Tagliate tutto ed incollatelo in una cartella avendo cura di ridenominarli come il file di lavoro:
Cicciobello.HEX
Cicciobello.TXT
Cicciobello.GBC
Cicciobello.LST
Cicciobello.ASM

Software free
PICSIMLAB_0_5_0
Aprite questo programma, caricate il file.HEX e vedrete i led associati alle porte accendersi e spegnersi, potete cioè provare a video il risultato del vostro lavoro.
Funziona solo con il PIC16F628A.

Ecco un listato di test.

#chip 16F628A, 4
#config INTOSC_OSC_NOCLKOUT, MCLRE_OFF

'Stabilisco le uscite
dir PORTB.0 out
dir PORTB.1 out
dir PORTB.2 out
dir PORTB.3 out
dir PORTB.4 out
dir PORTB.5 out
dir PORTB.6 out
dir PORTB.7 out
dir PORTA.0 out
dir PORTA.1 out
dir PORTA.2 out
dir PORTA.3 out

'Main routine
'Pin out = OFF
start: ' label
SET PORTB.0 OFF
SET PORTB.1 OFF
SET PORTB.2 OFF
SET PORTB.3 OFF
SET PORTB.4 OFF
SET PORTB.5 OFF
SET PORTB.6 OFF
SET PORTB.7 OFF
SET PORTA.0 OFF
SET PORTA.1 OFF
SET PORTA.2 OFF
SET PORTA.3 OFF

inizio:
SET PORTB.0 ON
wait 1 sec

SET PORTB.0 OFF
SET PORTB.1 ON
wait 1 sec

SET PORTB.1 OFF
SET PORTB.2 ON
wait 1 sec

SET PORTB.2 OFF
SET PORTB.3 ON
wait 1 sec

SET PORTB.3 OFF
SET PORTB.4 ON
wait 1 sec

SET PORTB.4 OFF
SET PORTB.5 ON
wait 1 sec

SET PORTB.5 OFF
SET PORTB.6 ON
wait 1 sec

SET PORTB.6 OFF
SET PORTB.7 ON
wait 1 sec

SET PORTB.7 OFF
SET PORTA.0 ON
wait 1 sec

SET PORTA.0 OFF
SET PORTA.1 ON
wait 1 sec

SET PORTA.1 OFF
SET PORTA.2 ON
wait 1 sec

SET PORTA.2 OFF
SET PORTA.3 ON
wait 1 sec
SET PORTA.3 OFF
goto inizio

CONCLUSIONE:
Non diventerete programmatori esperti ma qualche problemino lo risolverete.

[Paolino]

Forse ho scoperto l'acqua calda....ma a qualche principiante senza tante pretese può fare comodo.
Ho chiesto aiuto in un altro post. Dopo qualche giorno di sudore ho scoperto come un hobbysta che ha poche pretese e conosce un minimo di programmazione Basic può risolvere qualche problemino.
Mi sembra doverso ringraziare il forum postando la mia risoluzione:
Dunque:....

Bene, Alan100, siamo contenti che il forum ti sia stato di aiuto.
Vuoi fare un passo in più? Scrivi un articolo che resterà nel tuo blog, magari mettendo le immagini (e i link) dei programmi che hai usato, facendo un lavoro per tutti i principianti che come te si affacciano ai microcontrollori. Senza troppe pretese

Ciao.

Paolo.