8x8'te gülücük ( :D ) yapmak ?

[mustafa_cmbz]

bu iş roket yapmaktan daha zor vallahi az kaldı bitsin amerikayı vurcam vallahi en son pic basic ile verilen örnekte 2-3 değişiklik yaparak değişik şekiller oluşturabildim gerisi yok allah razı olsun ilker_32 hocam yardım etti yoksa onuda yapamıcaz....kolay gele

[ilker_32]

Öğrenme amaçlı olması açısından iki link:

http://www.hobby-elec.org/e_pic6_2.htm

http://www.hobby-elec.org/e_pic6_4.htm

:lol:

[mustafa_cmbz]

porta=0 : portb=0 
trisa=0 : trisb=0 
enable_74154 var porta.4 
i var byte : lcd_reg var byte : z var byte 
porta=16 
goto loop 
loop: for z=1 to 500 
for i = 0 to 10 
call char_table 
portb=lcd_reg 
porta=i+16 
low enable_74154 : pauseus 100 : high enable_74154 
next i 
next z 
char_table: 
select case i 
case 0 
lcd_reg=$7e 
case 1 
lcd_reg=$81 
case 2 
lcd_reg=$a9 
case 3 
lcd_reg=$85 
case 4 
lcd_reg=$85 
case 5 
lcd_reg=$a9 
case 6 
lcd_reg=$81 
case 7 
lcd_reg=$7e 
end select 
return 
END

[/color]


arkadaşlar @ilker_32 hocamın verdiği bu devrede ve kodların mantığıyla 1'den fazla dot.matrix sürmek istesek bu kodların neresinde bir değişiklik yapmamız gerek ve nasıl olmalı?