button help

[mackrackit]

First setup some variables

cnt     var byte 
TSET   var byte
TS      var byte
TLOG   var byte

Then the button VARs

TUP        var PORTD.0
TDOWN   var PORTC.3

This reads the eeprom at start up

read  TLOG, TSET 
TS = TSET

Then the code

START:
if TUP = 1 then gosub T_UP
if TDOWN = 1 then gosub T_DOWN
GOTO START

T_UP:
    for cnt = 1 to 1
    TS = TS + 1
    write TLOG, TS
    read  TLOG, TSET
    pause 100
    next
    return
    
T_DOWN:
    for cnt = 1 to 1
    TS = TS - 1
    write TLOG, TS
    read  TLOG, TSET
    pause 100
    next
    return