MkReaScriptAPITable.pl

#
# mkReaScriptAPITable.pl
#
 
use strict;
use warnings;
 
# format of Wiki table
# {|class=\"wikitable\
# | [[RPR_GetUserInputs|GetUserInputs()]]
# | [[RPR_AddMediaItemToTrack|AddMediaItemToTrack]]
# | [[RPR_AddProjectMarker|AddProjectMarker]]
# | [[RPR_AddTakeToMediaItem|AddTakeToMediaItem]]
# |-
# |}
 
use constant NUMCOLS => 4;
my $col_num = 0;
my $function_name;
 
print "{|class=\"wikitable\"\n";    # start of table
while(<DATA>){
    /"#/;                           # find start of function name
    $_ = $';                        # set $_ to everything after that
    /">/;                           # find end of function name
    $function_name = $`;            # set $_ to everything before that
    $col_num++;
    print "| [[RPR_$function_name|$function_name]]\n";
    if($col_num==4){
        print "|-\n";
        $col_num=0;
    }
}
print "|}\n";                       # end of table
exit;
# all the stuff below the __DATA__ line below is taken directly from the
# ReaScript API Help screen generated by REAPER
__DATA__
<tr><td><a href="#AddMediaItemToTrack">AddMediaItemToTrack</a></td>
<td><a href="#format_timestr">format_timestr</a></td>
<td><a href="#GetTrackEnvelope">GetTrackEnvelope</a></td>
<td><a href="#plugin_getImportableProjectFilterList">plugin_getImportableProjectFilterList</a></td></tr>
<tr><td><a href="#AddProjectMarker">AddProjectMarker</a></td>
<td><a href="#format_timestr_len">format_timestr_len</a></td>
<td><a href="#GetTrackEnvelopeByName">GetTrackEnvelopeByName</a></td>
.
.
.
.
<td><a href="#ValidatePtr">ValidatePtr</a></td></tr>
<tr><td><a href="#EnumTrackMIDIProgramNamesEx">EnumTrackMIDIProgramNamesEx</a></td>
<td><a href="#GetTrackAutomationMode">GetTrackAutomationMode</a></td>
<td><a href="#plugin_getFilterList">plugin_getFilterList</a></td>
<td><a href="#WDL_VirtualWnd_ScaledBlitBG">WDL_VirtualWnd_ScaledBlitBG</a></td></tr>