15 Poll Options 1.0 This Mod adds 7 more Options to the 'Create Poll' Page. This mod requires the poll mod! Daniel Alm Sources\Poll.pl
$polltxt{'14'}:
$polltxt{'14'}:
$polltxt{'27'}:
$polltxt{'28'}:
$polltxt{'29'}:
$polltxt{'30'}:
$polltxt{'31'}:
$polltxt{'32'}:
$polltxt{'33'}:
$polltxt{'14'}:
$polltxt{'14'}:
$polltxt{'27'}:
$polltxt{'28'}:
$polltxt{'29'}:
$polltxt{'30'}:
$polltxt{'31'}:
$polltxt{'32'}:
$polltxt{'33'}: my( $question, $option1, $option2, $option3, $option4, $option5, $option6, $option7, $option8, $email, $subject, $ns, $threadid, $notify, @memberlist, $a, $realname, $membername, $testname, @reserve, @reservecfg, $matchword, $matchcase, $matchuser, $matchname, $namecheck, $reserved, $reservecheck, $newthreadid, @messages, $mnum, $msub, $mname, $memail, $mdate, $mreplies, $musername, $micon, $mstate, $start, $pageindex, $tempname ); my( $question, $option1, $option2, $option3, $option4, $option5, $option6, $option7, $option8, $option9, $option10, $option11, $option12, $option13, $option14, $option15, $email, $subject, $ns, $threadid, $notify, @memberlist, $a, $realname, $membername, $testname, @reserve, @reservecfg, $matchword, $matchcase, $matchuser, $matchname, $namecheck, $reserved, $reservecheck, $newthreadid, @messages, $mnum, $msub, $mname, $memail, $mdate, $mreplies, $musername, $micon, $mstate, $start, $pageindex, $tempname ); $option8 = $FORM{'option8'}; $option9 = $FORM{'option9'}; $option10 = $FORM{'option10'}; $option11 = $FORM{'option11'}; $option12 = $FORM{'option12'}; $option13 = $FORM{'option13'}; $option14 = $FORM{'option14'}; $option15 = $FORM{'option15'}; if ($option8) { @options[$numcount] = $option8; $numcount++; } if ($option9) { @options[$numcount] = $option9; $numcount++; } if ($option10) { @options[$numcount] = $option10; $numcount++; } if ($option11) { @options[$numcount] = $option11; $numcount++; } if ($option12) { @options[$numcount] = $option12; $numcount++; } if ($option13) { @options[$numcount] = $option13; $numcount++; } if ($option14) { @options[$numcount] = $option14; $numcount++; } if ($option15) { @options[$numcount] = $option15; $numcount++; } if (length($option8) > 50) { &fatal_error("Your eighth poll option was longer than the maximum 50 characters. Please try again."); } if (length($option9) > 50) { &fatal_error("Your nineth poll option was longer than the maximum 50 characters. Please try again."); } if (length($option10) > 50) { &fatal_error("Your tenth poll option was longer than the maximum 50 characters. Please try again."); } if (length($option11) > 50) { &fatal_error("Your eleventh poll option was longer than the maximum 50 characters. Please try again."); } if (length($option12) > 50) { &fatal_error("Your twelveth poll option was longer than the maximum 50 characters. Please try again."); } if (length($option13) > 50) { &fatal_error("Your thirteenth poll option was longer than the maximum 50 characters. Please try again."); } if (length($option14) > 50) { &fatal_error("Your forteenth poll option was longer than the maximum 50 characters. Please try again."); } if (length($option15) > 50) { &fatal_error("Your fifteenth poll option was longer than the maximum 50 characters. Please try again."); } if ( $option8 =~ m/\|/o ) { &fatal_error("There was an illegal character in your eighth poll option. Please try again."); } if ( $option9 =~ m/\|/o ) { &fatal_error("There was an illegal character in your nineth poll option. Please try again."); } if ( $option10 =~ m/\|/o ) { &fatal_error("There was an illegal character in your tenth poll option. Please try again."); } if ( $option11 =~ m/\|/o ) { &fatal_error("There was an illegal character in your eleventh poll option. Please try again."); } if ( $option12 =~ m/\|/o ) { &fatal_error("There was an illegal character in your twelveth poll option. Please try again."); } if ( $option13 =~ m/\|/o ) { &fatal_error("There was an illegal character in your thirteenth poll option. Please try again."); } if ( $option14 =~ m/\|/o ) { &fatal_error("There was an illegal character in your fourteenth poll option. Please try again."); } if ( $option15 =~ m/\|/o ) { &fatal_error("There was an illegal character in your fifteenth poll option. Please try again."); } germanDU.lng $polltxt{'1'} = "Create Poll"; $polltxt{'27'} = "Option 9"; $polltxt{'28'} = "Option 10"; $polltxt{'29'} = "Option 11"; $polltxt{'30'} = "Option 12"; $polltxt{'31'} = "Option 13"; $polltxt{'32'} = "Option 14"; $polltxt{'33'} = "Option 15";