Câu lạc bộ thức trắng cùng dientuvietnam.net

[techpro]

con gửi ông bà nội, vợ thì đi vắng...tha hồ vào diễn đàn tìm tòi, chắc quả này phải thức hết đêm.

hôm nào vơ bác lại đi vắng anh em mình đi làm ca bia nhé@ Đều ngoài HN gần gũi ngay đây thôi mà

[duytuan]

tui muốn tim hiểu một chút về psoc,ai đó chỉ cho tui được không???

[nhathung1101]

tui muốn tim hiểu một chút về psoc,ai đó chỉ cho tui được không???

Bạn ra trang ngoài, lên phía trên, tìm đến phần vi điều khiển. Ở đấy có rất nhiều cao thủ. Nhưng bạn cũng đừng quá khiêm tốn mà hỏi chung chung như vậy, cứ mạnh dạn nói ra cái bạn cần, sẽ có người giải đáp.

Ghi chú:
- Hãy dạo một vòng đã, học lấy cách hỏi, chỗ hỏi, rồi nhào zô.
- Chớ dại bén mảng đến chỗ tâm tình... Bạn cứ thử tưởng tượng bạn đi cưa cẩm, nhưng "thằng em nó" cứ quanh quẩn canh me... Bạn hiểu chứ???

[avr]

con gửi ông bà nội, vợ thì đi vắng...tha hồ vào diễn đàn tìm tòi, chắc quả này phải thức hết đêm.

ah, thích 8 ah. thức đêm mà chưa có gì để bận rộn ha. đưa ra vài cái cho vui nhe:
- bài hát này dùng đến những kĩ thuật nào nhỉ?

http://www.nhacso.net/Music/Song/Nha...7/08/05F636C8/

- các bác nào biết gì về nitor lỏng không ?
xem Terminal mà thấy Nitor lỏng làm vỡ vụn tên N-1000 mà kẻ hủy diệt không tài nào thắng KO được. hoặc nghe nói Nitor lỏng còn dùng làm cho đất cứng trở nên mềm dễ đào hơn.
- có cách nào làm tăng khối lượng riêng của nước = điện không ?
- điện tử giả sử là ở mức độ VXL-PLC-CNC-v.v....có cách nào ứng dụng vào điện ảnh không ?

[techpro]

ah, thích 8 ah. thức đêm mà chưa có gì để bận rộn ha. đưa ra vài cái cho vui nhe:
- bài hát này dùng đến những kĩ thuật nào nhỉ?

http://www.nhacso.net/Music/Song/Nha...7/08/05F636C8/

- các bác nào biết gì về nitor lỏng không ?
xem Terminal mà thấy Nitor lỏng làm vỡ vụn tên N-1000 mà kẻ hủy diệt không tài nào thắng KO được. hoặc nghe nói Nitor lỏng còn dùng làm cho đất cứng trở nên mềm dễ đào hơn.
- có cách nào làm tăng khối lượng riêng của nước = điện không ?
- điện tử giả sử là ở mức độ VXL-PLC-CNC-v.v....có cách nào ứng dụng vào điện ảnh không ?

Bài hát nghe hay tuyệt còn những vấn đề liên quan thì bó tay

[techpro]

Trang web khá hay dành cho anh em nghiên cứu nhé. Vì nó khá đầy đủ nên anh em khai thác thoả sức mà không sợ hết. Nào bắt đầu
http://www.i-magazine.com.br/imagazi...cuitos2-r.html

[thaithienanh]

"Trắng đêm không ngủ bên tách cà phê đen chúng ta ôn chuyện đời...."

"Thức trắng đêm nay hai đứa chúng mình chưa vơi hết tâm tư, ta kể nhau nghe những vui buồn ấu thơ...."

Ráng hát lên thì mới đỡ buồn ngủ chứ mấy bác

[hoctro89xxx]

Trang web khá hay dành cho anh em nghiên cứu nhé. Vì nó khá đầy đủ nên anh em khai thác thoả sức mà không sợ hết. Nào bắt đầu
http://www.i-magazine.com.br/imagazi...cuitos2-r.html

cám ơn chú em, trang này rất hữu ích với anh.
ngày nào mình cũng thức đến giờ này thế mà mai vẫn làm việc bình thường. phục mình thật...

[techpro]

cám ơn chú em, trang này rất hữu ích với anh.
ngày nào mình cũng thức đến giờ này thế mà mai vẫn làm việc bình thường. phục mình thật...

Nếu khai thác được hết hoặc gần hết thì phải truyền đạt lại cho em bác nhé. Cám ơn bác đã cám ơn em!

[gtvt45]

có 1 đêm ko vào mà anh em đã có thành tích "đầy vai" thế à?
thấy hổ thẹn, hổ thẹn tại thói ham chơi chuyện "vợ con" chẳng may sắp quên nghiệp điện tử. đêm nay chúng ta cùng hát vang điệp khúc AVR nhé.
à nói nhiều thế mà anh em chưa rõ nhau thế nào nhỉ?
chúng ta hiểu qua về nhau chứ?
mình là Hùng sinh viên Giao thông.
còn anh em???

To techpro: bạn cho mình YM nhé, chúng ta nói chuyện qua đó nhanh hơn vì mình cũng chưa chuẩn bị dc nhiều để diện kiến cao thủ.
okie

[hoctro89xxx]

đêm nay chưa thấy chú em techpro vãng lai vào đây nhỉ!

[techpro]

Săp đi công tác rồi chắc nhớ anh em lắm. Bác 89xxx đã nghiên cứu được bao nhiêu phần trăm trang web đó rồi?
Nhân tiện đưa cái code xử lý tín hiệu GPS nếu ai cần thì cứ dùng tự nhiên.

PROGRAM GPS;

//--------------------------------GPS-------------------------------------------
var
      RArray : array[20] of char;  //NMEA string buffer
      Pcomma : array[15]of byte;   //comma positon buffer
      txt : array[8] of char;      //NMEA Code buffer for "$GPCGA," or other
      RxEnd,  Count, Kenh, Time, Light : byte;
      stopgps, Setting, GMT_hour_int, GMT_Menute_int, GMT_Person_int,j:integer;
      GMT_hour, GMT_Menute, GMT_Person,tg:string[3];
//-----------------------------------------------------------------------


// -----------if NMEA Code exist save data in Rarray buffer------------------
procedure TxtExist(var chcc : array[7] of char);
var  chc : array[7] of char;
     bb : char;
begin
   Count := 0;
   bb := 0;
   for bb := 0 to 6 do chc[bb] := chcc[bb];

   while Count <> 7 do
     begin
       if USART_data_ready <> 0 then
         begin
           bb := USART_read;
             if bb = chc[Count] then inc(Count) else Count := 0;
         end;
      end;
   Count := 0;
//   porta:=255;
   while Count <> 20 do
   begin
    if USART_data_ready <> 0 then
      begin
           bb := USART_read;
           RArray[Count] := bb;
           inc(Count);
       end;
    End;
end;
//------------------- Pulse functions -----------------------
procedure kenh1(num:integer);
var i:integer;
begin
     for i:=1 to num do
       begin
              porta:=1;
              delay_ms(500);
              porta:=0;
              delay_ms(1500);
              porta:=1;
              delay_ms(500);
              porta:=0;
              delay_ms(1500);
              porta:=1;
              delay_ms(500);
              porta:=0;
              delay_ms(5500);
        end;
end;
procedure kenh2(num:integer);
var i:integer;
begin
     for i:=1 to num do
         begin
              porta:=2;
              delay_ms(300);
              porta:=0;
              delay_ms(1700);
              porta:=2;
              delay_ms(300);
              porta:=0;
              delay_ms(1700);
              porta:=2;
              delay_ms(6000);
              porta:=0;
              delay_ms(10000);
        end;
end;

procedure kenh3(num:integer);
var i:integer;
begin
     for i:=1 to num do
         begin
              porta:=4;
              delay_ms(500);
              porta:=0;
              delay_ms(2500);
              porta:=4;
              delay_ms(500);
              porta:=0;
              delay_ms(2500);
              porta:=4;
              delay_ms(3500);
              porta:=0;
              delay_ms(10500);
        end;
end;

procedure kenh4(num:integer);
var i:integer;
begin
     for i:=1 to num do
         begin
              porta:=8;
              delay_ms(1000);
              porta:=0;
              delay_ms(2500);
              porta:=8;
              delay_ms(1000);
              porta:=0;
              delay_ms(2500);
              porta:=8;
              delay_ms(3000);
              porta:=0;
              delay_ms(10000);
        end;
end;
procedure kenh5(num:integer);
var i:integer;
begin
     for i:=1 to num do
         begin
              porta:=32;
              delay_ms(500);
              porta:=0;
              delay_ms(1500);
              porta:=32;
              delay_ms(500);
              porta:=0;
              delay_ms(1500);
        end;
end;
//---------------Convert-----------------------------------------------------
function MiliSecond(var put: string[3]): integer;
var      tram,chuc,donvi:integer;
begin
     case put[0] of
          '0' : tram:=0;
          '1' : tram:=100;
          '2' : tram:=200;
          '3' : tram:=300;
          '4' : tram:=400;
          '5' : tram:=500;
          '6' : tram:=600;
          '7' : tram:=700;
          '8' : tram:=800;
          '9' : tram:=900
      else
          tram:=0;
      end;
      case put[1] of
          '0' : chuc:=0;
          '1' : chuc:=10;
          '2' : chuc:=20;
          '3' : chuc:=30;
          '4' : chuc:=40;
          '5' : chuc:=50;
          '6' : chuc:=60;
          '7' : chuc:=70;
          '8' : chuc:=80;
          '9' : chuc:=90
      else
          chuc:=0;
      end;
      case put[3] of
          '0' : donvi:=0;
          '1' : donvi:=1;
          '2' : donvi:=2;
          '3' : donvi:=3;
          '4' : donvi:=4;
          '5' : donvi:=5;
          '6' : donvi:=6;
          '7' : donvi:=7;
          '8' : donvi:=8;
          '9' : donvi:=9
      else
          donvi:=0;
      end;
  result   :=     tram+chuc+donvi;
end;


// Main ---------------------------------------------
begin
    LCD_Init(portb);
//     RArray:='';
    TRISA:=0;
    TRISD:=251;
    PORTA:=0;
    usart_init(9600);
    delay_ms(300);
    Setting:=1;
    Light:=3;
            Kenh:=EEProm_read($3F);
            if Kenh=255 then
              begin
                   EEProm_write($3F,1);
                   Kenh:=1;
               end;
            Time:=EEProm_read($41);
            if Time=255 then
              begin
                EEProm_write($41,1);
                Time:=1;
              end;
    LCD_Cmd(LCD_CLEAR);
    LCD_Cmd(LCD_CURSOR_OFF);
    LCD_Out(1,1,'KENH:   TIME:');
    stopgps := 0;
    txt := '$GPGGA,';    //NMEA code
            Bytetostr(Kenh,tg);
            Lcd_Out(1,4,tg);
            Inttostr(Time, tg);
            Lcd_Out(1,11,tg);
            Lcd_Out(1,1,'KENH:');
            Lcd_Out(1,9,'TIME:');
    while true do
    begin
      TxtExist(txt);  //procedure
      LCD_Out(2,1,'                  ');
      GMT_hour[0]:=Rarray[2];
      GMT_hour[1]:=Rarray[3];
      GMT_Menute[0]:=Rarray[4];
      GMT_Menute[1]:=Rarray[5];
      GMT_Person[0]:=Rarray[7];
      GMT_Person[1]:=Rarray[8];
      LCD_Out(2,1,GMT_hour);
      LCD_Out(2,4,GMT_Menute);
       if (RArray[4]='0') and (Rarray[5]='0') then
         begin
              LCD_Out(2,1,'Running .......');
              GMT_Person_int:=MiliSecond(GMT_Person);
              if GMT_Person_int>0 then
              for j:=1 to GMT_Person_int do delay_ms(1);
              kenh1(5);
              porta:=1;
              delay_ms(500);
              porta:=0;
              delay_ms(1500);
              porta:=1;
              delay_ms(500);
              porta:=0;
              delay_ms(1500);
              porta:=1;
              delay_ms(500);
              porta:=0;
         end;
    end;
end.

[techpro]

có 1 đêm ko vào mà anh em đã có thành tích "đầy vai" thế à?
thấy hổ thẹn, hổ thẹn tại thói ham chơi chuyện "vợ con" chẳng may sắp quên nghiệp điện tử. đêm nay chúng ta cùng hát vang điệp khúc AVR nhé.
à nói nhiều thế mà anh em chưa rõ nhau thế nào nhỉ?
chúng ta hiểu qua về nhau chứ?
mình là Hùng sinh viên Giao thông.
còn anh em???
okie

Có những người có thể hỏi ở bên bạn mà sao không biêt? Mình còn anh em họ hàng với bạn đấy

To 89xxx: Em sắp giải nghệ cái nghề này rồi bác ạ! Làm cho người ta suốt đêm ngay mà không đủ tiền điện thoại, xăng xe. Giờ thử lĩnh vực mới ko còn đụng chạm gì đến điện tử kể cũng tiếc nhưng ko làm sao được

[gtvt45]

@techpro: Có những người có thể hỏi ở bên bạn mà sao không biêt? Mình còn anh em họ hàng với bạn đấy.

@gtvt45: chào bạn.
bạn có thể nói rõ hơn dc ko???
chúng ta là "anh em họ hàng" cơ ah.
hi hi. hân hạnh hân hạnh, ...
techpro nói về bản thân đi chứ.
Okay

[hoctro89xxx]

To 89xxx: Em sắp giải nghệ cái nghề này rồi bác ạ! Làm cho người ta suốt đêm ngay mà không đủ tiền điện thoại, xăng xe. Giờ thử lĩnh vực mới ko còn đụng chạm gì đến điện tử kể cũng tiếc nhưng ko làm sao được

Thấy chú nói mà bi đát quá, đợi sang năm cty anh phát triển trả lương cao thì anh gọi chú. Sắp tới có sản phẩm công nghệ cao mà bên anh không làm được --> anh sẽ gọi chú hợp tác