macro:post ShiftF4 $text "99 bottles of beer in the wall.txt" CtrlEnter 
$if (Dialog)
  CtrlEnter CtrlA CtrlD
  $end
CtrlHome
$MMode 1
%b = 99;
%s = "s";

$while(%b>0)
  $if (%b==1)
    %s="";
    $end
  %string = %b+" bottle"+%s+" of beer on the wall, "+%b+" bottle"+%s+ " of beer";
  $text %string
  Enter
  $text "Ta