网站 › 『编程语言区』 › 自己开发的一个学习汇编的软件

jim19 发表于 2023-7-16 14:21

自己开发的一个学习汇编的软件

本帖最后由 jim19 于 2023-7-16 20:22 编辑

开发完了就一直放着发霉了, 给有需要的人把程序附上了代码. 主要就是dosbox上套一个壳子, 代码写的比较烂, 还请多担待.






下载地址: https://sysfix.lanzoum.com/inQY912melgh

procedure TForm1.btndebugClick(Sender: TObject);
var
ts: TStringList;
i: integer;
begin
try
    ts := TStringList.Create;
    ts.LoadFromFile(ExtractFilePath(Application.ExeName) +
      'basic.conf');
    ts.Add('echo off');
    ts.Add('cls');
    ts.Add('mount c ' + ExtractFilePath(Application.ExeName));
    ts.Add('c:');

    ts.Add('cd bin');
    ts.Add('cls');
    ts.Add('debug.exe tempfile.exe');
    ts.Add('exit');
    ts.SaveToFile(ExtractFilePath(Application.ExeName) +
      'DOSBox.conf');


    RunFile('DOSBox.exe -noconsole');
    ts.SaveToFile(ExtractFilePath(Application.ExeName) +
      'dosbox.conf');
    delay(2000);
    try
      lstoutput.Clear;
      ts.LoadFromFile(ExtractFilePath(Application.ExeName) +
      'bin\out.dat');
      for i := 1 to ts.Count - 1 do
      begin
      lstoutput.Items.Add(ts.Strings);
      end;
    except

    end;
finally
    ts.Free;
end;

end;

苏紫方璇 发表于 2023-7-16 20:20

楼主请在帖子中插入部分核心代码吧（版规第一条，发布帖子必须带上关键代码和具体功能介绍）

jim19 发表于 2023-7-16 20:25

苏紫方璇 发表于 2023-7-16 20:20
楼主请在帖子中插入部分核心代码吧（版规第一条，发布帖子必须带上关键代码和具体功能介绍）

好的, sorry 已插

FAFA 发表于 2023-7-16 22:29

谢谢分享！~~~~~~~~~~~~~~~

lcylidong 发表于 2023-7-16 22:31

感谢分享，收藏了。

3536825424 发表于 2023-7-16 22:50

感谢分享👍

hjc2023 发表于 2023-7-17 11:11

应该用处很大

名词 发表于 2023-7-17 15:27

感谢分享，收藏了。

huhu9999 发表于 2023-7-18 12:04

感谢分享，有时候用来回忆一下汇编指令挺好！

zsenbao 发表于 2023-7-18 13:34

感谢分享，学习下。

查看完整版本: 自己开发的一个学习汇编的软件