Your variable declarations are unfamiliar to me...

Code:
var h as int
var m as int
var s as int
Try:

Code:
h   var   byte
m   var   byte
s   var   byte



steve