Simple Converter Program

Text Decklist Converter

Essentially, there are two parts to this program. First is the html page.
Most browsers allow you to view html code for a page you are viewing.
But, if you didn't catch it, here it is again:

<html>
<head>
<title>Text to Decklist Converter.</title>
</head>
<body><center><br><br>
<u><b>Text Decklist Converter</b></u><br><br>
<form method="post" name="upload" action="/cgi/converter.cgi" enctype="multipart/form-data">
Just pick a decklist (.txt format):<br>
<input type="file" name="file"><br><br>
<input type="text" name="name"> - Deck Name<br>
Convert to:<br>
<input type="radio" name="format" value="forum" checked="checked"> Forum Post.<br>
<input type="radio" name="format" value="mtgo"> In-game.*<br>
<input type="submit" value="Convert File">
</form>
*MTGO V3 limits the number of characters you can put in a single message,<br>
so decks with many different cards (singleton, etc.) may display incompletely.
<br><br><br>
This program is open source!  View details <a href="/converter.html">here.</a>
</body>
</html>

The next bit takes a bit of programming. The CGI script was made with Flaming Thunder, full version.
I use Flaming Thunder because it's easy to learn and can cross-compile.
(That is, I wrote the program on a Windows machine, but the server runs Linux.)
The compiled executable is approximately 37 KB. Here's the source code:

# Source code for converter.cgi
# This program converts a deck from .txt to other formats.

# Firstly, let's get that Deck's name.

Set DeckName to GetDecodedCGIVariableValue("name").
If DeckName="" then set DeckName to "My Deck".

# And we change what the program writes out based on which format they choose.

Set Format to GetDecodedCGIVariableValue("format").
If Format="forum" then 
(
 Set LineBreakChar to Linefeed.
 Set CardCountChar to "* ".
).

If Format="mtgo" then
(
 Set LineBreakChar to "[n]".
 Set CardCountChar to "x ".
).

# We need two strings:  Deck (starts with the file) and TextDeck (starts empty).
# And we're going to count how many lines we write, to display later.

Set Deck to GetDecodedCGIVariableFileData("file",1).
Set TextDeck to "".
Set Lines to 2.

# Then, we cut the decklist line-by-line.

Decomposer:

# Find the end of the current line.  If there isn't one, we're at the end of the file.

Set LineEnd to Find(Linefeed,Deck).
If LineEnd=0 then go to Done.

# Cut the decklist into the part before the linefeed and the part after.

Set CurrentLine to Substring(Deck,1,LineEnd-1).
Set Deck to Substring(Deck,LineEnd+1).

# Now, that line could be three different things.  First, let's check if it's blank.
# If it is, we write a blank line to the TextDeck string and loop back.

If GetStringLength(CurrentLine)<2 then
(
 Set TextDeck to TextDeck + LineBreakChar.
 Set Lines to Lines + 1.
 Go to Decomposer.
).

# Guess it's not a blank.  Maybe it's the Sideboard heading?
# We check the first letter.  If it's an S, then we write-and-loop.

If Substring(CurrentLine,1,1)="S" then
(
 Set TextDeck to TextDeck + "Sideboard:" + LineBreakChar.
 Set Lines to Lines + 1.
 Go to Decomposer.
).

# No?  Then it must be a card.  Let's crop the number off the front.

Set SpaceTarget to Find(" ",CurrentLine).
Set Quantity to Substring(CurrentLine,1,SpaceTarget-1).

# And the rest of the card:

Set CardName to Substring(CurrentLine,SpaceTarget+1).

# And. . . We're good to go.

Set TextDeck to TextDeck + Quantity + CardCountChar + CardName + LineBreakChar.
Set Lines to Lines + 1.
Go to Decomposer.


Done:

# Depending on what format they want, we need a slightly different display.

If Format="forum" then set DisplayList to "[DECK="+DeckName+"]"+TextDeck+"[/DECK]".
If Format="mtgo" then set DisplayList to "[b]"+Deckname+"[/b][n]"+TextDeck.

# Now let's write a page for all to see!
# First two lines are required.

Write "Content-type: text/html".
Write CarriageReturn, Linefeed, CarriageReturn, Linefeed.

# How about some HTML tags?

Write "<html><head><title>Your Deck is Served</title></head>",
"<body><center><br><br><textarea cols=""60"" rows=""",Lines,""" readonly>",
DisplayList,"<#/textarea></body></html>".

# That's it.  Isn't CGI scripting wonderful?

Though there's a little tweak because HTML doesn't like embedded text areas.
(You'd have to remove the "#" from the <#/textarea> before this would display correctly.)