diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..40a2eaf --- /dev/null +++ b/.gitignore @@ -0,0 +1,6 @@ +/* +!/disassembler.pas +!/emulator.pas +!/.gitignore +!/license.md +!/readme.md diff --git a/disassembler.pas b/disassembler.pas index 7e04a70..9b1a76c 100644 --- a/disassembler.pas +++ b/disassembler.pas @@ -3,8 +3,8 @@ program Disassembler; uses Crt, Sysutils; var - Op, Regs: 0 .. $f; //Opcode - X, Y: 0 .. 3; //Register arguments + Op, Regs: 0 .. $f; //Opcode, and register arguments in a single variable + X, Y: 0 .. 3; //Register arguments in separate variables Addr, IP, EP: word; //Address argument and instruction and end pointers Opcodes: array [0 .. $f] of string; //Opcodes in human readable form Bin: array [0 .. $ffef] of byte; //Program in binary form @@ -30,7 +30,7 @@ begin Opcodes [$e] := 'CLEQ '; Opcodes [$f] := 'CLNEQ '; - //Initialise the pointer + //Initialise the instruction pointer IP := 0; //Read a program file and check for errors