print "#---------mRFLoYDFrEAK42's---------#\n"; print "| DOOM Log Parser |\n"; print "#----------------------------------#\n\n"; if (defined $savegame) { print "Game saved $savegame times.\n\n"; } if (defined $deathcnt) { print "Died $deathcnt times.\n\n"; } if (defined $clipsobt) { print "You have obtained $clipsobt clips.\n"; } if (defined $ammbxobt) { print "You have obtained $ammbxobt boxes of ammo.\n"; } if (defined $shelsobt) { print "You have obtained $shelsobt shells.\n"; } if (defined $shlbxobt) { print "You have obtained $shlbxobt boxes of shells.\n"; } print "-------------------------------------\n"; if (defined $shotgobt) { print "You have obtained $shotgobt shotguns.\n"; } print "-------------------------------------\n"; if (defined $armorobt) { print "You have obtained $armorobt Armors.\n"; } if (defined $megarobt) { print "You have obtained $megarobt MegaArmors.\n"; } if (defined $armboobt) { print "You have obtained $armboobt armor bonuses.\n"; } if (defined $helboobt) { print "You have obtained $helboobt health bonuses.\n"; } if (defined $medikobt) { print "You have obtained $medikobt medikits.\n"; } if (defined $stipkobt) { print "You have obtained $stipkobt stimpacks.\n"; } print "-------------------------------------\n"; if (defined $redkcobt) { print "You have obtained $redkcobt red keycards.\n"; } if (defined $blukcobt) { print "You have obtained $blukcobt blue keycards.\n"; } if (defined $yelkcobt) { print "You have obtained $yelkcobt yellow keycards.\n"; } print "-------------------------------------\n"; if (defined $backpobt) { print "You have obtained $backpobt backpacks.\n"; } if (defined $besrkobt) { print "You have obtained $besrkobt berserk packs.\n"; } print "-------------------------------------\n"; if (defined $secrtobt) { print "You have discovered $secrtobt secrets.\n"; }