 |
roboforum.ruТехнический форум по робототехнике. |
|
Re: Помогите код написать...
кулер 23 » 26 янв 2010, 09:54
switch(UDR)
{
case '1':
PORTB.1 = 0xFF; //включено
break;
case '0':
PORTB.1 = 0x00; //выключено
break;
}
void main (void)
{
while(1);
} switch(UDR)
{
case '1':
PORTC.7 = 0xFF; //включено
break;
case '0':
PORTC.7 = 0x00; //выключено
break;
}
void main (void)
{
while(1);
}
Re: Помогите код написать... Master » 26 янв 2010, 10:32
PORTC.7 = 0xFF;
PORTC = 0xFF;PORTC.1 = 0;
PORTC.0 = 1;
Re: Помогите код написать... кулер 23 » 26 янв 2010, 11:17
switch(UDR)
{
case '1':
PORTC = 1; //включено
break;
case '0':
PORTC.7 = 0; //выключено
break;
}
void main (void)
{
while(1);
} Master » 26 янв 2010, 13:28
PORTC = 1; //включено PORTC.7 = 1; //включено кулер 23 » 01 фев 2010, 14:05
Re: Помогите код написать... кулер 23 » 01 фев 2010, 19:59
--- 3.1 выпаять два резистора
--- 3.2 впаять первую перемычку
--- 3.3 впаять вторую перемычку
Re: Помогите код написать... EdGull » 02 фев 2010, 01:40
Re: Помогите код написать... galex1981 » 02 фев 2010, 01:45
Re: Помогите код написать... SkyStorm » 02 фев 2010, 11:03
кулер 23 писал(а):А надо-ли выпаевать на моей версии 2.1 какие нибудь ризюки или не?
Re: Помогите код написать... =DeaD= » 02 фев 2010, 11:07
Re: Помогите код написать... кулер 23 » 02 фев 2010, 12:30
SkyStorm писал(а):Дык, он конкретно и спрашивает надо ли что нибудь делать с 2.1.
Re: Помогите код написать... EdGull » 02 фев 2010, 13:21
кулер 23 » 02 фев 2010, 14:39
$hwstack = 128
$swstack = 128
$framesize = 128
$regfile = "m32def.Dat"
$crystal = 8000000
$baud = 1200
$include "LCD_Siemens_S65.cfg"
Config Adc = Single , Prescaler = Auto , Reference = Internal
Dim W As Word , J As Single
Cls
Box(0 , 0) ,(176 , 131) , White
Do
Lcdat 1 , 0 , "MiniBot спецом" , Blue , White
Lcdat 8 , 0 , "для Roboforum.ru" , Blue , White
Start Adc : W = Getadc(7) : Stop Adc : J = W / 400 : J = J * 2
Lcdat 16 , 0 , "Akb=" ; J , 0 , 255
Lcdat 24 , 0 , "4" , Blue , White
Lcdat 32 , 0 , "5" , Blue , White
Lcdat 40 , 0 , "6" , Blue , White
Lcdat 48 , 0 , "7" , Blue , White
Lcdat 56 , 0 , "8" , Blue , White
Lcdat 64 , 0 , "9" , Blue , White
Lcdat 72 , 0 , "10" , Blue , White
Lcdat 80 , 0 , "11" , Blue , White
Lcdat 88 , 0 , "12" , Blue , White
Lcdat 96 , 0 , "13" , Blue , White
Lcdat 104 , 0 , "14" , Blue , White
Lcdat 112 , 0 , "15" , Blue , White
Lcdat 120 , 0 , "16" , Blue , White
Lcdat 128 , 0 , "17" , Blue , White
Lcdat 136 , 0 , "18" , Blue , White
Lcdat 142 , 0 , "19" , Blue , White
Lcdat 150 , 0 , "20" , Blue , White
Lcdat 158 , 0 , "21" , Blue , White
Lcdat 166 , 0 , "22" , Blue , White
Wait 1
LoopВернуться в МиниБот — национальный класс роботов
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 0