LED_0 VAR GPIO.5
LED_1 VAR GPIO.3
IN_1 VAR GPIO.1
IN_0 VAR GPIO.0
high LED_0
pause 500
low LED_0
pause 500
START:
IF IN_0 = 1 THEN
HIGH LED_0
ENDIF
IF IN_1 = 1 THEN
HIGH LED_1
ENDIF
GOTO START
Re: Логический тестер
Добавлено: Сб апр 30, 2011 16:03:11
alexmlw
как я понел он не присваивает состояние портов (GPIO.0; GPIO.1) так как если в if поставить IN_0 = 0 или IN_1 = 0 то свето диод загарается и не гаснет.
Re: Логический тестер
Добавлено: Сб апр 30, 2011 17:36:16
alexmlw
Поигравшись с выводами я всетаки запустил программу
LED_0 VAR GPIO.0
LED_1 VAR GPIO.1
IN_1 VAR BIT
IN_0 VAR BIT
high LED_0
pause 500
low LED_0
pause 500
START:
IN_0 = GPIO.5
IF IN_0 = 1 THEN
HIGH LED_0
ENDIF
LOW LED_0
IN_1 = GPIO.4
IF IN_1 = 1 THEN
HIGH LED_1
ENDIF
GOTO START
паралельно входам (GPIO.2; GPIO.4) и минусом поставил резистор на 1 К, что-бы не реагировал на наводки (это мой 3-й пик и все они реагируют на наводки) интересно почему?
'****************************************************************
'* Name : TEST-log.BAS *
'* Author : Alexander Troynin (alexmlw) *
'* Notice : Copyright (c) 2011 [select VIEW...EDITOR OPTIONS] *
'* Date : 30.04.2011 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
'GP0 - GP1 IN
'GP5 LED 0
'GP4 LED Hz
'GP3 LED 1
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
LED_0 VAR GPIO.0
LED_1 VAR GPIO.1
IN_1 VAR BIT
IN_0 VAR BIT
high LED_0
pause 500
low LED_0
pause 500
START:
IN_0 = GPIO.5
IF IN_0 = 1 THEN
HIGH LED_0
SOUND GPIO.2, [50, 1]
ENDIF
LOW LED_0
IN_1 = GPIO.4
IF IN_1 = 1 THEN
HIGH LED_1
SOUND GPIO.2, [100, 1]
ENDIF
GOTO START
в схему нужно поставить ключи, чтобы на in1 шол логический ноль, а на in2 единица. попробовал несколько вариантов включения не подошло.
Re: Логический тестер
Добавлено: Вс май 01, 2011 16:19:07
alexmlw
решил использовать транзисторы с включением один обший эмитер другой общий колектор как приведено на фото. Сегодня возможно собиру на плате и опробую.
Re: Логический тестер
Добавлено: Чт май 05, 2011 19:51:08
alexmlw
Получился пробник работает не плохо, правда на сильные наводки реагирует (на работе находил при помощи него скрытую проводку, дома не находит) думал повысить резисторы на входе, но не оказалось подходящих.
Проверял на плате старого советского компьютера, уравни показывает неплохо, когда частота большая с разными уровнями моргание свето диодов не видно светится один, а спикер помимо сигнала одного из уровней выдает короткий импульс звука друго-го уровня.
Способ использования прост. Подаем питание на пробник, подключаем минус пробника к минусу проверяемой схемы, а щупом становимся на логику.