1; SendKeyDelay and SendKeyDownDelay
2; https://www.autoitscript.com/autoit3/docs/functions/AutoItSetOption.htm#ExpandEnvStrings
3Opt("SendKeyDownDelay", 100) ;100 milliseconds

1#include <MsgBoxConstants.au3>
2
3; SendKeyDelay and SendKeyDownDelay
4; https://www.autoitscript.com/autoit3/docs/functions/AutoItSetOption.htm#ExpandEnvStrings
5Opt("SendKeyDownDelay", 100) ;100 milliseconds
6Opt("SendKeyDelay", 10) ;10 milliseconds
7
8Global $dosboxPath = "C:\Program Files (x86)\DOSBox-0.74\DOSBox.exe"
9; duke3d.conf runs a batch file called d3dvgm.bat
10Global $dosboxConfig = "C:\temp\duke3d.conf"
11; Length of each level in seconds retrieved from loading
12; MIDI files in Foobar2000 with custom column seconds
13Global $audioTrackLength = "C:\temp\audioTrackLength.txt"
14
15; Exit if required files not found
16Global $fName
17CheckDependency($dosboxPath)
18CheckDependency($dosboxConfig)
19CheckDependency($audioTrackLength)
20
21; Run Dosbox
22Run('"' & $dosboxPath & '"' & ' -conf ' & '"' & $dosboxConfig & '"')
23
24; Wait 3 seconds for Dosbox to load
25Global $hWnd = WinWait("[CLASS:Dosbox]", "", 3)
26Sleep(3000)
27
28; The main part of the script
29ReadTextFile()
30
31; Quit if required files are not found
32; https://www.autoitscript.com/autoit3/docs/functions/FileExists.htm
33Func CheckDependency($fName)
34   Local $iFileExists = FileExists($fName)
35   If Not $iFileExists Then
36      MsgBox($MB_SYSTEMMODAL, "", "The file " & $fName & " doesn't exist." & @CRLF & "FileExist returned: " & $iFileExists)
37      Exit 1
38   EndIf
39EndFunc
40
41; https://www.autoitscript.com/forum/topic/111408-read-text-file-line-by-line/
42; Script from user MHz
43Func ReadTextFile()
44   ; open file to read and store the handle
45   $handle_read = FileOpen($audioTrackLength, 0)
46   ; check the handle is valid
47   If $handle_read = -1 Then
48      ; show warning and exit with code 1
49      MsgBox(0, @ScriptName, 'failed to open handle to read the file')
50      Exit 1
51   EndIf
52
53   ; loop through each line of the file
54   While 1
55      ; read each line from a file
56      $line_read = FileReadLine($handle_read)
57      ; exit the loop if end of file
58      If @error Then ExitLoop
59       
60      ; Add 5 seconds

61      ; And multiply by 1000 for Sleep function
62      If $line_read > 1 Then
63         Local $strTrackLength = Number(($line_read + 5) * 1000)
64      Else
65         ContinueLoop
66      EndIf
67      
68      ; Activate the Dosbox window using the handle returned by WinWait.
69      WinActivate($hWnd)
70      Sleep(200)
71      
72      ; Begin VGM Recording
73      Send("^!{F7}")
74      Sleep(2000)
75      ; Exit pause command in batch file
76      Send("ENTER")
77      ; Wait for level to load
78      Sleep(8000)
79      ; God mode dnkroz
80      Send("dnkroz")
81      ; Sleep for the length of the track read from file
82      Sleep($strTrackLength)
83      ; Exit Duke3d - Escape, Up, Enter, y, Enter
84      Send("{ESCAPE}")
85      Sleep(1000)
86      Send("{UP}")
87      Sleep(1000)
88      Send("{ENTER}")
89      Sleep(1000)
90      Send("y")
91      Sleep(2000);
92      Send("{ENTER}")
93      ; Wait for game to exit to command prompt
94      Sleep(4000)
95      ; End VGM Recording
96      Send("^!{F7}")
97      Sleep(2000)
98   WEnd
99
100   ; close the file handle for read
101   FileClose($handle_read)
102EndFunc

1@echo off
2
3pause
4duke3d.exe /m /ns /v1 /l1
5pause
6duke3d.exe /m /ns /v1 /l2
7pause
8duke3d.exe /m /ns /v1 /l3
9pause
10duke3d.exe /m /ns /v1 /l4
11pause
12duke3d.exe /m /ns /v1 /l5
13pause
14duke3d.exe /m /ns /v1 /l6
15pause
16duke3d.exe /m /ns /v1 /l7
17pause
18duke3d.exe /m /ns /v2 /l1
19pause
20duke3d.exe /m /ns /v2 /l2
21pause
22duke3d.exe /m /ns /v2 /l3
23pause
24duke3d.exe /m /ns /v2 /l4
25pause
26duke3d.exe /m /ns /v2 /l5
27pause
28duke3d.exe /m /ns /v2 /l6
29pause
30duke3d.exe /m /ns /v2 /l7
31pause
32duke3d.exe /m /ns /v2 /l8
33pause
34duke3d.exe /m /ns /v2 /l9
35pause
36duke3d.exe /m /ns /v2 /l10
37pause
38duke3d.exe /m /ns /v2 /l11
39pause
40duke3d.exe /m /ns /v3 /l1
41pause
42duke3d.exe /m /ns /v3 /l2
43pause
44duke3d.exe /m /ns /v3 /l3
45pause
46duke3d.exe /m /ns /v3 /l4
47pause
48duke3d.exe /m /ns /v3 /l5
49pause
50duke3d.exe /m /ns /v3 /l6
51pause
52duke3d.exe /m /ns /v3 /l7
53pause
54duke3d.exe /m /ns /v3 /l8
55pause
56duke3d.exe /m /ns /v3 /l9
57pause
58duke3d.exe /m /ns /v3 /l10
59pause
60duke3d.exe /m /ns /v3 /l11

61pause
62duke3d.exe /m /ns /v4 /l1
63pause
64duke3d.exe /m /ns /v4 /l2
65pause
66duke3d.exe /m /ns /v4 /l3
67pause
68duke3d.exe /m /ns /v4 /l4
69pause
70duke3d.exe /m /ns /v4 /l5
71pause
72duke3d.exe /m /ns /v4 /l6
73pause
74duke3d.exe /m /ns /v4 /l7
75pause
76duke3d.exe /m /ns /v4 /l8
77pause
78duke3d.exe /m /ns /v4 /l9
79pause
80duke3d.exe /m /ns /v4 /l10
81pause
82duke3d.exe /m /ns /v4 /l11
83sleep.exe 10
84exit

1164
2242
3359
4353
5353
6376
7103
8201
9315
10232
11146
12185
13311
14195
15147
16184
17153
18165
19246
20254
21334
22394
23289
24158
25401
26379
27161
28251
29220
30179
31190
32130
33217
34185
35212
36213
37193
38281
39200
40172

1#include <Keyboard.h>
2
3const int SendKeyDownDelay = 200; // key is held down for 200 ms
4const int SendKeyDelay = 10; // 10 ms delay between key press
5
6const int numAudioTracks = 40; // Number of audio tracks
7
8// Time of each audio track in seconds
9int arrAudioTrackTime[] = {
10  164, 242, 359, 353, 353, 376, 103, 201, 315, 232, 146, 185, 311, 195, 147, 184, 153, 165, 246, 254, 334, 394, 289, 158, 401, 379, 161, 251, 220, 179, 190, 130, 217, 185, 212, 213, 193, 281, 200, 172
11};
12
13int count = 0; // Loop counter
14
15char godMode[]={'d', 'n', 'k', 'r', 'o', 'z'}; // God mode dnkroz
16byte escapeSequence[]={KEY_ESC, KEY_UP_ARROW, KEY_RETURN, 0x79, KEY_RETURN}; // Quit game - Esc, Up, Enter, y, Enter
17
18void setup()
19{
20  delay(10000); // Wait 10 seconds before starting
21  Keyboard.begin(); // Start the keyboard emulator
22}
23
24void loop() {
25  while(count < numAudioTracks){
26    vgmkeypress();
27    count++;
28  }
29  if (count == numAudioTracks) {
30    count++;
31    Keyboard.press(71+136); // Exit MAME scroll lock and escape
32    delay(SendKeyDownDelay);
33    Keyboard.release(71+136);
34    delay(1000);
35    Keyboard.press(KEY_ESC);
36    delay(SendKeyDownDelay);
37    Keyboard.releaseAll();
38    Keyboard.end(); // End the keyboard emulator
39  }
40  delay(1000);
41}
42
43void vgmkeypress() {
44  unsigned long AudioTrackTime;
45  AudioTrackTime = long(arrAudioTrackTime[count]) * 1000;
46  
47  Keyboard.press(KEY_RETURN); // Exit the pause command in batch file
48  delay(SendKeyDownDelay);
49  Keyboard.release(KEY_RETURN);
50  delay(40000); // Wait 40 seconds for game to load
51  
52  for (int i = 0; i < 6; i++){ // God mode dnkroz
53    Keyboard.press(godMode[i]);
54    delay(SendKeyDownDelay);
55    Keyboard.release(godMode[i]);
56    delay(SendKeyDelay);
57   }
58  
59  delay(AudioTrackTime); // Sleep for the length of the audio track
60  

61  for (int i = 0; i < 5; i++){ // Quit game - Esc, Up, Enter, y, Enter
62    Keyboard.press(escapeSequence[i]);
63    delay(SendKeyDownDelay);
64    Keyboard.release(escapeSequence[i]);
65    if (i == 3) {
66      delay(2000);
67    } else {
68      delay(1000);
69    }
70  }
71  delay(2000);
72}