Inform - Support - Source

Back to List

Inventory
Complete

Backward
Forward

Plain
Coloured
Gaudy

This code
in plain text

Browsing parserm.h

StatusLineHeight (lines 5522-5539)

5522  #Iftrue (#version_number == 6);
5523  [ StatusLineHeight height  wx wy x y charh;
5524      ! Split the window. Standard 1.0 interpreters should keep the window 0
5525      ! cursor in the same absolute position, but older interpreters,
5526      ! including Infocom's don't - they keep the window 0 cursor in the
5527      ! same position relative to its origin. We therefore compensate
5528      ! manually.
5529      @get_wind_prop 0 0 -> wy; @get_wind_prop 0 1 -> wx;
5530      @get_wind_prop 0 13 -> charh; @log_shift charh $FFF8 -> charh;
5531      @get_wind_prop 0 4 -> y; @get_wind_prop 0 5 -> x;
5532      height = height * charh;
5533      @split_window height;
5534      y = y - height + wy - 1;
5535      if (y < 1) y = 1;
5536      x = x + wx - 1;
5537      @set_cursor y x 0;
5538      gg_statuswin_cursize = height;
5539  ];


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 assisted by C Knight.