Darrel,

You helps me with the code so that it works.

Thank you


'************************************************* ***************
'* Name : TIMER 40 DAYS.BAS *
'* Author : [select VIEW...EDITOR OPTIONS] *
'* Notice : Copyright (c) 2005 [select VIEW...EDITOR OPTIONS] *
'* : All Rights Reserved *
'* Date : 13/08/05 *
'* Version : 1.0 *
'* Notes : *
'* : *
'************************************************* ***************
' Turn LED on. Interrupt on PORTB.0 (INTE) turns LED off.

PUSH VAR PORTB.0
LED var PORTB.1


Minutes VAR Word
Hours VAR Word
Days VAR Word


loop:
HIGH LED
GOTO LOOP


OPTION_REG = $7f


Wait40Days:
For Days = 1 to 40
For Hours = 1 to 24
For Minutes = 1 to 60
PAUSE 60000 ; 60 Seconds
Next Minutes
Next Hours
Next Days






Quote Originally Posted by Darrel Taylor
Well, if it doesn't need to be exact, you might do something like this.
Code:
Minutes   VAR  Byte
Hours     VAR  Byte
Days      VAR  Byte

Wait40Days:
    For Days = 1 to 40
        For Hours = 1 to 24
            For Minutes = 1 to 60
                PAUSE 60000         ; 60 Seconds
            Next Minutes
        Next Hours
    Next Days
<BR><BR>