◄Example► ◄Back► ◄Contents► ◄Index► ────────────────────────────────────────────────────────────────────────────── ;* Declare structure for video configuration ;* ;* Shows: STRUC ENDS COMM vid_config STRUC mode DB ? ; Current mode dpage DB ? ; Current display page rows DB ? ; Number of display rows - 1 display DB ? ; Either MONO or COLOR adapter DB ? ; Adapter code CGAvalue DB ? ; Enable value for CGA sgmnt DW ? ; Video segment with page offset vid_config ENDS ;* Declare communal variables. COMM NEAR vconfig:vid_config ; Video configuration structure COMM NEAR _psp:WORD ; Segment of Pgm Segment Prefix COMM NEAR _env:WORD ; Segment of environment block -♦-