Interesting game, but unskipable cutscene was not a good decision. Cheat money doesn't seem to work for some reason.
Cheat money... You should be able to edit anything in the character file? Maybe changed the wrong line of data??
'Load Character File
Sub LoadCharFile()
Quest1 = False
Quest2 = False
Quest3 = False
Open GameDataPath$ & "LurkChars" For Input As #1
For cycle = 1 To 15
Input #1, CharName(cycle)
Input #1, CharPicIndex(cycle)
Input #1, CharWithParty(cycle)
Input #1, CharStr(cycle)
Input #1, CharInt(cycle)
Input #1, CharVit(cycle)
Input #1, CharAgi(cycle)
Input #1, CharWis(cycle)
Input #1, CharCombat(cycle)
Input #1, CharArcher(cycle)
Input #1, CharMusic(cycle)
Input #1, CharBurglar(cycle)
Input #1, CharMagic(cycle)
Input #1, CharBStr(cycle)
Input #1, CharBInt(cycle)
Input #1, CharBVit(cycle)
Input #1, CharBAgi(cycle)
Input #1, CharBWis(cycle)
Input #1, CharBCombat(cycle)
Input #1, CharBArcher(cycle)
Input #1, CharBMusic(cycle)
Input #1, CharBBurglar(cycle)
Input #1, CharBMagic(cycle)
Input #1, CharWeapon(cycle)
Input #1, CharArmor(cycle)
Input #1, CharHelm(cycle)
Input #1, CharGauntlet(cycle)
Input #1, CharBoots(cycle)
Input #1, CharCloak(cycle)
Input #1, CharShield(cycle)
Input #1, CharSpecial(cycle)
For X = 1 To 8
Input #1, CharItem(cycle, X)
Next X
Input #1, CharLevel(cycle)
Input #1, CharExp(cycle)
Input #1, CharHP(cycle)
Input #1, CharHM(cycle)
Input #1, CharCond(cycle)
Input #1, CharAttack(cycle)
Input #1, CharAC(cycle)
Input #1, CharGP(cycle)
Input #1, CharPTS(cycle)
For Y = 1 To 17
Input #1, CharSpells(cycle, Y)
Next Y
For Y = 1 To 10
Input #1, CharSongs(cycle, Y)
Next Y
CheckQuest
needcharpatch = False
If CharCombat(cycle) < 0 Then needcharpatch = True
If CharArcher(cycle) < 0 Then needcharpatch = True
If CharMusic(cycle) < 0 Then needcharpatch = True
If CharBurglar(cycle) < 0 Then needcharpatch = True
If CharMagic(cycle) < 0 Then needcharpatch = True
If needcharpatch = True Then patchchar (cycle)
Next cycle
Close #1
End Sub