Помогите код написать...

кулер 23

Захотелось зажигать светик через инет))http://cdxp.zx6.ru/viewp.php?id=37 Нашел прогу Исправил порт светика но вот вопрос что то тут еще менять надо?
до изменения портов

Код:

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

}

Добавлено спустя 19 секунд:
прога на СИ))

Master

Че за?

Цитата:

PORTC.7 = 0xFF;

Вот так можно

Код:

PORTC = 0xFF;

или так

Код:

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

Добавлено спустя 11 минут 7 секунд:
А вообще тема интересная, PHP страничку уже асилил?

кулер 23

Со страничкой помогли)) Сам несмог =(
А вот с прогой не многа не понял.....

Добавлено спустя 40 минут 11 секунд:
АА вот так=))??

Код:

switch(UDR)  

{  

case '1':  

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

break;  

case '0':  

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

break;   

}  

void main (void) 

{ 

while(1); 

}

Master

Код:

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

может так?

Код:

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

кулер 23

ммм.....Мне захотелось Подключить экранчик L2F50126 от сименса S65
В уроке написанно что надо выпаевать резисторы.....но там другой минибот.
А надо-ли выпаевать на моей версии 2.1 какие нибудь ризюки или не?
Зарание спасибо

EdGull

какие еще резюки?
цитату в студию!

кулер 23

Цитата:

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

EdGull

ты фото смотрел откуда это всё выпаивать?
Сможешь на своем МиниБоте найти такой участок платы?

galex1981

На своем миниботе он точно не найдет такой участок платы

SkyStorm

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

кулер 23 писал(а):

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

=DeaD=

Мышь непонимания пробежала между кулером 23 и EdGull'ом :crazy:

кулер 23

SkyStorm писал(а):

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

вот вот хоть ктото понял

EdGull

согласен, это я тупанул.
в версиях 2.х ничего выпаивать или пределывать не нужно, тупо втыкаешь ЖКИ с припаяным шлейфом в разъем МиниБота

кулер 23

А прога таже подоидет?

Код:

$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

EdGull

если подправить кварец и ноги, то будет.

roboforum.ru

Помогите код написать...

Кто сейчас на конференции