@opposite ; open new tab in opposite pane if(activewindow("Total Co*")) do Keys {fast}{to Total Co*}+^{up} QUIT endif @this ; open new (active) tab in this pane if(activewindow("Total Co*")) do Keys {to Total Co*}^{up} QUIT endif @backg ; open new tab in this pane in the background if(activewindow("Total Co*")) do Keys {to Total Co*}^+T QUIT endif @extract_to ; extract to user specified path if(activewindow("Total Co*")) do LOCAL hFocus=WIN.GetFocus local extract_path = InputCancel("Extraction Path: ") WIN.SetFocus(hFocus) Wait.For(20000, activewindow("Total Co*")) Keys {to Total Co*}%{F9} Wait.For(20000, activewindow("Unpack*")) IF(NOT activewindow("Unpack*")) QUIT Keys {to Unpa*}{end}+{home}&(extract_path)\{enter} endif @extract_here ; extract archive into this subdir if(activewindow("Total Co*")) do Keys {to Total Co*}%{F9} Wait.Until(activewindow("Unpack*")) Keys {to Unpa*} {enter} endif @extract_opposite ; extract archive into active tab in opposite pane if(activewindow("Total Co*")) do Keys {to Total Co*}%{F9} Wait.Until(activewindow("Unpack*")) Keys {to Unpa*}{enter} endif @extract_subdir_current_pane ; extract archive into a subdir of the currently active pane if(activewindow("Total Co*")) do local filepath filepath = file.folder(_file_) ++ "\\" ++ file.name(_file_) Keys {to Total Co*}%{F9} Wait.Until(activewindow("Unpack*")) Keys {to Unpa*}&(filepath){enter} endif @extract_subdir_opposite_pane ; extract archive into a subdir of the opposite active pane if(activewindow("Total Co*")) do Keys {to Total Co*}%{F9} Wait.Until(activewindow("Unpack*")) Keys {to Unpa*}{end}&(file.name(_file_))\{enter} endif