AVR - Timer+Input

[Cseh Robert]

szemre jo
szimulatorban jo
ha  az input ki van remezve akkor a port a novekszik ahogy kell?
KJ


Kiproba eredmenye:
Persze. Led sor szepen lepeget. Sot ha az input ott van a szoveg 
megjelenik, varja a beirandot (kozben persze lepeget ugy, ahogy kell).
De az inputnal nem fogad el semmit.
Hiaba irom be a szamot (echoval vissza sem adja).
Ha kiremelem ugy is megy, szoval minden szep minden jo, csak nem 
akar adatot elfogadni. Ha az input kiirasa utan, de az IT lefutasa elott 
irok be adatot, akkor megy. De nem lehet erre blazirozni:( Nem lehetek 
gyorsgepelo muvesz:)

Robi



----- Original Message ----- 
From: <r-cseh at freemail.hu>
> Sziasztok!
>
> AVR-l tanulgatok, belefutottam egy problemaba.
>
> Fut a hatterben egy Timer szamlalo, es az input alatt vegrehajtodik 
egy 
> ITrutin, de nem fogad utana az input adatot:(. Mit rontottam el?
>
> Mellekelem a kodreszletet.
> A holmi Mega16-ban fut.
>
> Mit rontok el? Mi nem jo?
>
> Robi
>
>
>
> $regfile = "m16def.dat"
> $crystal = 14745600
> $baud = 9600
> $lib "mcsbyteint.lbx"
> Config Porta = Output
>
>
> Config Timer1 = Timer , Prescale = 64
> On Timer1 Isr_timer1                                        ' ISR for 
> timer1.
>
> Timer1 = 500                                                ' Interrupt 
> kb. 1/sec
> Enable Interrupts
> Enable Timer1
> Start Timer1
> Dim I As Byte
>
> I = 2
> Do
>
> Print I
> Input "valami?" , I
>
> Loop
>
>
>
> Isr_timer1:
> Timer1 = 500
> I = I + 1
> Porta = I
> Return
>
> End
>