New Zealand
Asked — Edited

Stating The Time

Skip to comments   Jump to end

Tidied up the time routine a bit to include AM and PM and some other stuff...

Enjoy!

#________________________________________________

Print ("+---------------------+") Print ("| Announcing the time |") Print ("+---------------------+")

say("The time is ")

IF ($hour>12) $hour_word=$hour-12 $hour_word+":" ENDIF IF ($Minute = 0) Say ("$hour") goto (AM_PM) ELSEIF ($minute 1 and $hour<12) say ("a.m.") ELSE say ("p.m.") ENDIF

halt()

Jump to end

ARC Pro

Upgrade to ARC Pro

Get access to the latest features and updates before they're released. You'll have everything that's needed to unleash your robot's potential!

United Kingdom
#1  

Awesome, this should help Josh out with his project too.

New Zealand
#2  

Made a few mods so this can be called over and over again without getting confused

------|

Time |

------|

:Initialise $hour_word=$hour say("The time is " )

IF ($hour>12) $hour_word=$hour-12 Elseif ($hour="0" ) $hour_word=12 ENDIF

$hour_word+":"

IF ($Minute = 0) Say ("$hour" ) goto (AM_PM) ELSEIF ($minute <10) Say ("$minute minutes past $hour_word" ) ELSE say("$hour_word $minute" ) goto(AM_PM) ENDIF halt()

:AM_PM IF ($hour<12) say ("a.m." ) ELSE say ("p.m." ) ENDIF

halt()

Canada
#3  

Much appreciated Tameion for all your scripts! They are great as is and also for modify/adapting/learning to unique circumstances!

Netherlands
#4  

i think i'll use this as a wake up alarm for my robot! thank you for sharing.:D

Canada
#5  

not to mention its beeroclock time!

PRO
USA
#6  

@Tameion

When trying to run this script I get a error here?

$hour_word+":"

What am I doing wrong?

Herr

United Kingdom
#7  

Try


say(&quot;The time is &quot; )

IF ($hour&gt;12)
  $hour_word=$hour-12
ELSE
  $hour_word=$hour
ENDIF

IF ($hour_word=0)
  $hour_word=12
ENDIF

IF ($Minute = 0)
  Say (&quot;$hour_word&quot; )
ELSEIF ($minute &lt;10)
  Say (&quot;$minute minutes past $hour_word&quot; )
ELSE
  say(&quot;$hour_word $minute&quot; )
ENDIF

IF ($hour&lt;12)
  say (&quot;a.m.&quot; )
ELSE
  say (&quot;p.m.&quot; )
ENDIF

Removed some redundant code and fixed a couple of errors. To be honest I'm not sure what the $hour_word+":" was for, it didn't look like it was needed.

Hope you don't mind my doing that @tameion

PRO
USA
#8  

@Rich

Sorry but recieved an error too.

Syntax Error on line 12. This command requires 0 parameters. You passed one parameters.

I believe line 12 here is

Else say("$hour_word $minute")

Login to post a comment