the-infocom-files / amfv

A Mind Forever Voyaging
5 stars 2 forks source link

Last WNNF news of the day is slightly incorrect if you use the "WAIT" command #69

Open eriktorbjorn opened 4 years ago

eriktorbjorn commented 4 years ago

The last piece of news from the WNNF each day is printed by WEATHER-SHARE:

         <TELL
". And that's today's forecast from Wally the Weatherman! Bob?\" The camera
pans back to the anchorman. \"We're coming up on ">
         <COND (,CLOCK-WAIT
                <TIME-PRINT ,TIME>)
               (T
                <TIME-PRINT <+ ,TIME 1>>)>
         <COND (<EQUAL? ,TIME 1439>
                <TELL
", so stay tuned for all of the newest news of the new day">)>
         <TELL ".\" A moment later, a deep gong sounds." CR>>

Apparently it has to adjust the time depending on if you used "WAIT" or not, but it doesn't adjust the time when telling you about the new day. So you can get either this:

>WAIT
Time passes...

"Here are tomorrow's high temperatures, in Celsius, for the major metros: New
York City, 2 degrees. Washington, 4 degrees. Miami 21 and Chicago -6. It'll be
around -2 in Toronto. We'll see -6 degrees in Ottawa and 0 in Montreal. Los
Angeles, 23 and San Juan, around 28. And that's today's forecast from Wally the
Weatherman! Bob?" The camera pans back to the anchorman. "We're coming up on
12:00am." A moment later, a deep gong sounds.

Or something like this:

>WATCH NEWS
Little else to do here.

"Here are tomorrow's high temperatures, in Celsius, for the major metros: New
York City, 2 degrees. Washington, 4 degrees. Miami 21 and Chicago -6. It'll be
around -2 in Toronto. We'll see -6 degrees in Ottawa and 0 in Montreal. Los
Angeles, 23 and San Juan, around 28. And that's today's forecast from Wally the
Weatherman! Bob?" The camera pans back to the anchorman. "We're coming up on
12:00am, so stay tuned for all of the newest news of the new day." A moment
later, a deep gong sounds.

In both cases it's 12:00am, but in the first case it didn't tell oyu to stay tuned for all the newest news of the new day.

I guess one quick-and-dirty fix would be to change the test to <EQUAL? ,TIME 1439 1440>, or perhaps just <G? ,TIME 1438>.