Commit v2 changes.

README.md

@@ -4,26 +4,21 @@ XDK Assist is an application designed to allow you to easily communicate with an
 
 The original XDK Assist was originally closed source software. It was a product of me being on the original EvolutionX team and creating custom tools for our work. It eventually evolved into something more robust and I released it to the public as-is. A few updates were released, but the project never had an official homepage or source of truth for downloads.
 
-# Why release the code so late?
-
-I recently saw that some people are still using XDK Assist today even though it's been almost two decades since the original Xbox was released. Two decades ago I was a much different developer and wasn't so open to open sourcing my programs. Today, however, I'm all for it. I'm hoping release of this code might benefit the few folks out there who still use it. At a minimum it at least helps to preserve what I consider an important part of the Xbox homebrew scene.
+## How is this branch different?
 
-## Not so fast...
+The `2.x-dev` branch is different than the `master` branch in that it contains an unreleased version of XDK Assist. This version was a rewrite of the application to be more streamlined, faster, more stable, and remove a lot of cruft. Development of this version was never completed. It compiles and will run, but I do not remember what features were implemented beyond just having a UI. It doesn't look like the dump button is wired up, so functionality of this version is extremely limited. It's included for posterity.
 
-There are, however, some caveats. I was also a much (much) more junior developer two decades ago and did not use proper source control systems. Shoot, two decades ago I wasn't much of a developer at all. In the codebase you'll find a lack of decent commenting, organization, naming, etc. You'll also find lines of functional code commented out with no explanation as to why.
-
-This release of the code is also compiled from multiple backups. I've attempted to pull in the latest changes from each backup, but it's entirely possible I've missed something or pulled out a vital component.
+# Why release the code so late?
 
-Given the above items it's possible this application actually does not work. I have no way to test that this application still works as expected, since it requires an original Xbox a running debug bios. It will compile and run as expected, but there are things I simply cannot review. For example, `TBreakpoint` is commented out in `XBOXManager.pas` and is present in `Breakpoint.pas`. Was that a refactor in progress? Did I finish? Who knows.
+I recently saw that some people are still using XDK Assist today even though it's been almost two decades since the original Xbox was released. Two decades ago I was a much different developer and wasn't so open to open sourcing my programs. Today, however, I'm all for it. I'm hoping release of this code might benefit the few folks out there who still use it. At a minimum it at least helps to preserve what I consider an important part of the Xbox homebrew scene.
 
 # Requirements
 
 * Delphi 2007 <https://www.embarcadero.com>
 * Indy 10.1.1 <https://www.indyproject.org>
-* TMPHexEditor (bundled: hexcontrol)
 * A modded original Xbox with a debug bios loaded (i.e. EvoX)
 
-I was able to get this to compile again under Delphi 2007 with Indy 10 that ships with Delphi 2007. It also requires installation of a TMPHexEditor component (bundled with) from Markus Stephany (<https://www.stephanys.de>). You can find a newer version of this component, but it is not tested. You may be able to get it to compile with different versions of Delphi or Indy, but those are untested as well.
+I was able to get this to compile again under Delphi 2007 with Indy 10 that ships with Delphi 2007. You may be able to get it to compile with different versions of Delphi or Indy, but those are untested as well.
 
 # Shoutouts
 

XDKAssist.dpr

@@ -1,25 +1,29 @@
 program XDKAssist;
 
+{%ToDo 'XDKAssist.todo'}
+
 uses
   Forms,
   Dialogs,
   SysUtils,
-  Main in 'src\Main.pas' {frmMain},
-  Breakpoint in 'src\Breakpoint.pas',
-  LogStream in 'src\LogStream.pas',
-  Tool in 'src\Tool.pas',
-  Settings in 'src\Settings.pas',
-  AppGlobal in 'src\AppGlobal.pas',
-  XBOXManager in 'src\XBOXManager.pas';
+  MainForm in 'src\MainForm.pas' {frmMain},
+  CXboxManager in 'src\CXboxManager.pas',
+  CXMemoryManager in 'src\CXMemoryManager.pas',
+  CXBreakpointManager in 'src\CXBreakpointManager.pas',
+  Global in 'src\Global.pas',
+  Log in 'src\Log.pas',
+  AppStrings in 'src\AppStrings.pas';
+
+{$E exe}
 
 {$R *.res}
 
 begin
   Application.Initialize;
-  Application.Title := 'XDK Assist';
+  Application.Title := 'XDK Assist v2';
   try
     Application.CreateForm(TfrmMain, frmMain);
-  Application.Run;
+    Application.Run;
   except
     on E: Exception do ShowMessage(E.Message);
   end;

XDKAssist.dproj

@@ -1,24 +1,22 @@
 <?xml version="1.0" encoding="utf-8"?>
 <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
   <PropertyGroup>
-    <ProjectGuid>{bafd21de-c786-409f-87d5-f9f2162c20e4}</ProjectGuid>
+    <ProjectGuid>{5f6ecf7c-8be1-412e-b91f-a6378dc92d81}</ProjectGuid>
     <MainSource>XDKAssist.dpr</MainSource>
     <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
     <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
     <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
     <DCC_DependencyCheckOutputName>build\debug\bin\XDKAssist.exe</DCC_DependencyCheckOutputName>
-    <DCC_EnabledPackages>true</DCC_EnabledPackages>
-    <DCC_UsePackage>vcl;rtl;vclx;vclactnband;dbrtl;bdertl;dsnap;teeUI;teedb;tee;adortl;IndyCore;IndySystem;IndyProtocols;xmlrtl;inet;IntrawebDB_90_100;Intraweb_90_100;vclie;inetdbbde;inetdbxpress;soaprtl;VclSmp;MPHexEditor_D7;vcldb</DCC_UsePackage>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
     <Version>7.0</Version>
+    <DCC_FullBooleanEvaluations>True</DCC_FullBooleanEvaluations>
     <DCC_DebugInformation>False</DCC_DebugInformation>
     <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_IntegerOverflowCheck>True</DCC_IntegerOverflowCheck>
+    <DCC_RangeChecking>True</DCC_RangeChecking>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
     <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
-    <DCC_UnitSearchPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_UnitSearchPath>
-    <DCC_ResourcePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ResourcePath>
-    <DCC_ObjPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ObjPath>
-    <DCC_IncludePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_IncludePath>
     <DCC_Define>RELEASE</DCC_Define>
     <DCC_ExeOutput>build\release\bin</DCC_ExeOutput>
     <DCC_DcuOutput>build\release</DCC_DcuOutput>
@@ -28,11 +26,12 @@
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
     <Version>7.0</Version>
-    <DCC_SymbolReferenceInfo>2</DCC_SymbolReferenceInfo>
-    <DCC_UnitSearchPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_UnitSearchPath>
-    <DCC_ResourcePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ResourcePath>
-    <DCC_ObjPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ObjPath>
-    <DCC_IncludePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_IncludePath>
+    <DCC_FullBooleanEvaluations>True</DCC_FullBooleanEvaluations>
+    <DCC_IntegerOverflowCheck>True</DCC_IntegerOverflowCheck>
+    <DCC_RangeChecking>True</DCC_RangeChecking>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
+    <DCC_DebugVN>True</DCC_DebugVN>
     <DCC_Define>DEBUG</DCC_Define>
     <DCC_ExeOutput>build\debug\bin</DCC_ExeOutput>
     <DCC_DcuOutput>build\debug</DCC_DcuOutput>
@@ -44,17 +43,7 @@
     <Borland.Personality>Delphi.Personality</Borland.Personality>
     <Borland.ProjectType />
     <BorlandProject>
-<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">0</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">7</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">True</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="FileVersion">0.0.1.7</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="CompanyName">EvoX-T</VersionInfoKeys><VersionInfoKeys Name="FileDescription">Private EvoX-T training tool</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">XDK Assist</VersionInfoKeys><VersionInfoKeys Name="SpecialBuild">Rushed public release</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
-
-
-
-
-
-
-
-
-
-
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">False</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">XDKAssist.dpr</Source></Source>  <Excluded_Packages>
 
 
 
@@ -75,22 +64,23 @@
 
       <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
-    </Excluded_Packages><Source><Source Name="MainSource">XDKAssist.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
+    </Excluded_Packages>
+  </Delphi.Personality></BorlandProject></BorlandProject>
   </ProjectExtensions>
   <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
   <ItemGroup>
     <DelphiCompile Include="XDKAssist.dpr">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="src\AppGlobal.pas" />
-    <DCCReference Include="src\Breakpoint.pas" />
-    <DCCReference Include="src\LogStream.pas" />
-    <DCCReference Include="src\Main.pas">
+    <DCCReference Include="src\AppStrings.pas" />
+    <DCCReference Include="src\CXboxManager.pas" />
+    <DCCReference Include="src\CXBreakpointManager.pas" />
+    <DCCReference Include="src\CXMemoryManager.pas" />
+    <DCCReference Include="src\Global.pas" />
+    <DCCReference Include="src\Log.pas" />
+    <DCCReference Include="src\MainForm.pas">
       <Form>frmMain</Form>
     </DCCReference>
-    <DCCReference Include="src\Settings.pas" />
-    <DCCReference Include="src\Tool.pas" />
-    <DCCReference Include="src\XBOXManager.pas" />
     <None Include="XDKAssist.todo" />
   </ItemGroup>
 </Project>

XDKAssist.todo

@@ -1,19 +1,2 @@
-{TODO : Display percentage complete on progress bars}
-{TODO : For color logging have a rich it up function}
-{TODO : Fix disconnection tracking (linked with status checking?)}
-{TODO : Command queuing with response checking}
-{TODO -cLayout : Better status bar information (program status and what not)}
-{DONE -cLayout : Show and hide the main log. Have another log visible by a tabbed window}
-{TODO : Possible disassembly view?}
-{TODO : have a register compare option}
-{TODO : Keep complete breakpoint history with times and registers: list box that when you click it it changes the register information}
-{TODO : go through each function and make a list of what you don't like, then go back later and fix all the stuff}
-{TODO : Eat messages option will eat common messages like 200- ok and n: execution stopped}
-{TODO : Cut out 66% ram usage by reworking buffer stuff. Wait until other changes are in, so you can easily fix any speed issues}
-{TODO -cLayout : Redesign log area - show xbox logo faintly behind text, outline the input box, add coloring}
-{TODO : Solidify status changes and checking of status}
-{TODO : Internal tools editor}
-{TODO -cLayout : Redesign register window and breakpoint area}
-{TODO -cControls : THistoryBox - contains a 20 string list of previously entered text}
-{TODO -cControls : TMPHexEdit - rewrite to allow direct memory access to buffer - or - focus buffer elswhere}
-{TODO -cControls : THexBox - accepts only valid hexadecimal input. Features the ability to validate pastes, accept or rject different styles of notation ($,h,0x) and force capitals or zero fills}
+
+