Таблица истинности прикрепил.
Изначально на выводах GP2, GP4, GP5 должны быть единицы (включены подтягивающие резисторы) следовательно задержка равна 12 часам.

Что ещё важно, перемычки будут устанавливаться только при выключенном устройстве. То есть контроллеру нужно будет опросить состояние этих выводов один раз и затем в зависимости от их состояния переходить на подпрограммы моргания и таймера задержки.

нужна помощь

помогите у меня в программе протеус работает , а в железе нет

то есть работает только кнопка меню а кнопки + - нет .

Крыша едет.

программа прилагаеться а также протеус схема

Алгоритм такой:

Main:
High GPIO.0 '

Проверяем джампер 1:

if GPIO.4 = 0 then
time = 1
endif

Проверяем джампер 2:

if GPIO.3 = 0 then
time = 2
endif

Проверяем джампер 3:

if GPIO.2 = 0 then
time = 3
endif

Потом:

Loop1:

If time = 1 then
PAUSE 1000
endif

If time = 2 then
PAUSE 2000
endif

If time = 3 then
PAUSE 3000
endif

Low GPIO.0

Pause 3000

Goto Main

В общем, смысл такой.

Применительно к данному примеру:

If gpio.2. = 0 and gpio.3 = 0 and gpio.4 = 0 then
time = 2
endif

If gpio.2. = 0 and gpio.3 = 0 and gpio.4 = 1 then
time = 4
endif

и так далее...

TRISIO = %00111100 'устанавливаем выводы 6,7 на выход остальные на вход
i var word 'обьявляем переменную для организации длинных задержек
symbol j1 = GPIO.5 'для удобства переименовываем выводы
symbol j2 = GPIO.4 'j1-j3,джамперы
symbol j3 = GPIO.2
symbol up = GPIO.0 'up-выход управления ключём
symbol in = GPIO.1 'ирдикатор работы
clear
main: 'метка начала программы
up = 1 'устанавоиваем 1 на выводе управления
if j1=1 and j2=1 and j3=1 then 'если все джампы разомкнуты
gosub taim1 'переходим к п/прогр. задержки 12 часов
else 'если нет
up = 1 'оставляем единицу на выводе управления
endif
if j1=1 and j2=1 and j3=0 then 'если джамп j3-0
gosub taim2 'переходим к п/прогр. задержки 10 часов
else 'если нет
up = 1 'оставляем единицу на выводе управления
endif
goto main
end
taim1: 'п/прогр. задержки 12 часов
For i = 0 to 43200 'цикл от 0 до 43200 по 1 сек т.е 12 часов
up = 0 'во время цикла на выводе управления 0
pause 1000 'та самая секунда которую считаем 43200 раз
next
up = 1 'при выходе из цикла на выводе управления 1
return
taim2:
for i = 0 to 36000
up = 0
pause 1000
next
up = 1
return

Добавлено (31.10.2010, 17.29.26)
---------------------------------------------
что то не понял куда делись прбелы?

Эд17,

Вы тут уже столько расписали ))
Меня пока хватило только на написание конфигурации, и то наверное не правильно )

@ device PIC12F629,INTRC_OSC_NOCLKOUT,wdt_off,pwrt_on,mclr_on
TRISIO = %111100
SYMBOL LED_1HZ = GPIO.0
SYMBOL REBOOT = GPIO.1
symbol JMP1 = GPIO.5
symbol JMP2 = GPIO.3
symbol JMP3 = GPIO.2
OPTION_REG.7 = 1

Main:
if JMP1 = 0 then gosub main1
GOTO Main

main1:
high LED_1HZ
PAUSE 1000
LOW LED_1HZ
PAUSE 1000
RETURN

Всё, что после метки к основной программе не имеет отношения - это просто я проверял..

Мне тоже не понятно, как совместить работу двух подпрограмм одновременно. Я экспериментировал с двумя семисегментниками - что бы один выводил цифры а другой буквы одновременно. Но неполучилось.

У меня есть программа на асемблере для подобного устройства (там только две ножки установки и внешний кварц) но я там вообще ничего не понимаю ((

Лучше весь код давайте.

С первого взгляда все в норме. Только после опроса кнопки желательно добавить задержку ( Антидребезг )