www.elektronik.si

[toncibalonci]

Kako v Bascomu izvedem da dobim fiksno dolžino podatka. Imam števec ki z pritisko na tipko šteje navzgor,to pa bi rad pošiljal na PC. Problem je v tem da pri enicah pošlje 3 byte ,pri deseticah 4 byta in stoticah 5 bytov. Rabim pa fiksno dolžino ker druače je zmešnjava v VB.

$baud = 4800

Dim A As Byte
Dim Stevec As Byte
Stevec = 0

Do
Debounce P3.2 , 0 , Stej , Sub
Loop

Stej:
Incr Stevec
Print Stevec
Return

[mucek]

Format (string)

Poprej boš moral spremenljivko še spremeniti v string.

Druga varianta je manj elegantna;

'hiter primer za izpis do 3 cifer

If Stevec < 0 and Stevec > 10 then
Print "00" ; Stevec
elseif stevec > 9 and stevec < 100 then
Print "0" ; Stevec
elseif stevec > 99 then
Print Stevec
Endif

LP, Grega

[toncibalonci]

Mucek sem probal drugo varianto in deluje edino v prvi vrstici sem moral obrnit < in > . Kako si pa mislil tisto z string-om.