Clarion clock widget, using AdjustFontSizeByHeight for prompt resizing:

brahn · May 28, 2014, 2:36pm

See the code in this Gist:

gist.github.com

https://gist.github.com/fushnisoft/d18a4600c9925cd07e22

gistfile1.txt

  PROGRAM
  INCLUDE('EQUATES.CLW') !Include standard equates

  MAP
Main    PROCEDURE()
AdjustFontSizeByHeight  PROCEDURE(LONG xDesiredHInPixels, UNSIGNED xFEQ)
  END

  CODE
  Main()

This file has been truncated. show original