hypercells.mod 1.0 Hypercells Mod! When you move over a cell it changes color and is a link! Has many options on whether you want hypercells on, or off in certain places, and has two inputs for hypercell colors! Please note: This mod I know maybe incompatible with the Today.mod, active users in forum mod, and maybe some other mods, and I am planning on releasing a fix for the today and active users mod to work with this mod in the next couple of days.... Enjoy!!! P.S. Some parts of this mod (the very beginning and maybe very end) you may have to install manually if you have a lot of mods because some mod writers are not very nice when it comes to altering code! :p P.P.S. Thanks, to all the mod wirters that helped me wit this mod!!!! Omario http://www.clickopedia.com Sources/Admin.pl my @onoff = qw/ allowpics showyabbcbutt showbdescrip maintenance guestaccess insert_original enable_ubbc enable_news enable_guestposting enable_notification showlatestmember showrecentbar showmemberbar showmarkread showmodify showuserpic showusertext showgenderimage shownewsfader MenuType curposlinks profilebutton autolinkurls emailpassword RegAgree emailwelcome allow_hide_email usetempfile faketruncation emailnewpass yyForceIIS yyblankpageIIS/; push(@onoff, "message_hypercells","message_lastposthc","board_hyperc ells","board_lastposthc"); my($snfchecked, $fls1, $fls2, $fls3, $utfchecked, $truncchecked, $mts1, $mts2, $mts3, $tsl6, $tsl5, $tsl4, $tsl3, $tsl2, $tsl1); my($mhcchecked, $mlphcchecked, $bhcchecked, $blphcchecked); if ($maintenance) { $mainchecked = ' checked'; } if ($message_hypercells) { $mhcchecked = ' checked'; } if ($message_lastposthc) { $mlphcchecked = ' checked'; } if ($board_hypercells) { $bhcchecked = ' checked'; } if ($board_lastposthc) { $blphcchecked = ' checked'; } $timeout = $FORM{'timeout'} || 0; $message_hypercells = $FORM{'message_hypercells'} || 0; $message_lastposthc = $FORM{'message_lastposthc'} || 0; $board_hypercells = $FORM{'board_hypercells'} || 0; $board_lastposthc = $FORM{'board_lastposthc'} || 0; $txt{'379'} Enable Hypercells on Board-Index? Enable Hypercells on last post column in Board-Index? (Option above must be on!) Enable Hypercells on Message-Index? Enable Hypercells on last post column in Message-Index? (Option above must be on!) ########## Feature Settings ########## \$message_hypercells = $message_hypercells; \$message_lastposthc = $message_lastposthc; \$board_hypercells = $board_hypercells; \$board_lastposthc = $board_lastposthc; $color{'fadertext'} = $FORM{'fadertext'} || '#FFFFFF'; $color{'hypercell'} = $FORM{'hypercell'} || '#FFFFFF'; $color{'hypercell2'} = $FORM{'hypercell2'} || '#FFFFFF'; \$color{'fadertext2'} = "$color{'fadertext2'}"; # Color of text in the NewsFader (news color) \$color{'hypercell'} = "$color{'hypercell'}"; \$color{'hypercell2'} = "$color{'hypercell2'}"; $txt{'389'} Hypercell On Mouse Over Color Hypercell On Mouse Over Color 2 (for the last post column) Sources/BoardIndex.pl print <<"EOT"; $new $curboardname
$curboarddescr
» $showmods $threadcount{$curboard} $messagecount{$curboard} $lastposttime{$curboard}
$txt{'525'} $lastposter EOT if ($board_hypercells == 1){ print <<"EOT"; $new $curboardname
$curboarddescr
» $showmods $threadcount{$curboard} $messagecount{$curboard} EOT if($board_lastposthc == 1) { if (!fopen(FILE, "$memberdir/$lastposterid.dat")){ print <<"EOT"; $lastposttime{$curboard}
$txt{'525'} $lastposter EOT } else { print <<"EOT"; $lastposttime{$curboard}
$txt{'525'} $lastposter EOT } } else { print <<"EOT"; $lastposttime{$curboard}
$txt{'525'} $lastposter EOT } print <<"EOT"; EOT } else { print <<"EOT"; $new $curboardname
$curboarddescr
» $showmods $threadcount{$curboard} $messagecount{$curboard} $lastposttime{$curboard}
$txt{'525'} $lastposter EOT } Sources/MessageIndex.pl print << "EOT"; $msub $new $pages $mname $mreplies $views $mydate
$txt{'525'} $lastpostername EOT if ($message_hypercells == 1){ print <<"EOT"; $msub $new $pages $mname $mreplies $views EOT if($message_lastposthc == 1) { if (!fopen(FILE, "$memberdir/$lastposterid.dat")){ print <<"EOT"; $mydate
$txt{'525'} $lastpostername EOT } else { print <<"EOT"; $mydate
$txt{'525'} $lastpostername EOT } } else { print <<"EOT"; $mydate
$txt{'525'} $lastpostername EOT } print <<"EOT"; EOT } else { print <<"EOT"; $msub $new $pages $mname $mreplies $views $mydate
$txt{'525'} $lastpostername EOT }