[alexprey]

Выкладываю очередную программу на gASM "Сканер памяти". Сканирует ячейки памяти, начиная с 0 по 20 и выводит список их значений во время сканирования
MemScan.app

MODE CONSOLE
$APP
const MaxCount,0,20
Start:
db memPos,0,0
db memCount,0,0
;Вносим данные в память
mov $5, "Hello world!!!"
mov $11, "This is a lie"
mov $19, "gASM FOREVER!!!!"
;Сканируем память
while:
mov #r0, $memPos
call WriteLn
inc #memCount
inc #memPos
cmp #memCount, #MaxCount
jnz ^while
mov #r1, #memCount
mov #r0, "Mem Scan Count: "
call concat
mov #r0, #r2
call WriteLn
hlt