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 web site has not been fully supported since April 2008. Information may be out of date. This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.