@@ -692,7 +692,9 @@ begin |
| 692 |
['SONG_DESCRIPTOR=song', |
692 |
['SONG_DESCRIPTOR=song', |
| 693 |
'GBS_TITLE="'+PadRight(LeftStr(Song.Name, 32), 32)+'"', |
693 |
'GBS_TITLE="'+PadRight(LeftStr(Song.Name, 32), 32)+'"', |
| 694 |
'GBS_AUTHOR="'+PadRight(LeftStr(Song.Artist, 32), 32)+'"', |
694 |
'GBS_AUTHOR="'+PadRight(LeftStr(Song.Artist, 32), 32)+'"', |
| 695 |
'GBS_COPYRIGHT="'+PadRight(IntToStr(CurrentYear), 32)+'"']) <> 0 then Die; |
695 |
'GBS_COPYRIGHT="'+PadRight(IntToStr(CurrentYear), 32)+'"', |
|
|
696 |
'TIMER_MODULO='+IntToStr(IfThen(Song.TimerEnabled, Song.TimerDivider, 0)), |
|
|
697 |
'TIMER_CONTROL='+IntToStr(IfThen(Song.TimerEnabled, 4, 0))]) <> 0 then Die; |
| 696 |
end |
698 |
end |
| 697 |
else if Assemble(ConcatPaths([CacheDir, Filename + '_player.obj']), |
699 |
else if Assemble(ConcatPaths([CacheDir, Filename + '_player.obj']), |
| 698 |
ConcatPaths([RuntimeDir, 'hUGEDriver', 'player.asm']), |
700 |
ConcatPaths([RuntimeDir, 'hUGEDriver', 'player.asm']), |