управление

[олежек]

$regfile = «atini 2313.dat» 'говорим компилятору что у нас мега8
$crystal = 8000000
Config Portb.1 = Output ' конфигурируем порт B.1 как выход
Config Pind.1 = Input ' конфигурируем порт B.1 как выход
Do
If Pind.1 = 0 Then ' УСЛОВИЕ - если на 2-й ножке порта С низкий логический уровень то...
Portb.1=1 'подключаем Portb.1 к положительному выводу источника питания
Waitms 500 'ждем пол секунды
Portb.1=0
Else ' в противном случае...
Portb.0 = 0 ' устанавливаем на ножке 0 порта В низкий логический уровень (светодиод не горит)
End If'конец условия
Loop
End ' начало бесконечного цикла

вот так получилось
пришлось правда резистор подтягиваюший единичку pind.1 на 4.7 ком поставить

[Engineer_Keen]

пришлось правда резистор подтягиваюший единичку pind.1 на 4.7 ком поставить

Надо было PORTD.1 в единицу установить, тогда резистор не нужен.

[олежек]

тоесть добавить строчку в конфигурацию порта
или заменить пин на порт

[олежек]

хоть порт пиши хоть пин
все равно без резистора не работает

[Engineer_Keen]

Вы в курсе за что отвечают регистры PORTn, DDRn и PINn каждого порта? Если нет, советую сходить в обучалку...

[олежек]

да читал я про конфигурацию портов
я написал и порт целиком в 1
и пин выставил в единицу
пробовал по всякому
без резистора не тянется ножка
не знаю почему

[Engineer_Keen]

без резистора не тянется ножка не знаю почему

Ну тогда остается только вариант что ножка спалилась

[олежек]

сразу на двух мк спалилась?

[олежек]

здравствуйте

усложнение задачки
вот сюда надо подключить еще одну кнопку
сказжем на порт д2
она должна прибавлять время скажем на 10 и до бесконечности
и кнопку которая будет убавлять время на 10 и до 0

tit не плохо бы вывести значение этого времени на семисегментный индикатор

$regfile = «atini 2313.dat» 'говорим компилятору что у нас мега8
$crystal = 8000000
Config Portb.1 = Output ' конфигурируем порт B.1 как выход
Config Pind.1 = Input ' конфигурируем порт B.1 как выход
Do
If Pind.1 = 0 Then ' УСЛОВИЕ - если на 2-й ножке порта С низкий логический уровень то...
Portb.1=1 'подключаем Portb.1 к положительному выводу источника питания
Waitms 500 'ждем пол секунды
Portb.1=0
Else ' в противном случае...
Portb.0 = 0 ' устанавливаем на ножке 0 порта В низкий логический уровень (светодиод не горит)
End If'конец условия
Loop
End ' начало бесконечного цикла