Сообщение от
ZEman
А разве Remы так много занимают ?
:v2_dizzy_aaaaa
Я их использую для разделения программы на части чтоб не путаться, где, что.
каждая буква текста - один байт (их набегает 1231 символ), плюс сами REMы (113 штук), плюс бейсиковская информация по каждой строке - номер, длина, возврат каретки (113 штук * 5 байт = 565)
итого 1909 байт
чутка наврал, что больше 2кб 
-----
вот это тоже на машкоде реализовать совсем легко, места займёт меньше, а выполняться будет мгновенно:
Код:
4002 CLS
4003 PRINT INK 0; FLASH 1;AT 3,3;"Please wait 40 seconds !"
4005 LET adr=20672: LET peek=0: LET ra=61830
4007 LET di=adr+63
4009 FOR g=adr TO di
4011 LET peek=PEEK ra
4013 POKE g,peek
4015 LET ra=ra+1
4017 NEXT g
цикл копирования
Код:
LD HL, 61830 ; 3 байта
LD DE, 20672 ; 3 байта
LD BC, 64 ; 3 байта
LDIR ; 2 байта
RET ; 1 байт
итого: 12 байт
ну и вызов процедурки через rand usr val "...." - 10 байт,
что в итоге даст размер меньший, чем бейсиковское сообщение "подождите 40 сек"
Ответить с цитированием