* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки

186 Энциклопедия электронных схем ИНФРАКРАСНЫЙ СЧИТЫВАТЕЛЬ КАРТОЧЕК ДЛЯ ПК Светодиод является источником инфракрас ного излучения большой мощности. Он под ключен к источнику питания через токоогра ничительный резистор R1. При напряжении питания 9 В и сопротивлении резистора R1 220 Ом светодиод будет работать при токе около 25 мА. При напряжении питания 5 В сопротивление резистора R1 должно быть 150 Ом, чтобы ток светодиода остался на уров не 25 мА. Излучение возбуждает npn фото транзистор Q1, который включен по схеме обычного инвертирующего усилителя. Чем больше света попадает на фототранзистор, тем меньше становится выходное напряже ние на его коллекторе. При сопротивлении резистора R2 2,2 кОм схема формирует ТТЛ совместимые логические уровни. Выходной сигнал фототранзистора Q1 подан на одну из линий данных параллельного порта ПК. Диод D2 позволяет использовать источники ElectronicsNow Рис. 20.15 питания с напряжением больше 5 В, поддер живая при этом ТТЛ совместимые логичес кие уровни даже при высоком напряжении питания. Если напряжение на коллек торе фототранзистора Q1 превысит уровень 5 В, D2 закроется и тем самым защитит параллельный порт. С другой стороны, когда на коллекторе фототранзис тора Q1 устанавливается низкий уровень, D2 открывается, и это состояние может быть передано в порт. Тексты программ приведены в листингах 1–3. Листинг 1. Основная программа REM************************************************** REM** SWIPE.BAS V950121 (0) 1995, JJ Barbarello ***** REM** ЗАМЕЧАНИЕ: ЭТО НЕКОМПИЛИРУЕМАЯ ВЕРСИЯ ***** REM************************************************** CLEAR t CLS I DEFINT A Z: DEFSTR Y Z: DIM x(16) DEF SEG =64: ON ERROR GOTO errortrap OPEN "R", 1, "BITPORT.DAT": FIELD 1, 4 AS a$ IF LOF(l) = 0 THEN a1 = PEEK(8) + 256 * PEEK(9) + 1 ELSE GET 1, 1: a1 = VAL(a$) + 1 END IF CLOSE 1 REM************* ОСНОВНОЙ ЦИКЛ ПРОГРАММЫ start1: