網路城邦
上一篇 回創作列表 下一篇   字體:
320x240 彩色LCD營幕 - 用於APP上的橫條BAR
2020/09/08 21:01:08瀏覽347|回應0|推薦1

320x240 彩色LCD營幕 - 用於APP上的橫條BAR

請見諒,不多作說明 — 因視力退化的因素,登打不易
就請大家試試看喔
2020/09/09 : 更新版
程式碼如下:

x0=40;y0=180;x1=50;y1=100;
v=AC_sec%10;
if(v==0)
{ CLR_Screen(BCOLOR); //用背景色清屏
 DelayMs(1);
 for(i=90;i<271;i++) br=""> { x2=x0+(cos(i*PI/180)*25);
  y2=y0+(sin(i*PI/180)*25);
  Put_pixel(x2,y2,YCOLOR[8]);
  x2=x0+(cos(i*PI/180)*24);
  y2=y0+(sin(i*PI/180)*24);
  Put_pixel(x2,y2,YCOLOR[8]);
  if(v==0)
  { x2=x0+(cos(i*PI/180)*22);
   y2=y0+(sin(i*PI/180)*22);
   Line(x0,y0,x2,y2,YCOLOR[6]);
  }  
 }
 Line(x0,y0-25,200,y0-25,YCOLOR[8]);
 Line(x0,y0-24,200,y0-24,YCOLOR[8]);
 Line(x0,y0+24,200,y0+24,YCOLOR[8]);
 Line(x0,y0+25,200,y0+25,YCOLOR[8]);
 for(i=270;i<451;i++) br=""> { x2=200+(cos(i*PI/180)*25);
  y2=y0+(sin(i*PI/180)*25);
  Put_pixel(x2,y2,YCOLOR[8]);
  x2=200+(cos(i*PI/180)*24);
  y2=y0+(sin(i*PI/180)*24);
  Put_pixel(x2,y2,YCOLOR[8]);
  }    
 }
 for(i=0;i<16;i++) br=""> {
  Line(x0+(16*v)+i,y0-22,x0+(16*v)+i,y0+22, 0x07e0-((16-i)*0x0020));
 }
 if(v==9)
 { for(i=270;i<451;i++) br="">  { x2=200+(cos(i*PI/180)*22);
   y2=y0+(sin(i*PI/180)*22);
   Line(x2,y0,x2,y2,YCOLOR[6]);
  }
 }

 

 

( 興趣嗜好電腦3C )
回應 推薦文章 列印 加入我的文摘
上一篇 回創作列表 下一篇

引用
引用網址:https://classic-blog.udn.com/article/trackback.jsp?uid=PYANG&aid=150385686