Магнитные карты и ПК - Гёлль Патрик. Страница 14

Считывание дорожки ISO 2

Логично сначала заинтересоваться именно этой дорожкой, расположенной посередине, поскольку она одновременно и наиболее используемая, и самая легкая в интерпретации. Даже при плотности 75 bpi сигналы, поступающие от декодера, могут быть достаточно высокой частоты.

Не доходя до программирования на ассемблере, нам пришлось использовать язык, известный своим быстродействием, — Turbo Pascal. Даже в этих условиях не стоит надеяться обойтись компьютером с производительностью ниже, чем у 386SX25, чьих возможностей едва хватает.

На сайте издательства www.dmk.ru содержатся исходный текст программы LECT75.PAS, приведенный выше, и соответствующий исполняемый файл LECT75.EXE. Эта программа создает файл CARTE.CAR, содержащий данные, считанные с дорожки, — 240 бит.

Это 48 раз по 5 бит, то есть 40 полезных знаков, которые максимально может содержать дорожка ISO 2, и 40 бит нулей заполнения, избыток которых не важен.

Формат этого файла (.CAR) мы определили уже несколько лет назад для считывания чип-карт; текст в коде ASCII, состоящий исключительно из 1 и 0, разделенных пробелами. С учетом линейной структуры магнитных дорожек никакого разбиения ни на группы битов, ни на строки фиксированной длины предусмотрено не было. Преобразование двоичных данных в цифровые символы, а также другие интересные анализы будут доверены другим программам, написанным на GWBASIC. Программа предполагает, что адрес порта игровой приставки — 513 (в десятичной системе); это имеет место для всех действительно IBM PC-совместимых ПК.

После запуска программа ожидает момента, когда карта будет вставлена в считывающее устройство. Затем начинается процесс считывания информации, и после считывания 240 бит раздается звуковой сигнал. Отсутствие звукового сигнала свидетельствует, что было получено менее 240 бит: это означает некачественное считывание либо то, что карта не полностью запрограммирована.

В подобном случае необходимо вставить карту вторично. Если блокировка продолжается, воспользуйтесь другой картой, которая уже считывалась с первого раза. Чтобы непосредственно получить отображение содержимого дорожки в битовом виде, в оболочке из основной программы LECTISO2.BAS посредством строки 30 вызывается внешняя программа LECT75.EXE. При этом, конечно, необходимо, чтобы программа COMMAND.СОМ была доступна через путь поиска PATH, в котором должна быть соответствующая запись, либо просто скопирована в текущую директорию.

Обратите внимание, что все эти программы были написаны специально для работы в DOS. Рекомендуется воздержаться от их запуска через Windows (в окне DOS), поскольку это может замедлить их выполнение.

В некоторых случаях предпочтительно дезактивировать некоторые резидентные программы, например ЕММ 386. Пользователи PC, привыкшие работать в Windows (версия не имеет значения), должны закрыть эту операционную систему, прежде чем приступить к выполнению программ.

_{10 REM — LECTISO2.BAS —}

_{20 KEY OFF: CLS: PRINT: PRINT: PRINT: PRINT}

_{30 SHELL "LECT75.EXE"}

_{40 OPEN "carte.car" FOR INPUT AS #1}

_{50 DIM T(240)}

_{60 FOR F=1 TO 240}

_{70 INPUT#1,T(F)}

_{80 NEXT F}

_{90 J=1}

_{100 IF T(J)<>1 THEN 160}

_{110 IF T(J+1)<>1 THEN 160}

_{120 IF T(J+2)<>0 THEN 160}

_{130 IF T(J+3)<>1 THEN 160}

_{140 IF T{J+4)<>0 THEN 160}

_{150 K=J: GOTO 200}

_{160 J=J+1: GOTO 100}

_200 C$=""

_{210 FOR F=0 TO 4}

_{220 IF T(K+F) =0 THEN C$=C$+"0"}

_{230 IF T(K+F) =1 THEN C$=C$+"1"}

_{240 NEXT F}

_{250 GOSUB 2000}

_{260 K=K+5: IF K>235 THEN END}

_{270 GOTO 200}

_{2000 IF C$="11010* THEN PRINT "{start}"}

_{2010 IF C$="10110" THEN PRINT "{sep}"}

_{2020 IF CS="11111" THEN PRINT "{end}"}

_{2030 IP C$="01011" THEN PRINT "{10}";}

_{2040 IF C$="00111" THEN PRINT "{12}";}

_{2050 IF C$="01110" THEN PRINT "{14)";}

_{2060 IF C$="00001" THEN PRINT "0";}

_{2070 IF C$="10000" THEN PRINT "1";}

_{2080 IF C$="01000" THEN PRINT "2";}

_{2090 IF C$="11001" THEN PRINT "3";}

_{2100 IF C$="00100“ THEN PRINT "4";}

_{2110 IF C$="10101" THEN PRINT "5";}

_{2120 IF C$="01101" THEN PRINT "6";}

_{2130 IF C$="11100" THEN PRINT "7";}

_{2140 IF C$="00010" THEN PRINT "8";}

_{2150 IF C$="10011" THEN PRINT "9";}

_{2170 RETURN}

Программа LECTISО2.BAS — основная программа, которую вы будете использовать для считывания дорожки ISO 2 стандартных магнитных карт. Если LECT75.EXE присутствует в текущей директории (наряду с COMMAND.COM), то любое прохождение читаемой карты (в правильном направлении) должно привести к отображению 240 считанных бит и соответствующих цифровых данных.

Ниже показано, что это дает в конкретном случае с файлом TEST5.CAR, представленным на сайте www.dmk.ru. Так, файл TEST5.CAR, декодированный с помощью программы LECTISО2.BAS, будет иметь следующий вид:

Одновременно создается файл CARTE.CAR, который нетрудно переименовать в DOS (командой REN), если есть желание его сохранить. Ни один из тестов (на четность или LRC) не производится.

Такие проверки можно осуществить по запросу при необходимости (дальше будут представлены соответствующие программы). Однако при этом существует риск сбоя в считывании некоторых нестандартных карт.

При отображении данных, записанных на дорожке, используются не стандартные «кабалистические* знаки, представленные выше в виде пяти- и семибитного кода ANSI, а знаки в более наглядной форме:

• флажок начала: {start};

• разделитель полей: {sep};

• флажок конца: {end};

• специальные знаки: {10}, {12} и {14}.

Внимание: не путайте эти фигурные скобки с простыми!

Считывание дорожки ISO 1

Работать с дорожкой ISO 1 несколько сложнее, поскольку обычно она записана с плотностью 210 bpi и содержит семиразрядные коды алфавитно-цифровых символов.

Осуществить считывание позволяет программа LECT210.PAS, которая работает аналогично LECT75.PAS. Ее исполняемая версия (LECT210.EXE) может использоваться либо самостоятельно для создания файла CARTE.CAR на 630 бит, либо вызываться из другой программы в оболочке Basic.