View difference between Paste ID: QrZ33T6H and MHJtWLXA

-local sm_file
+
 	['1000'] = '4',    ['0100'] = '2',
 	['0010'] = '8',    ['0001'] = '6',
 	['1100'] = '1',    ['1010'] = '7',
 	['1001'] = 'B',    ['0110'] = 'A',
 	['0101'] = '3',    ['0011'] = '9',
 	['1110'] = '<81>', ['0111'] = '<83>',
 	['1101'] = '<61>', ['1011'] = '<8B>',
 	['1111'] = '<19>', ['0000'] = '0',
 }
 
 function string:getFieldContents(field)
 	local _, idx = self:find('#' .. field .. ':')
-function string:getField(field)
+
-	local _, idx = self:find('#' .. field:upper() .. ':')
+
 end
 
 local function processMeasure(measure)
 	local beat_notes = {''} -- reserve beat_notes[1] for opening tag if necessary
 	local note_count = 0
-	local beat_notes = {''}
+
 		table.insert(beat_notes, note_lookup_table[note])
 		table.insert(beat_notes, '') -- for possible note padding
-		beat_notes[#beat_notes+1] = note_lookup_table[note]
+
-		beat_notes[#beat_notes+1] = ''
+
 
 	if note_count == 4 then
 		for i=3, 9, 2 do beat_notes[i] = '0' end -- add appropriate note padding
 	elseif note_count == 8 then
-		for i=3, 9, 2 do beat_notes[i] = '0' end
+
-	elseif note_count == 8 then
+
 		beat_notes[1] = '['; table.insert(beat_notes, ']')
 	elseif note_count == 16 then
-		beat_notes[1], beat_notes[#beat_notes+1] = '[', ']'
+		beat_notes[1] = '('; table.insert(beat_notes, ')')
 	elseif note_count == 24 then
-		beat_notes[1], beat_notes[#beat_notes+1] = '(', ')'
+		beat_notes[1] = '['; table.insert(beat_notes, ']')
 	elseif note_count == 32 then
-		beat_notes[1], beat_notes[#beat_notes+1] = '[', ']'
+
 		beat_notes[1] = '{'; table.insert(beat_notes, '}')
 	elseif note_count == 48 then
-		beat_notes[1], beat_notes[#beat_notes+1] = '{', '}'
+
 		beat_notes[1] = '`'; table.insert(beat_notes, '\'')
 	elseif note_count == 64 then
-		beat_notes[1], beat_notes[#beat_notes+1] = '`', '\''
+		beat_notes[1] = '{'; table.insert(beat_notes, '}')
 	elseif note_count == 96 then
-		beat_notes[1], beat_notes[#beat_notes+1] = '{', '}'
+
 		beat_notes[1] = '`'; table.insert(beat_notes, '\'')
 	elseif note_count == 192 then
-		beat_notes[1], beat_notes[#beat_notes+1] = '`', '\''
+		beat_notes[1] = '`'; table.insert(beat_notes, '\'')
 	else
-		beat_notes[1], beat_notes[#beat_notes+1] = '`', '\''
+		return nil -- invalid note count
 	end
-		return nil
+
 	return table.concat(beat_notes) .. '\n'
 end
 
 local function smToDwi(full_path)
 	-- open sm file to read contents into string
-local sm_filename = 'test'
+	local sm_file
-local tmp = io.open(sm_filename .. '.sm')
+	do
-sm_file = tmp:read('*a')
+		local tmp = io.open(full_path .. '.sm')
-tmp:close()
+		sm_file = tmp:read('*a')
 		tmp:close()
-local title = sm_file:getField('TITLE')
+
-local artist = sm_file:getField('ARTIST')
+
-local file = sm_file:getField('MUSIC')
+	local changebpm = sm_file:getFieldContents('BPMS')
-local gap = tonumber(sm_file:getField('OFFSET')) * -1000
+	local start_bpm
-local sample_start = sm_file:getField('SAMPLESTART')
+	do -- separate first bpm and bpm changes
-local sample_length = sm_file:getField('SAMPLELENGTH')
+		start_bpm = changebpm:match('%d+%.?%d*%s*=%s*(%d+%.?%d*)')
-local changebpm = sm_file:getField('BPMS')
+		local _, idx = changebpm:find('%d+%.?%d*%s*=%s*%d+%.?%d*%s*,')
-local note_data, idx = sm_file:getField('NOTES')
+		if idx then
 			changebpm = changebpm:sub(idx + 1)
-local start_bpm = changebpm:match('%d*%.?%d*%s*=%s*(%d+%.?%d+)')
+		else
-if start_bpm == nil then end
+			changebpm = ''
 		end
-local _, idx = changebpm:find('%d*%.?%d*%s*=%s*%d+%.?%d+%s*,')
+
-if idx then
+
-	changebpm = changebpm:sub(idx + 1)
+	-- multiply all measures by 4 to convert to beat counts
-else
+	local changebpm_str = {}
-	changebpm = '' end
+	if changebpm ~= '' then
 		for beat, bpm, comma in changebpm:gmatch('(%d+%.?%d*)%s*(=%s*%d+%.?%d*)(,?)') do
-local changebpm_str = {}
+			table.insert(changebpm_str, string.format("%.3f", tonumber(beat) * 4)..bpm)
-if changebpm ~= '' then
+			if comma ~= '' then table.insert(changebpm_str, ',') end
-	for beat, bpm, comma in changebpm:gmatch('(%d*%.?%d*)%s*(=%s*%d+%.?%d*)(,?)') do
+		end
-		changebpm_str[#changebpm_str+1] = string.format("%.3f", tonumber(beat) * 4)..bpm
+
-		if comma ~= '' then changebpm_str[#changebpm_str+1] = ',' end
+
 	-- process common .sm file fields
 	local file_contents = {}
 	table.insert(file_contents, '#TITLE:'		  .. sm_file:getFieldContents('TITLE')					  .. ';\n')
-local file_contents = {}
+	table.insert(file_contents, '#ARTIST:'		  .. sm_file:getFieldContents('ARTIST')					  .. ';\n')
-file_contents[#file_contents+1] = '#TITLE:'			.. sm_file:getField('TITLE')					.. ';\n'
+	table.insert(file_contents, '#FILE:'		  .. sm_file:getFieldContents('MUSIC')					  .. ';\n')
-file_contents[#file_contents+1] = '#ARTIST:'		.. sm_file:getField('ARTIST')					.. ';\n'
+	table.insert(file_contents, '#BPM:'			  .. start_bpm											  .. ';\n')
-file_contents[#file_contents+1] = '#FILE:'			.. sm_file:getField('MUSIC')					.. ';\n'
+	table.insert(file_contents, '#GAP:'			  .. tonumber(sm_file:getFieldContents('OFFSET')) * -1000 .. ';\n')
-file_contents[#file_contents+1] = '#BPM:'			.. start_bpm									.. ';\n'
+	table.insert(file_contents, '#SAMPLESTART:'	  .. sm_file:getFieldContents('SAMPLESTART')			  .. ';\n')
-file_contents[#file_contents+1] = '#GAP:'			.. tonumber(sm_file:getField('OFFSET')) * -1000 .. ';\n'
+	table.insert(file_contents, '#SAMPLELENGTH:'  .. sm_file:getFieldContents('SAMPLELENGTH')			  .. ';\n\n')
-file_contents[#file_contents+1] = '#SAMPLESTART:'	.. sm_file:getField('SAMPLESTART')				.. ';\n'
+	if changebpm ~= '' then
-file_contents[#file_contents+1] = '#SAMPLELENGTH:'	.. sm_file:getField('SAMPLELENGTH')				.. ';\n\n'
+		table.insert(file_contents, '#CHANGEBPM:' .. table.concat(changebpm_str)						  .. ';\n')
-if changebpm ~= '' then
+
-	file_contents[#file_contents+1] = '#CHANGEBPM:'	.. table.concat(changebpm_str)					.. ';\n'
+	table.insert(file_contents, '#SINGLE:MANIAC:1:\n')
 
-file_contents[#file_contents+1] = '#SINGLE:MANIAC:1:\n'
+	do -- extract start of note data to end of file
 		local _, idx = sm_file:find('%d+%.%d+%s*%:', idx)
-local _, idx = sm_file:find('%d+%.%d+%s*%:', idx)
+		sm_file = sm_file:sub(idx + 1)
-sm_file = sm_file:sub(idx + 1)
+
 
-for measure in sm_file:gmatch('.-[,;]') do
+	for measure in sm_file:gmatch('.-[,;]') do
-	file_contents[#file_contents+1] = processMeasure(measure)
+		table.insert(file_contents, processMeasure(measure))
 	end
 
-local dwi_file = io.open(sm_filename .. '.dwi', 'w')
+	-- save converted file
-dwi_file:write(table.concat(file_contents)..'\n')
+	local dwi_file = io.open(full_path .. '.dwi', 'w')
-dwi_file:close()
+	dwi_file:write(table.concat(file_contents)..'\n')
 	dwi_file:close()
 end
 
 smToDwi('test')