forum.petersplus.com - Internet forum

Пора сказать пару слов о том, как в SDK обращаться к функциям Estex и BIOS :)

Итак, когда вы пишете на RW1 вызов функции
func(1,2,3)
то это превращается препроцессором в
A=1;B=2;C=3;call func
и чтобы передать какие-то данные в ассемблер, нам нужно научиться читать регистры A,B и C
напоминаю как использовать ассемблер:
say "\! ld a,b"
итак, чтобы прочитать регистр A, используем:
say "\! ld hl,(_reg_a)"
для регистров B и C соответственно
say "\! ld hl,(_reg_b)" и say "\! ld hl,(_reg_c)"
обратно функция может возвращать резуьтаты в тех же регситрах A,B,C, но наиболее устоявшийся вариант для RW1 - это регистр L:
say "\! ld (_reg_l),hl"
чуть сложнее получается значение адреса func(&array)

say "\! ld de,(_reg_a)" // значение в ячейках переменных
say "\! ld hl,(_l_base)" // получение базового адреса переменных
say "\! add hl,de"
say "\! add hl,de" // теперь в hl адрес переменной или массива

если мы зададим строку в виде
def arr[5]='str'
то будем иметь массив 0x0002, 0x7473, 0x0072, 0x0000, 0x0000 (т.е. "пакет" из двух слов, каждый байт которых будет передавать букву) и чтобы передать указатель на такую строку в функцию на ассемблере придется сдвинуться на 1 ячеку, т.е. писать так:
func(&str+1)
либо прибавлять два байта внутри функции на ассемблере. К слову если строку задавать в двойных кавычках, то на одно слово будет приходиться одна буква, а не две.

Вот примерчик, который будет запускать какой-нибудь EXE-шник :)

robot "Exec"
author "Shaos"
main()
{
def name[10]='fn.exe'
exec(&name+1)
say "\! call exit"
}

exec() // (&filename+1)
{
say "\! ld de,(_reg_a)"
say "\! ld hl,(_l_base)"
say "\! add hl,de"
say "\! add hl,de"
say "\! ld bc,0040h"
say "\! rst 10h"
}

Alexander Shabarshin (shaos@mail.ru)
NedoPC Project