Front Office Football Central

Front Office Football Central (https://forums.operationsports.com/fofc//index.php)
-   FOFC Archive (https://forums.operationsports.com/fofc//forumdisplay.php?f=27)
-   -   Dynasty Posting Utility (https://forums.operationsports.com/fofc//showthread.php?t=4488)

sabotai 02-13-2003 11:04 PM

Lifestyles....of the rich and the famous....they're always complaining....

sabotai 02-18-2003 07:05 PM

Informer you no say daddy me Snow me I'll go blame, A licky boom boom down

daedalus 02-18-2003 07:30 PM

Occasionally, you're frightening. Occasionally. :)

sabotai 02-18-2003 09:25 PM

:D

sabotai 03-05-2003 09:44 PM

Look slike this has fallen off the face of the earth.

Any news primelord? Any chance of posting the source so others may work on it if you don't have the time anymore (or for those just curious) ?

Alf 03-06-2003 06:58 AM

I'll pot a link in QS word/number puzzle since primelord posts there

primelord 03-06-2003 02:43 PM

I unfortunately have not made very much progress on this since my last update. I have decided to go in a different direction with it. I want to incorporate a databse back end to the program so it can much more efficently search the data and sotre data for later extraction etc.

I do plan on getting back to this. Hope fully soon.

I will be happy to post the source code. I'll do that in the next post.

primelord 03-06-2003 02:47 PM

Here is my code to generate a QB Passer Rating. :D

Code:

sub qb_pass_rate {
        my ($pass_cmp, $pass_att, $yards, $tds, $ints) = @_;
        my ($step1, $step2, $step3, $step4, $pass_rate);
        $step1 = ($pass_cmp / $pass_att);
        $step1 -= 0.3;
        $step1 /= 0.2;
        $step1 = 2.375 if ($step1 > 2.375);
        $step1 = 0 if ($step1 < 0);
        $step2 = ($yards / $pass_att);
        $step2 -= 3;
        $step2 /= 4;
        $step2 = 2.375 if ($step2 > 2.375);
        $step2 = 0 if ($step2 < 0);
        $step3 = ($tds / $pass_att);
        $step3 /= .05;
        $step3 = 2.375 if ($step3 > 2.375);
        $step3 = 0 if ($step3 < 0);
        $step4 = ($ints / $pass_att);
        $step4 = (.095 - $step4);
        $step4 /= .04;
        $step4 = 2.375 if ($step4 > 2.375);
        $step4 = 0 if ($step4 < 0);
        $pass_rate = ($step1 + $step2 + $step3 + $step4);
        $pass_rate *= 100;
        $pass_rate /= 6;
        $pass_rate = sprintf "%.1f", $pass_rate;
        return $pass_rate;
}


primelord 03-06-2003 03:02 PM

1 Attachment(s)
Attached is the source code for where I left off on this project. For anyone that doesn't know Perl that is tight, efficent, beautiful code. For those that do know Perl. They will quickly realize that last statement was bullshit. :D

Most of the code could be optimized considerably, but I was more focused on functionality for the first go round. Inputing the files and who you want to serach for is very cumbersome at the moment. I didn't bother writing a decent way to do that because I was/am going to handle it through a web interface in the future. It also still only handles QB's at the moment.

Ok so it's sloppy and the code isn't commented so you may have trouble following everythign I am doing, but here it is. If anyone has any questions/suggestions feel free to let me know. And don't lose faith I do plan on completeing this. :)

I would open it up in WordPad. NotePad and Microsoft Word screw with the formatting and it makes the code pretty difficult to read.

sabotai 03-06-2003 04:37 PM

Perl eh?.....I don't know Perl. :)

Does this code also read the play-by-play and get the stats? May sound like a dumb question, but I seriously don't know any Perl at all. (Been meaning to learn it, though)

primelord 03-06-2003 07:00 PM

It actually reads the game logs to generate the stats. Reading the actualy play by play would be very difficult.

If you know any C you can probably make a little sense out of the code. There are some similarities.


All times are GMT -5. The time now is 12:23 AM.

Powered by vBulletin Version 3.6.0
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.