314 RegisterVariable('fullscr' , vtCommand, @chFullScr      , true );

   314 RegisterVariable('fullscr' , vtCommand, @chFullScr      , true );

   315 RegisterVariable('+volup'  , vtCommand, @chVol_p        , true );

   315 RegisterVariable('+volup'  , vtCommand, @chVol_p        , true );

   316 RegisterVariable('-volup'  , vtCommand, @chVol_m        , true );

   316 RegisterVariable('-volup'  , vtCommand, @chVol_m        , true );

   317 RegisterVariable('+voldown', vtCommand, @chVol_m        , true );

   317 RegisterVariable('+voldown', vtCommand, @chVol_m        , true );

   318 RegisterVariable('-voldown', vtCommand, @chVol_p        , true );

   318 RegisterVariable('-voldown', vtCommand, @chVol_p        , true );

   319 

   320 

   320 finalization

   321 finalization

   321 FreeVariablesList

   322 FreeVariablesList

   322 

   323 

   323 end.

   324 end.