GtM

FileCreateDir, Lib\Desc
Gui, Add, Button, w200 gStartGame, Start Game
Gui, Add, button, w200 gAddSong, Add Song
Gui, Show,, Guess the Music
Return

StartGame:
Random, Art1, 1, 3
If Art1 = 1
{
Random, Art2, 2, 3
}
If Art1 = 2
{
Random, Art2, 1, 2
If Art2 = 2
{
Art2:=3
}
}
If Art1 = 3
{
Random, Art2, 1, 2
}
If (Art1 = 1) and (Art2 = 2)
{
Art3:=3
}
If (Art1 = 2) and (Art2 = 1)
{
Art3:=3
}
If (Art1 = 1) and (Art2 = 3)
{
Art3:=2
}
If (Art1 = 3) and (Art2 = 1)
{
Art3:=2
}
If (Art1 = 2) and (Art2 = 3)
{
Art3:=1
}
If (Art1 = 3) and (Art2 = 2)
{
Art3:=1
}
IniRead, SongNumber, Lib\Songs.ini, Number, Number, 0
Random, SongChosen, 1, %SongNumber%
IniRead, Title, Lib\Songs.ini, SongNumbers, %SongChosen%, ERROR
IniRead, RealArtist, Lib\Songs.ini, %Title%, Artist, ERROR
IniRead, File, Lib\Songs.ini, %Title%, File, ERROR
IniRead, FakeA1, Lib\Songs.ini, %Title%, Fake1, ERROR
IniRead, FakeA2, Lib\Songs.ini, %Title%, Fake2, ERROR
FileRead, Description, Lib\Desc\%Title%.txt
If Art1 = 1
{
Art1:=RealArtist
}
If Art1 = 2
{
Art1:=FakeA1
}
If Art1 = 3
{
Art1:=FakeA2
}
If Art2 = 1
{
Art2:=RealArtist
}
If Art2 = 2
{
Art2:=FakeA1
}
If Art2 = 3
{
Art2:=FakeA2
}
If Art3 = 1
{
Art3:=RealArtist
}
If Art3 = 2
{
Art3:=FakeA1
}
If Art3 = 3
{
Art3:=FakeA2
}
If Description = ""
{
Description = ERROR
}
Gui, New
Gui, Add, Text,,
(
Title:
%Title%

Description:
%Description%

Choices:
)
Gui, Add, Radio, vChosenArtist, %Art1%
Gui, Add, Radio,, %Art2%
Gui, Add, Radio,, %Art3%
Gui, Add, Button, gSubmitGame, Submit
Gui, Add, Button, gPlaySound, Play Music
Gui, Show, w500
Return

PlaySound:
SoundPlay, %File%
Return

SubmitGame:
Gui, Submit, NoHide
If (ChosenArtist = 1) and (Art1 = RealArtist)
{
MsgBox, YAY! YOU GOT ONE!
Gui, Destroy
Goto, StartGame
Return
}
If (ChosenArtist = 2) and (Art2 = RealArtist)
{
MsgBox, YAY! YOU GOT ONE!
Gui, Destroy
Goto, StartGame
Return
}
If (ChosenArtist = 3) and (Art3 = RealArtist)
{
MsgBox, YAY! YOU GOT ONE!
Gui, Destroy
Goto, StartGame
Return
}

If (ChosenArtist = 1) and (Art1 != RealArtist)
{
MsgBox, BOOOOO!!!! YOU LOSE!!!
Return
}
If (ChosenArtist = 2) and (Art2 != RealArtist)
{
MsgBox, BOOOOO!!!! YOU LOSE!!!
Return
}
If (ChosenArtist = 3) and (Art3 != RealArtist)
{
MsgBox, BOOOOO!!!! YOU LOSE!!!
Return
}

Return

AddSong:
Gui, New
Gui, Add, Text,, File to play:
Gui, Add, Edit, vFile w500,
Gui, Add, Text,, Title
Gui, Add, Edit, vTitle w500,
Gui, Add, Text,, Artist(s)
Gui, Add, Edit, vRealArtist w500,
Gui, Add, Text,, Description
Gui, Add, Edit, vDescription r20 w500,
Gui, Add, Text,, Fake artist(s) 1
Gui, Add, Edit, vFakeA1 w500,
Gui, Add, Text,, Fake artist(s) 2
Gui, Add, Edit, vFakeA2 w500,
Gui, Add, Button, gSubmitNew, Submit
Gui, Add, Button, gCancel, Cancel
Gui, Show,, Guess the Music
Return

SubmitNew:
Gui, Submit, NoHide
Gui, Destroy
IniRead, OldNumber, Lib\Songs.ini, Number, Number, 0
NewNumber:=OldNumber+1
IniWrite, %NewNumber%, Lib\Songs.ini, Number, Number
IniWrite, %Title%, Lib\Songs.ini, SongNumbers, %NewNumber%
IniWrite, %RealArtist%, Lib\Songs.ini, %Title%, Artist
IniWrite, %File%, Lib\Songs.ini, %Title%, File
IniWrite, %FakeA1%, Lib\Songs.ini, %Title%, Fake1
IniWrite, %FakeA2%, Lib\Songs.ini, %Title%, Fake2
FileAppend, %Description%, Lib\Desc\%Title%.txt
MsgBox, 64, Guess the Music, Success! Your song has been added!
Return

Cancel:
Gui, Destroy
Return

GuiClose:
ExitApp