Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing parserm.h

DrawStatusLine (lines 4373-4410)

4373  #ENDIF;
4374   
4375  ! ----------------------------------------------------------------------------
4376  !  Except in Version 3, the DrawStatusLine routine does just that: this is
4377  !  provided explicitly so that it can be Replace'd to change the style, and
4378  !  as written it emulates the ordinary Standard game status line, which is
4379  !  drawn in hardware
4380  ! ----------------------------------------------------------------------------
4381   
4382  #IFV5;
4383  [ DrawStatusLine width posa posb;
4384     @split_window 1; @set_window 1; @set_cursor 1 1; style reverse;
4385     width = 0->33; posa = width-26; posb = width-13;
4386     spaces width;
4387     @set_cursor 1 2;
4388     if (location == thedark) print (name) location;
4389     else
4390     {   FindVisibilityLevels();
4391         if (visibility_ceiling == location)
4392             print (name) location;
4393         else print (The) visibility_ceiling;
4394     }
4395     if ((0->1)&2 == 0)
4396     {   if (width > 76)
4397         {   @set_cursor 1 posa; print (string) SCORE__TX, sline1;
4398             @set_cursor 1 posb; print (string) MOVES__TX, sline2;
4399         }
4400         if (width > 63 && width <= 76)
4401         {   @set_cursor 1 posb; print sline1, "/", sline2;
4402         }
4403     }
4404     else
4405     {   @set_cursor 1 posa;
4406         print (string) TIME__TX;
4407         LanguageTimeOfDay(sline1, sline2);
4408     }
4409     @set_cursor 1 1; style roman; @set_window 0;
4410  ];


Last updated 27 February 2004. This site is no longer supported; information may be out of date.
Maintained as a historical archive by the Interactive Fiction Technology Foundation. Copyright 1993-2018 IFTF, CC-BY-SA unless otherwise noted.
This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.