"С.П.Расторгуев, А.Е.Долгин "Как защитить информацию" (пособие по борьбе с хакерами)" - читать интересную книгу автора

│300 OUT &H43, 4 │
│310 X% = INP ( &H40 ) + INP ( &H40 ) * 256 │
│320 PRINT X% │
└────────────────────────────────────────────────────────────┘
рис. 3.1

┌────────────────────────────────────────────────────────────┐
│1) чтение: │
│ Ассемблер: BASIC: │
│ ────────── ────── │
│ . . . . . . │
│mov al,номер байта CMOS 300 OUT &H70, номер байта CMOS │
│ out 70h,al 310 X% = INP ( &H71 ) │
│ jmp $+2 │
│ in al,71h . . . │
│ . . . │
│2 запись: │
│ Ассемблер: BASIC: │
│ ────────── ────── │
│ . . . . . . │
│ mov al,номер байта CMOS 300 OUT &H70, номер байта CMOS│
│ out 70h,al 310 OUT &H71, новое значение │
│ jmp $+2 │
│ mov al,новое значение . . . │
│ out 71h,al │
│ . . . │
└────────────────────────────────────────────────────────────┘
рис. 3.2


┌────────────────────────────────────────────────────────────┐
│ Ассемблер: BASIC: │
│ ────────── ───── │
│ . . . . . . │
│ mov ax,0f800h 500 DEF SEG = &Hf800 │
│ mov es,ax 510 S = 0 │
│ xor ax,ax 520 FOR I = 0 TO 32766 STEP 2 │
│ mov bx,ax 530 S = S + PEEK(I) + PEEK(I+1)*256│
│ mov cx,4000h 540 NEXT │
│rpt: 550 PRINT S │
│ add ax,es:[bx] │
│ inc bx . . . │
│ inc bx │
│ loop rpt │
│ . . . │
└────────────────────────────────────────────────────────────┘
рис. 3.3


4. ЗАЩИТА ОТ ИССЛЕДОВАНИЙ.