Delay without using pause

[Tabsoft]

Malcolm,

I think you're on the right track.

something like this?

LCDCount_Max con 3000   'Set to what you want

LCDCount var word
LCDUpdate var bit

goto Main

UpdateLCD:
    'do your LCD Update stuff here
    
    return

Main:
    LCDCount = 1    'Used to display the first time        

CycleLoop:
    if LCDUpdate then
        gosub UpdateLCD
        LCDUpdate = 0
    endif
    
    ''do your normal polling stuff here
   
   '' Then do the LCD test stuff here
    LCDCount = LCDCount - 1
    if LCDCount = 0 then
        LCDCount =  LCDCount_Max
        LCDUpdate = 1
    endif 


    goto CycleLoop

[Scampy]

Cheers Ken,

I'll have a play..... failing that I'll look for an 40 x 4 LCD which might make things easier

[stanon1]

Thanks so much amgen, i want to give this a try, looks much simpler. i am trying to convert the flowchart you posted to code, i will let u know how it turns out.

i will see if my original trial will even compile at all :-), then i will make comparisms

i want to be able to write more efficient code. one nice tool that has helped me to compare execution times of various methods of coding is DARREL TAYLOR's instruction time calculation code...