U-331 Gets Punished

[U-Bones]

I have been playing around with damage/repair settings, and also was interested in the thread about log files here (http://www.subsim.com/radioroom/showthread.php?t=94807) and this (http://mysite.verizon.net/%7Evze33y78/331/U-331.html) sort of happened out of it.

If anyone is mildly entertained, its paid for :D

Oh yea, SH4 better have permanent logging capability with html options. If you forget to save prior to quitting in SH3 the logs go to the bit bucket.

[Grey Legion]

Looks Amazing !!

Couple of questions if you don't mind.

#1 Please provide all the damage mods you use with NYGM ??

#2 what program/editor did you use to create that list ??

Thank you in adavance !!

:up:

[U-Bones]

Looks Amazing !!

Couple of questions if you don't mind.

#1 Please provide all the damage mods you use with NYGM ??

#2 what program/editor did you use to create that list ??

Thank you in adavance !!

:up:

The damage stuff is my own, based on nvdrifter's observation about crew efficiency, almost completely contained in zones.cfg and cfg/basic.cfg. See this thread http://www.subsim.com/radioroom/showthread.php?t=94238

I used a simple perl script to get the log info one line text entries. I htmlized it by hand afterwards. Real programmers please don't lol.
Win usage: type logfile | perl sh3log.pl >newlogfile

#!/usr/bin/perl -w
use Getopt::Std;
use Cwd;
$entries = 0 ;
$lines = 0 ;
$stamp = "0";
$now = "0";
$atype = "0";
$who = "0";
$entry = "New Log\n";
$speaker = "";

while (<STDIN>) {
$dummy = "";
( $dummy, $filler )=split("\=");
if ($dummy eq "Type") { $atype = $filler ; } #not used
if ($dummy eq "EntryText") { $entry = $filler }
if ($dummy eq "Date") { $stamp = $filler } #new day line later
if ($dummy eq "Time") { $now = $filler }
if ($dummy eq "Categ") { $who = $filler }
if ($who == 0) { $speaker = "CE" }
if ($who == 1) { $speaker = "NA" }
if ($who == 2) { $speaker = "WE" }
if ($who == 3) { $speaker = "RA" }
if ($who == 4) { $speaker = "SO" }
if ($who == 5) { $speaker = "WO" }
$lines ++;
if ($dummy =~ /Log.Entry/ ) { $entries++ ; next; }
if ($dummy =~ /\n/ ) {printf "%8d:%4.4d %s: %s", $stamp, $now, $speaker, $entry;}
}

if ($lines > 0) { printf "%d Lines %d Entries\n",$lines,$entries; exit }
{ printf "0\n"; }

[Grey Legion]

So it looks to be a longer operation than I thought ??

Hmmm...I'll have to look into that at a later date.