276 lines
8.4 KiB
GDScript
276 lines
8.4 KiB
GDScript
##
|
|
## XM parser by あるる（きのもと 結衣） @arlez80
|
|
##
|
|
## This script required Mod.gd for declaring the data structures.
|
|
##
|
|
## MIT License
|
|
##
|
|
|
|
@warning_ignore_start("untyped_declaration")
|
|
@warning_ignore_start("unsafe_method_access")
|
|
@warning_ignore_start("unused_variable")
|
|
@warning_ignore_start("int_as_enum_without_cast")
|
|
@warning_ignore_start("return_value_discarded")
|
|
|
|
class_name XM
|
|
|
|
enum XMNoteFlags {
|
|
NOTE = 0x01,
|
|
INSTRUMENT = 0x02,
|
|
VOLUME = 0x04,
|
|
EFFECT_COMMAND = 0x08,
|
|
EFFECT_PARAM = 0x10,
|
|
|
|
FIRST_BYTE_AS_FLAGS = 0x80,
|
|
}
|
|
|
|
## ファイルから読み込む
|
|
## @param path ファイルパス
|
|
## @return xm
|
|
func read_file( path:String ) -> Mod.ModParseResult:
|
|
var result: = Mod.ModParseResult.new( )
|
|
|
|
var f: = FileAccess.open( path, FileAccess.READ )
|
|
if f.get_error( ) != OK:
|
|
result.error = f.get_error( )
|
|
return result
|
|
|
|
var stream:StreamPeerBuffer = StreamPeerBuffer.new( )
|
|
stream.set_data_array( f.get_buffer( f.get_length( ) ) )
|
|
|
|
result.data = self._read( stream )
|
|
if result.data == null:
|
|
result.error = ERR_PARSE_ERROR
|
|
return result
|
|
|
|
## 配列から読み込む
|
|
## @param data データ
|
|
## @return xm
|
|
func read_data( data:PackedByteArray ) -> Mod.ModParseResult:
|
|
var stream:StreamPeerBuffer = StreamPeerBuffer.new( )
|
|
stream.set_data_array( data )
|
|
|
|
var result: = Mod.ModParseResult.new( )
|
|
result.data = self._read( stream )
|
|
if result.data == null:
|
|
result.error = ERR_PARSE_ERROR
|
|
return result
|
|
|
|
## ストリームから読み込み
|
|
## @param stream ストリーム
|
|
## @return xm
|
|
func _read( stream:StreamPeerBuffer ) -> Mod.ModData:
|
|
var xm: = Mod.ModData.new( )
|
|
|
|
if self._read_string( stream, 17 ) != "Extended Module: ":
|
|
return null
|
|
xm.module_name = self._read_string( stream, 20 )
|
|
if stream.get_u8( ) != 0x1A:
|
|
return null
|
|
xm.tracker_name = self._read_string( stream, 20 )
|
|
xm.version = stream.get_u16( )
|
|
|
|
var header_size:int = stream.get_u32( )
|
|
xm.song_length = stream.get_u16( )
|
|
xm.restart_position = stream.get_u16( )
|
|
xm.channel_count = stream.get_u16( )
|
|
|
|
var pattern_count:int = stream.get_u16( )
|
|
var instrument_count:int = stream.get_u16( )
|
|
xm.flags = stream.get_u16( )
|
|
xm.init_tick = stream.get_u16( )
|
|
xm.init_bpm = stream.get_u16( )
|
|
|
|
xm.song_positions = stream.get_partial_data( header_size - 20 )[1]
|
|
|
|
xm.patterns = self._read_patterns( stream, xm.flags, pattern_count, xm.channel_count )
|
|
if len( xm.patterns ) == 0:
|
|
return null
|
|
|
|
xm.instruments = self._read_instruments( stream, instrument_count )
|
|
if len( xm.instruments ) == 0:
|
|
return null
|
|
|
|
return xm
|
|
|
|
## パターン読み込み
|
|
## @param stream ストリーム
|
|
## @param xm_file_flags XMデータに関するフラグ
|
|
## @param pattern_count パターン数
|
|
## @param channles 最大チャンネル数
|
|
## @return パターンデータ
|
|
func _read_patterns( stream:StreamPeerBuffer, xm_file_flags:int, pattern_count:int, channels:int ) -> Array: # Array of Array of Array of ModPatternNote
|
|
var patterns:Array = [] # Array of Array of Array of ModPatternNote
|
|
|
|
for i in ( pattern_count ):
|
|
var pattern:Array = [] # Array of Array of ModPatternNote
|
|
|
|
if stream.get_u32( ) != 9:
|
|
return []
|
|
if stream.get_u8( ) != 0:
|
|
return []
|
|
var row_count:int = stream.get_u16( )
|
|
var size:int = stream.get_u16( )
|
|
for k in ( row_count ):
|
|
var line:Array[Mod.ModPatternNote] = []
|
|
for ch in ( channels ):
|
|
var patr: = Mod.ModPatternNote.new( )
|
|
if 0 < size:
|
|
var first:int = stream.get_u8( )
|
|
size -= 1
|
|
if first & XMNoteFlags.FIRST_BYTE_AS_FLAGS != 0:
|
|
if first & XMNoteFlags.NOTE != 0:
|
|
patr.note = stream.get_u8( )
|
|
size -= 1
|
|
else:
|
|
patr.note = first
|
|
first = 0xFF
|
|
if 0 < patr.note:
|
|
patr.note -= 1
|
|
if first & XMNoteFlags.INSTRUMENT != 0:
|
|
patr.instrument = stream.get_u8( )
|
|
size -= 1
|
|
if first & XMNoteFlags.VOLUME != 0:
|
|
patr.volume = stream.get_u8( )
|
|
size -= 1
|
|
if first & XMNoteFlags.EFFECT_COMMAND != 0:
|
|
patr.effect_command = stream.get_u8( )
|
|
size -= 1
|
|
if first & XMNoteFlags.EFFECT_PARAM != 0:
|
|
patr.effect_param = stream.get_u8( )
|
|
size -= 1
|
|
if 0 < patr.note:
|
|
if xm_file_flags & Mod.ModFlags.LINEAR_FREQUENCY_TABLE != 0:
|
|
patr.key_number = self._conv_linear_freq( patr.note )
|
|
else:
|
|
patr.key_number = self._conv_amiga_freq( patr.note )
|
|
line.append( patr )
|
|
pattern.append( line )
|
|
patterns.append( pattern )
|
|
|
|
return patterns
|
|
|
|
## ノート番号からAMIGA式で周波数計算する
|
|
## @param note ノート番号
|
|
## @return 周波数
|
|
func _conv_amiga_freq( note:int ) -> int:
|
|
return int( 6848.0 / pow( 2.0, note / 12.0 ) )
|
|
|
|
## ノート番号から線形で周波数計算する
|
|
## @param note ノート番号
|
|
## @return 周波数
|
|
func _conv_linear_freq( note:int ) -> int:
|
|
return 7680 - note * 64
|
|
|
|
## 楽器データを読み込む
|
|
## @param stream ストリーム
|
|
## @param instrument_count 楽器数
|
|
## @return 楽器データ
|
|
func _read_instruments( stream:StreamPeerBuffer, instrument_count:int ) -> Array[Mod.ModInstrument]:
|
|
var instruments:Array[Mod.ModInstrument] = []
|
|
|
|
for i in ( instrument_count ):
|
|
var inst: = Mod.ModInstrument.new( )
|
|
var size:int = stream.get_u32( )
|
|
var remain_size:int = size
|
|
inst.name = self._read_string( stream, 22 )
|
|
#print( "%d/%d %s" % [ i, instrument_count, inst.name] )
|
|
var instrument_type:int = stream.get_u8( )
|
|
if instrument_type != 0:
|
|
# 0以外のやつもいるらしいので無視
|
|
#return []
|
|
pass
|
|
|
|
var sample_count:int = stream.get_u16( )
|
|
var sample_numbers:Array = []
|
|
remain_size -= 4 + 22 + 1 + 2
|
|
if 0 < sample_count:
|
|
var sample_header_size:int = stream.get_u32( )
|
|
sample_numbers = stream.get_partial_data( 96 )[1]
|
|
inst.volume_envelope = Mod.ModEnvelope.new( )
|
|
for k in range( 12 ):
|
|
var ve: = Mod.ModEnvelopePoint.new( )
|
|
ve.frame = stream.get_u16( )
|
|
ve.value = stream.get_u16( )
|
|
inst.volume_envelope.points.append( ve )
|
|
inst.panning_envelope = Mod.ModEnvelope.new( )
|
|
for k in range( 12 ):
|
|
var pe: = Mod.ModEnvelopePoint.new( )
|
|
pe.frame = stream.get_u16( )
|
|
pe.value = stream.get_u16( )
|
|
inst.panning_envelope.points.append( pe )
|
|
remain_size -= 4 + 96 + 48 + 48
|
|
inst.volume_envelope.point_count = stream.get_u8( )
|
|
inst.panning_envelope.point_count = stream.get_u8( )
|
|
inst.volume_envelope.sustain_point = stream.get_u8( )
|
|
inst.volume_envelope.loop_start_point = stream.get_u8( )
|
|
inst.volume_envelope.loop_end_point = stream.get_u8( )
|
|
inst.panning_envelope.sustain_point = stream.get_u8( )
|
|
inst.panning_envelope.loop_start_point = stream.get_u8( )
|
|
inst.panning_envelope.loop_end_point = stream.get_u8( )
|
|
inst.volume_envelope.set_flag( stream.get_u8( ) )
|
|
inst.panning_envelope.set_flag( stream.get_u8( ) )
|
|
inst.vibrato_type = stream.get_u8( )
|
|
inst.vibrato_speed = stream.get_u8( )
|
|
inst.vibrato_depth = stream.get_u8( )
|
|
inst.vibrato_depth_shift = stream.get_u8( )
|
|
inst.volume_fadeout = stream.get_u16( )
|
|
remain_size -= 16
|
|
|
|
if 0 < remain_size:
|
|
stream.get_partial_data( remain_size ) # reserved
|
|
|
|
if 0 < sample_count:
|
|
var sounds:Array[Mod.ModSample] = []
|
|
# Sound Header
|
|
for k in ( sample_count ):
|
|
var xms: = Mod.ModSample.new( )
|
|
xms.length = stream.get_u32( )
|
|
xms.loop_start = stream.get_u32( )
|
|
xms.loop_length = stream.get_u32( )
|
|
xms.volume = stream.get_u8( )
|
|
xms.finetune = stream.get_8( )
|
|
xms.loop_type = stream.get_u8( )
|
|
if xms.loop_type & 16 != 0:
|
|
xms.bit = 16
|
|
xms.loop_type &= 3
|
|
xms.panning = stream.get_u8( )
|
|
xms.relative_note = stream.get_8( )
|
|
stream.get_u8( ) # Reserved
|
|
xms.name = self._read_string( stream, 22 )
|
|
sounds.append( xms )
|
|
# Sound Data
|
|
for xms in sounds:
|
|
var d:Array[int] = []
|
|
var p:int = 0
|
|
|
|
if xms.bit == 16:
|
|
for k in ( xms.length >> 1 ):
|
|
p += stream.get_16( )
|
|
d.append( p & 0xFF )
|
|
d.append( ( p >> 8 ) & 0xFF )
|
|
else:
|
|
for k in ( xms.length ):
|
|
p += stream.get_8( )
|
|
d.append( p & 0xFF )
|
|
|
|
xms.data = PackedByteArray( d )
|
|
|
|
inst.samples = []
|
|
for k in sample_numbers:
|
|
if len( sounds ) <= k:
|
|
inst.samples.append( sounds[0] )
|
|
else:
|
|
inst.samples.append( sounds[k] )
|
|
|
|
instruments.append( inst )
|
|
|
|
return instruments
|
|
|
|
## 文字列の読み込み
|
|
## @param stream ストリーム
|
|
## @param size 文字列サイズ
|
|
## @return 読み込んだ文字列を返す
|
|
func _read_string( stream:StreamPeerBuffer, size:int ) -> String:
|
|
return stream.get_partial_data( size )[1].get_string_from_ascii( )
|