Section 7. Installation
322
If
Leap4 = True
Then
LeapYear = True
If
Leap100 = True
Then
If
Leap400 = True
Then
LeapYear = True
Else
LeapYear = False
EndIf
EndIf
Else
LeapYear = False
EndIf
'If it is a leap year, use this section.
If
(LeapYear = True)
Then
Select Case
DOY
Case Is
< 32
Month = 1
Date = DOY
Case Is
< 61
Month = 2
Date = DOY + -31
Case Is
< 92
Month = 3
Date = DOY + -60
Case Is
< 122
Month = 4
Date = DOY + -91
Case Is
< 153
Month = 5
Date = DOY + -121
Case Is
< 183
Month = 6
Date = DOY + -152
Case Is
< 214
Month = 7
Date = DOY + -182
Case Is
< 245
Month = 8
Date = DOY + -213
Case Is
< 275
Month = 9
Date = DOY + -244
Case Is
< 306
Month = 10
Date = DOY + -274
Case Is
< 336
Month = 11
Date = DOY + -305
Case Is
< 367
Month = 12
Date = DOY + -335
EndSelect
Summary of Contents for CR3000 Micrologger
Page 2: ......
Page 3: ......
Page 4: ......
Page 6: ......
Page 30: ......
Page 34: ......
Page 36: ......
Page 96: ......
Page 485: ...Section 8 Operation 485 8 11 2 Data Display FIGURE 110 Keyboard and Display Displaying Data ...
Page 487: ...Section 8 Operation 487 FIGURE 112 CR1000KD Real Time Custom ...
Page 491: ...Section 8 Operation 491 FIGURE 116 Keyboard and Display File Edit ...
Page 496: ......
Page 502: ......
Page 564: ...Section 11 Glossary 564 FIGURE 126 Relationships of Accuracy Precision and Resolution ...
Page 566: ......
Page 594: ......
Page 598: ......
Page 600: ......
Page 602: ......
Page 624: ......
Page 642: ......
Page 643: ......