ZXNet эхоконференция «code.zx»

Привет, Yaroslav ! AM>> NAME01 EQU 00 AM>> NAME02 EQU 01 AM>> и т.д. (вместо NAME?? более-менее читаемое имя) YK> Зачем?? YK> ORG TABLE YK> DEFW PROG1 YK> DEFW PROG2 YK> DEFW PROG3 YK> .... А ты ориентируешься по _HОМЕРУ_ функции????? А если этих функций около сотни, то что делает 55-я, и какой номер у ф-ции "ПЕРЕДАТЬ В ЛИHИЮ СИМВОЛ ИЗ [A]"? [ ] AM>> а используется так: AM>> RST 16: DB _MENU AM>> RST 16: DB _PRINT AM>> DB "Hello All!",0 YK> BASIC 48.... зато это наглядно по крайней мере для меня! вот пара примеров: ============================================ цель - мне надо вывести "галочеку" в зависимости от флагов: : бит вызов функции куда STP_T BIT 0,(IY-81): RST 16: DB _ON_OFF: DW ST_ECHO BIT 1,(IY-81): RST 16: DB _ON_OFF: DW ST_EPOI BIT 3,(IY-81): RST 16: DB _ON_OFF: DW ST_INBF BIT 4,(IY-81): RST 16: DB _ON_OFF: DW ST_PRIN BIT 5,(IY-81): RST 16: DB _ON_OFF: DW ST_PWRC BIT 6,(IY-81): RST 16: DB _ON_OFF: DW ST_KIBF BIT 7,(IY-81): RST 16: DB _ON_OFF: DW ST_PRKE BIT 7,(IY-68): RST 16: DB _ON_OFF: DW ST_TIME BIT 7,(IY-80): RST 16: DB _ON_OFF: DW ST_FILE RET ;****************************** а вот пример работы с менюхами: STP_SERV CALL STP_S LD IX,WSETUPS RST 16: DB _OPEN_WIN STP_SS RST 16: DB _MENU : RET C [ ] тут мы вводим какое-то число STP_SS6 RST 16: DB _PRINT,AT,6,26,0 LD HL,SS_OBUF RST 16: DB _INP_3NUM JR C,NSTP_SS LD (OUT_DELAY),A JR NSTP_SS ;******************************** а вот тут мы выводим инфу о диске: ;ВЫВОД FILES,DEL,FREE,MARK,SIZE PRINT_INFO1 POP HL PRINT_INFO BIT 7,(IY-69): RET Z LD A,(IX+30) ; ФАЙЛОВ LD HL,INF_FL: RST 16: DB _DECO_NUM LD A,(IX+33) ; СТЕРТЫХ LD HL,INF_DL: RST 16: DB _DECO_NUM LD A,(IX+26) ; ОТМЕЧЕHЫХ LD HL,INF_SL: RST 16: DB _DECO_NUM LD C,(IX+31): LD B,(IX+32) ;FREE LD HL,INF_FR : CALL DECODE_BC4 LD C,(IX+27): LD B,(IX+28) ;MARK LD HL,INF_SZ: CALL DECODE_BC4 PUSH IX: LD IX,MID_WIN RST 16: DB _PRINT DB AT,0,7 INF_FL DB " ",AT,1,7 INF_DL DB " ",AT,2,6 INF_FR DB " ",AT,3,7 INF_SL DB " ",AT,4,6 INF_SZ DB " ",AT,8,8 INF_ST DB 32,0 POP IX : RET ;************************** ну как, можно понять? [ ] AM>> а использовать принцип Ис-доса AM>> LD C,??? : RST 16 - в сад! YK> Я его совсем не использую... т.е. юзаешь LD r,?: CALL adr что-ли? с _моей_ точки зрения - потери памяти (по 2 байта на вызов), а вызовов (у меня) сотни! [ ] YK> Там могут, конечно быть везде фиксиро- YK> ванные обращения по CALL. Я имею ввиду YK> "чужие обращения на керналь". Вот тут, YK> уж вряд ли, что сделать можно. Раз, уж для "чужих обращений" я использую тот-же RST 16! примеры "чужих обращений" - внешний setup для 2.20, оверлей статистики для 4.00... как оказалось - удобно! (хотя это только мое мнение) Hу вот и все *MAS* с кувалдой -+- ручки [левая и правая]