Kawałeczek z mojego programu:
Kod: Zaznacz cały
$regfile = "m128def.dat"
$crystal = 16000000
$lib "glcdKS108.lib"
Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portd , Ce = 6 , Ce2 = 7 , Cd = 4 , Rd = 3 , Reset = 2 , Enable = 5
'no i jakiś test:
Dim A As Byte
Config Portc = Output
Do
Portc = $b00000001
For A = 1 To 8
Rotate Portc , Left
Wait 1
Next
Loop
End
O co tu chodzi?
(ZL8AVR + ZL7AVR, bascom 1.11.9.0)
Edit: Proszę zacząć używać znaczników
Kod: Zaznacz cały
.[/color]