Приклади для EnotVM32 від Автора EnotVM32 для FASM "00 EndProgram" use32 org 0 Include "Macros.asm" Start: ;Програма повинна починась з 0 - адреси ; тут тіло програми EndProgram ; ставиться наприкінці програми "01 Writeln_GetTimeStr" use32 org 0 Include "Macros.asm" Start: ;Програма повинна починась з 0 - адреси ; тут тіло програми Writeln_GetTimeStr ; Виведення часу у у вигляді "10:7:32.45"; Корисно для тестів швидкості та іншого. Readln0 ; Натиснути "Enter" для продовження. Аналог "Readln;" в TP. EndProgram ; ставиться наприкінці програми "02 CONT" use32 org 0 Include "Macros.asm" Start: ;Програма повинна починась з 0 - адреси ; тут тіло програми Writeln_GetTimeStr ; Виведення часу у у вигляді "10:7:32.45"; Корисно для тестів швидкості та іншого. CONT ; Виведення строки "Will Enter 'cont' or 'CONT' for continue" та очикування вводу 'cont' або 'CONT'. Для перестрахування від випадкового натиснення клавиш та "Enter". EndProgram ; ставиться наприкінці програми "03 WritelnYA" use32 org 0 Include "Macros.asm" Start: ;Програма повинна починась з 0 - адреси ; тут тіло програми Writeln_GetTimeStr ; Виведення часу у у вигляді "10:7:32.45"; Корисно для тестів швидкості та іншого. WritelnYA ; Виведення на екран вміст регістру YA у вигляді "1000 ($000003E8)". Корисно для тестів. CONT ; Виведення строки "Will Enter 'cont' or 'CONT' for continue" та очикування вводу 'cont' або 'CONT'. Для перестрахування від випадкового натиснення клавиш та "Enter". EndProgram ; ставиться наприкінці програми "04 Wait00secTime_and_Writeln_GetTimeStr" use32 org 0 Include "Macros.asm" Start: ;Програма повинна починась з 0 - адреси ; тут тіло програми Writeln_GetTimeStr ; Виведення часу у у вигляді "10:7:32.45"; Корисно для тестів швидкості та іншого. Wait00secTime_and_Writeln_GetTimeStr ; вивід "Wait Time 00 Sec" та очікування сис.часу коли секунди стануть рівноми 0. Далі виводить час у виігляді "10:30:0.5" і продовжує роботу. Корисно для вирахування часу у разі тестів (швидкості). CONT ; Виведення строки "Will Enter 'cont' or 'CONT' for continue" та очикування вводу 'cont' або 'CONT'. Для перестрахування від випадкового натиснення клавиш та "Enter". EndProgram ; ставиться наприкінці програми "05 VarStr" use32 org 0 Include "Macros.asm" Start: GOTOa Start1;Програма повинна починась з 0 - адреси ; тут тіло програми m1:VarStrB 255,'Hello world (VarStrB)' m2:VarStrW 255,'Hello world (VarStrW)' m3:VarStr3B 255,'Hello world (VarStr3B)' m4:VarStrDW 255,'Hello world (VarStrDW)' Start1: MOVrv YA,m1 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом MOVrv YA,m2 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом MOVrv YA,m3 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом MOVrv YA,m4 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом CONT ; Виведення строки "Will Enter 'cont' or 'CONT' for continue" та очикування вводу 'cont' або 'CONT'. Для перестрахування від випадкового натиснення клавиш та "Enter". EndProgram ; ставиться наприкінці програми "06 HelloWorld VarStr" use32 org 0 Include "Macros.asm" Start: GOTOa Start1;Програма повинна починась з 0 - адреси ; тут тіло програми m1:VarStrB 255,'Hello world (VarStrB)' m2:VarStrW 255,'Hello world (VarStrW)' m3:VarStr3B 255,'Hello world (VarStr3B)' m4:VarStrDW 255,'Hello world (VarStrDW)' Start1: MOVrv YA,m1 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом MOVrv YA,m2 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом MOVrv YA,m3 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом MOVrv YA,m4 ; {mov Rg32,V} WritelnStr ; виведення строк типа String на екран з вводом CONT ; Виведення строки "Will Enter 'cont' or 'CONT' for continue" та очикування вводу 'cont' або 'CONT'. Для перестрахування від випадкового натиснення клавиш та "Enter". EndProgram ; ставиться наприкінці програми