standardtime.inc

[3x]

Code: Select all

|standardtime.inc
|This include will echo a user friendly standardized time instead of military time.
|usage: /call standardtime



Sub standardtime


/declare hours global
/declare newhours global
/varset newhours 0
/varset hours $time(h)




/if n @hours>12 { 
			/varset newhours $calc(@hours-12)
			/varset newhours $int(@newhours)

			/echo @newhours:$time(m):$time(s) PM
		   } ELSE {
			/echo $time(h):$time(m):$time(s) AM
			  }

/return

[Grumpy]

Code: Select all

|standardtime.inc
|This include will echo a user friendly standardized time instead of military time.
|usage: /call standardtime



Sub standardtime

	/varset hours $time(h)
	/varset daynight "AM"
	/if n @hours == 0 {
		/varset hours 12
	} else if n @hours > 12 {
		/varset hours $calc(@hours-12)
		/varset daynight "PM"
	}
	/echo @hours:$time(m):$time(s) @daynight

/return

[Guest]

Grumpy, did you even try your macro? Its full of errors.