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

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

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

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

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

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

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

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

   305 RegisterVariable('findhh'  , vtCommand, @chFindhh       , true );

   305 RegisterVariable('findhh'  , vtCommand, @chFindhh       , true );

   306 

   307 

   307 finalization

   308 finalization

   308 FreeVariablesList

   309 FreeVariablesList

   309 

   310 

   310 end.

   311 end.