I recently made my Perl TravCharGen program available for public access.
The link is http://www.subbob.us/TravCharGen/TravMain.pl
I wrote it originally as a command line (shell) application. Although the script has interactive options, I have not yet designed the CGI forms to enable user interaction.
Currently it is running AUTOMATIC GENERATION mode, so it creates a character each time the page is visited or refreshed in the browser.
Below I've provided an example of the script output.
The link is http://www.subbob.us/TravCharGen/TravMain.pl
I wrote it originally as a command line (shell) application. Although the script has interactive options, I have not yet designed the CGI forms to enable user interaction.
Currently it is running AUTOMATIC GENERATION mode, so it creates a character each time the page is visited or refreshed in the browser.
Below I've provided an example of the script output.
HTML:
General Jamal Brown (Male) 42 years old
Enlisted in the Army
STR: 3 -> 2
DEX: 4 -> 2
END: 5 -> 3
INT: 3 -> 3
EDU: 5 -> 8
SOC: A -> B
Served 6 terms in the Army, Rank: General (6)
Status: Forced Out
Skills
Aircraft: 1
Automatic Rifle: 1
Body Pistol: 1
Carbine: 1
Cudgel: 1
Dagger: 1
Gambling: 1
Laser Rifle: 2
Mechanical: 2
Revolver: 1
Rifle: 1
Submachinegun: 1
Cash: $25000
Equipment
Laser Rifle: 1
History
Term 0 Events
ServiceSkills: Gained service skill: Rifle
Term 1 Events
Commissioned
Promoted to Rank 1 (Lieutenant)
RankSkills: Gained service rank skill: Submachinegun
Promoted to Rank 2 (Captain)
Dagger
Cudgel
Automatic Rifle
Revolver
Successfully reenlisted
Term 2 Events
Promoted to Rank 3 (Major)
Stat Mod: +1 EDU
Mechanical
Successfully reenlisted
Term 3 Events
Promoted to Rank 4 (Lt Colonel)
Carbine
Gambling
Successfully reenlisted
Term 4 Events
Promoted to Rank 5 (Colonel)
Aircraft
Stat Mod: +1 STR
-1 STR due to aging
-1 DEX due to aging
-1 END due to aging
Successfully reenlisted
Term 5 Events
Promoted to Rank 6 (General)
Mechanical
Body Pistol
-1 STR due to aging
Successfully reenlisted
Term 6 Events
Stat Mod: +1 STR
-1 STR due to aging
-1 DEX due to aging
-1 END due to aging
Failed to reenlist
Earned 6000 annual retirement pay
Mustered Out
10000
10000
5000
+1 SOC
Gun: Laser Rifle
+2 EDU
Mid Psg
Gun: +1 Laser Rifle
Mid Psg
Gun: +1 Laser Rifle