roboforum.ru

Код: Выделить всё

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);

}

PORTC.7 = 0xFF;

Код: Выделить всё

PORTC = 0xFF;

Код: Выделить всё

PORTC.1 = 0;
PORTC.0 = 1;

Код: Выделить всё

switch(UDR) 

{ 

case '1': 

PORTC = 1;   //включено 

break; 

case '0': 

PORTC.7 = 0;   //выключено 

break;   

} 

void main (void)

{

while(1);

}

Код: Выделить всё

PORTC = 1;   //включено

Код: Выделить всё

PORTC.7 = 1;   //включено

--- 3.1 выпаять два резистора
--- 3.2 впаять первую перемычку
--- 3.3 впаять вторую перемычку

кулер 23 писал(а):А надо-ли выпаевать на моей версии 2.1 какие нибудь ризюки или не?

SkyStorm писал(а):Дык, он конкретно и спрашивает надо ли что нибудь делать с 2.1.

Код: Выделить всё

$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