浩祺心大大的点焊机呢？都很久啦，盼着呢！

alone

zhqsoft 发表于 2014-5-15 20:44
, E* z% k0 Z% T& l" x. r内容程序没文字版的。。。手工码字中。。。。变压器才简单好不。。。都不用动脑筋的

用11F04E写的，免得大家码字，贴上来吧

1. #include <STC11.H>
   * j1 ~  g5 v" G1 L8 y; N
2. #define uint unsigned int
   
3. #define uchar unsigned char
   1 V; M1 g: G' e% s+ q
4. #define NUM_DUAN P1 //数码管段定义
   
5. uchar code duan_value[]={0x48,0x7e,0xc4,0x54,0x72,0x51,0x41,0x7c,0x40,0x50,0xff};
   
6. uchar t_5ms;
   
7. sbit SET=P3^1;//设置时间
   * K3 T% E/ Q! j9 d# m% o! J, o& n
8. sbit SPK=P3^5;//报警
   
9. sbit OPEN=P3^4;//启动
   / d1 |; _) k/ v
10. sbit OUT=P3^2;//输出
    * b* j! x. T0 y* n2 t. j
11. sbit DOT=P3^7;//点显示，用于显示定时是否启动
    - o4 ^1 @3 T$ w! N. C. }, f% X- l
12. sbit SUB=P3^0;//时间减
    
13. 
    
14. void delay_ms(uint z)
    ) {- {) U, z6 x& U
15. {
    
16.         uint x;uchar y;
    
17.         for ( x = z; x > 0; x--)
    . E( y1 R; j+ b  Y3 h
18.                 for(y=615;y>0;y--);
    
19. }
    
20. 
    
21. 
    9 W, {0 ]% Y( W3 I9 w+ x
22. void main()
    
23. {
    
24.         uchar set_time=0,run_time=0,temp=0;
    
25.         AUXR = AUXR|0x80;
    
26.         EA=1;//开总中断
    
27.         ET0=1;//开定时器0中断
    7 u3 ?( G: {; v9 `$ S0 d
28.         TMOD=0x01;//工作方式1,16位
    1 w( H, P+ R) N# T7 W. m2 S
29.         TR0=0;//关定时器0
    
30.         TL0=(65536-40000)%256;
      `* y; A6 P( y8 D- H
31.         TH0=(65536-40000)/256;
    
32.         OUT=1;//输出关
    ( {' y% i* H1 P
33.         SPK=1;//蜂鸣器关
    * v" d( B: j6 y+ Z8 b- [
34.         while(1)
    , O  l5 x4 a) D, k. E3 ~3 H5 A8 ?
35.         {
    
36.                 //NUM_DUAN=duan_value[set_time]数码管初始显示
    
37.                 if(t_5ms==200)//1秒程序
    
38.                 {
    
39.                         t_5ms=0;
    * C; r" k8 ?2 \
40.                         run_time++;//要运行的时间
    
41.                         if(run_time>9)
    4 V* }/ t1 Z* n1 k5 ?
42.                                 run_time=0;
    
43.                 }
    # K8 i; Q8 J2 _; x" X5 D& O; O( ^
44.                 if(SET==0)//设置键按下
    
45.                 {
    5 R# l. j, _; i; s
46.                         delay_ms(500);
    
47.                         if(SET==0)
    " _+ v7 O6 P4 L5 W3 F) s0 O) [
48.                         {
    
49.                                 set_time++;//设置的时间加1
    
50.                                 if(set_time>9)
    $ S+ q8 q8 x- R3 f+ ?/ e
51.                                 {
    ; e' I; V/ o7 x  v9 C0 \# X
52.                                         set_time=0;
    # q- y9 O, D* h0 Z) g
53.                                 }       
    
54.                                 delay_ms(500);
    1 o$ h9 }/ c& S  J0 l
55.                                 while(SET!=1);
    
56.                         }
    % m; a3 {4 I/ b6 }- u: a/ F
57.                 }
    - }) ~- {7 D( C3 j
58.                 if(SUB==0)//设置时间减1
    " H5 x9 C. I* X" Q# ?
59.                 {
    , w* s5 s! V) x0 E' I
60.                         delay_ms(500);
    0 G! K9 I+ b1 o3 k) g3 X
61.                         if(SUB==0)
    7 Q  e! v4 U6 s9 H8 j
62.                         {
    1 [' I, O. F, V6 l5 T( R
63.                                 if(set_time==0)
    4 g( V, v$ f9 D! t5 E% R  t( ?
64.                                 {
    $ A  x" _) u# |# P5 K6 \
65.                                         set_time=9;
    - [2 g0 @5 W! R' V6 k
66.                                 }
    7 B8 J2 d& F# C5 K" u
67.                                 else
    
68.                                 {
    
69.                                         set_time--;//设置时间减1
    
70.                                 }
    
71.                                 delay_ms(500);
    
72.                                 while(SUB!=1);       
    
73.                         }
    
74.                 }
    $ f* c1 l& O) p! l5 }
75.                 if(OPEN==0)//外部开关打开
    $ h1 V" q) B3 m1 W
76.                 {
    
77.                         delay_ms(500);
    $ T/ H4 y5 i2 S& a1 S# d
78.                         while(OPEN!=1)//检测外部开关是否关闭
    
79.                         {
    
80.                                 delay_ms(500);
    % A: a$ R2 j. k" \6 j5 V3 H
81.                         }
    $ O& \( ?& f5 q7 z9 l! ^5 d
82.                         DOT=0;//打开秒点显示
    5 [& e, s4 S5 c6 ^. L
83.                         TR0=1;//开启定时器0
    
84.                         t_5ms=0;//清空
    
85.                         run_time=0;//清空
    
86.                         OUT=0;//打开输出
    ( O- @$ y; O6 a) y
87.                         temp=1;//此变量用于检测外部开关是否打开过
    , U  E& ]7 W9 f1 x
88.                         SPK=1;//蜂鸣器关闭
    
89.                 }
    , ?  g/ E( X! s% t- v
90.                 if((run_time==set_time)&&temp)//当运行时间与设定时间相等时，temp的作用是防止首次上电运行用的
    
91.                 {
    
92.                         DOT=1;//关闭点显示
    5 q( B. H* X. M9 }
93.                         OUT=1;//关闭输出
    * L# G+ t" B, j
94.                         SPK=0;//打开蜂鸣器
    
95.                         delay_ms(1000);
    - Q) l, D6 b3 \1 f3 {
96.                         SPK=1;
    
97.                         delay_ms(1000);
    
98.                         SPK=0;
    
99.                         delay_ms(1000);
    
100.                         SPK=1;
     
101.                         delay_ms(1000);
     
102.                         SPK=0;
       z, Y$ o- b1 _+ |
103.                         delay_ms(1000);
     : H% [* {' Y$ S, E3 n- [" e9 e) E; j; Q: [
104.                         SPK=1;
     % ?2 H1 n( {! ?+ a
105.                         delay_ms(1000);
     $ ?5 R! r4 u1 H
106.                         SPK=0;
     
107.                         delay_ms(1000);
     
108.                         SPK=1;
     ; @6 K7 }8 Z, c7 M3 I8 L  J- p
109.                         temp=0;//复位标志位，等待下次外部开关触发
     
110.                         TR0=0;
     
111.                         NUM_DUAN=duan_value[set_time];
     9 ~+ J% b5 Q. L' r
112.                         run_time=0;
     7 b) \# J& L7 @0 P) c
113.                 }
     ( ^+ }1 j4 C7 e+ J* W% H* ^
114.                 else
     ) x# W" ]/ R. c$ T$ W4 j( p
115.                 {
     
116.                         NUM_DUAN=duan_value[set_time-run_time];
     
117.                         delay_ms(10);
     ; h: D* t8 Z3 X) ~( a& X
118.                         NUM_DUAN=duan_value[10];
     
119.                         delay_ms(1);
     : _0 R% e. x9 _' s8 E8 f) x2 }% j
120.                 }
     
121.         }
     
122. }
     
123. void timer0() interrupt 1
     
124. {
     
125.         TL0=(65536-40000)%256;
     
126.         TH0=(65536-40000)/256;
     * `- T9 ?9 V( P% C
127.         t_5ms++;
     % w: C- j+ H% n" V$ o
128. }

复制代码

zhqsoft

alone 发表于 2014-5-15 20:56
- |1 Y) u6 }% f  I) O+ M* D用11F04E写的，免得大家码字，贴上来吧

非常感谢。。
貌似程序不会改了。
能帮看看么
" e4 O: M7 \7 ~, g左边两个段不亮。。程序貌似可以工作了。显示不正常。。。。输出不知道是怎么样才算有输出。默认4.8v，输出时5v


; a4 [; i( i3 `3 a
#include <AT892051.h>
1 D# m9 t5 v( \/ m
1 U  ]- h. W2 _& r' x3 L/ e5 P#define uint unsigned int
#define uchar unsigned char
0 A) h, [$ N0 y
# D0 _3 Q! C6 D2 \* _7 B" i" Z#define NUM_DUAN P1 //数码管段定义
1 X; I7 ^/ P2 Z9 Y" u. s, |+ \
+ ^0 N" M, a) t# o, X1 t
# u) q  i  X. m! f6 g: s  D. auchar code duan_value[]={0x48,0x7e,0xc4,0x54,0x72,0x51,0x41,0x7c,0x40,0x50,0xff};
uchar t_50ms;
. S4 p( Q- n! ^" nsbit SET=P3^4;  //设置时间
sbit SPK=P3^5;  //报警
sbit OPEN=P3^1; //启动
sbit OUT=P3^3;  //输出
sbit DOT=P1^5;  //点显示，用于显示定时是否启动
1 X0 U6 S: ]9 K2 i* gsbit SUB=P3^0;  //时间减
8 t" a' W+ ~  x+ ?* S; D+ |
void delay_ms(uint z)
3 V* y% z6 \0 D; L{
        uint x;uchar y;
        for ( x = z; x > 0; x--)
                for(y=114;y>0;y--);
& q* ?4 b' Z- R* [$ D/ ^' R}
& Z" }1 E# _' K) Q$ q$ m

void main()
{
        uchar set_time=0,run_time=0,temp=0;
. z9 ^- \7 z! E7 e1 q' b        //AUXR = AUXR|0x80;
+ p* @8 `/ [& Q  v; E0 W        EA=1;//开总中断
$ {) M( e0 f- x( B8 y1 o        ET0=1;//开定时器0中断
% m0 {7 {6 C& _        TMOD=0x20;//工作方式1,16位
        TR0=0;//关定时器0
: O$ F  U( d! k        TL0=(65536-50000)/256;
        TH0=(65536-50000)%256;
& c7 M; K9 ~1 R' f: i5 S4 S$ H        OUT=1;//输出关
        SPK=1;//蜂鸣器关
        while(1)
8 ]0 v9 v; M. c/ k, K" D  A        {
                //NUM_DUAN=duan_value[set_time]数码管初始显示
                if(t_50ms==200)//1秒程序
+ T; C1 q  }/ W: L5 i( T                {
                        t_50ms=0;
7 T. T, c7 z7 v% ^) t! v- w                        run_time++;//要运行的时间
4 N. Z8 `* I- }+ p2 S) g$ o9 O8 ]                        if(run_time>9)
                                run_time=0;
: P+ g# N- i, A+ a0 e                }
* i0 C5 K$ ?/ Q: I6 y                if(SET==0)//设置键按下
5 p/ z# w6 L6 l5 e                {
2 }9 q5 P  y& c, ~                        delay_ms(500);
                        if(SET==0)
1 j0 C5 p2 b% G6 u: R, I  U+ x                        {
' s% `# |1 u% q0 P8 a2 ?) N" b                                set_time++;//设置的时间加1
                                if(set_time>9)
6 c. j, o" Q  ~
, M2 O7 N$ X  B6 Z                                   set_time=0;
8 `* P5 z/ ^  l0 I) |! I
( ?/ T8 Y8 M6 i$ e* ~' {% \. X                                delay_ms(500);
: p" O8 ?$ o# j! h8 L% E                                while(SET!=1);
                        }
                }
% \. k4 a, ?0 V6 R+ K: x2 H                if(SUB==0)//设置时间减1
                {
                        delay_ms(500);
                        if(SUB==0)
2 J0 e1 [4 Y2 ]1 u( M' i                        {
                                if(set_time==0)
                                {
5 k$ A: [% j' t' n7 A' U/ e. x                                        set_time=9;
* q, o, Q3 u$ z                                }
- L5 T0 a9 o5 F# }& c( I4 V                                else
& w; E; u; D( Y" S- x                                {
7 I" t; f% a$ `4 f/ A) W7 M5 B                                        set_time--;//设置时间减1
0 h  K: B# K6 ~2 S: t5 K- c" ^                                }
- H7 e1 Z' ?, M$ v4 N                                delay_ms(500);
+ ~1 p9 z9 C( M2 w! m                                while(SUB!=1);        
2 b/ X- ]  Z( o! W  j7 B                        }
                }
                if(OPEN==0)//外部开关打开
                {
' m9 C6 O( O0 |, J9 V% W4 D( K                        delay_ms(500);
                        while(OPEN!=1)//检测外部开关是否关闭
/ Q/ |- n0 R, h8 x  e! {                        {
# Z$ q6 k! E# d$ p* L4 C8 [                                delay_ms(500);
                        }
$ t2 J" O8 @  k% Y$ Q6 E3 u- ]                        DOT=0;//打开秒点显示
& h& T' L# C( {                        TR0=1;//开启定时器0
/ ~4 L' `* ~- x( h" T                        t_50ms=0;//清空
# Y' o7 @& M: E) s. m$ M" j                        run_time=0;//清空
                        OUT=0;//打开输出
" V" p3 j5 [$ h( s8 B* H                        temp=1;//此变量用于检测外部开关是否打开过
& P7 d. b) u. f% {4 `& u  m                        SPK=1;//蜂鸣器关闭
" a0 E6 Q2 h/ g' D: [* q                }
5 o" O" [( C& z( T* Z, v                if((run_time==set_time)&&temp)//当运行时间与设定时间相等时，temp的作用是防止首次上电运行用的
                {
+ l2 J2 M9 l2 A1 \6 q; i                        DOT=1;//关闭点显示
* {: n9 a+ N! e% r7 w: R                        OUT=1;//关闭输出
                        SPK=0;//打开蜂鸣器
                        delay_ms(1000);
/ Q! ~. x( b: b5 W4 u/ q& Z" N                        SPK=1;         //关闭蜂鸣器
$ _! L2 i! |( C. ~: Z                        delay_ms(1000);
                        SPK=0;         //打开蜂鸣器
& w- m* s) T% z                        delay_ms(1000);
                        SPK=1;         //关闭蜂鸣器
                        delay_ms(1000);
                        SPK=0;         //打开蜂鸣器
4 s  H3 U$ G/ H( s" X& O  h                        delay_ms(1000);
                        SPK=1;         //关闭蜂鸣器
                        delay_ms(1000);
                        SPK=0;         //打开蜂鸣器
  D0 ?1 j* o7 @" S/ }# @* S1 `                        delay_ms(1000);
                        SPK=1;        //关闭蜂鸣器
                        temp=0;//复位标志位，等待下次外部开关触发
3 ?# A5 X( z  Y                        TR0=0;
                        NUM_DUAN=duan_value[set_time];
7 r2 ]* E# x3 d8 ]$ N3 k                        run_time=0;
                }
$ \$ P, J6 \6 W% C                else
                {
. b3 F9 Z3 \6 }! x& D: w                        NUM_DUAN=duan_value[set_time-run_time];
                        delay_ms(10);
                        NUM_DUAN=duan_value[10];
4 Z" o4 R9 ~5 M. ?& X  k3 M                        delay_ms(1);
                }
- n5 \, B' `3 O( c% S) W        }
' @2 s1 E( f4 \0 l9 l5 p& x}
; |, g5 K" l) l" Gvoid timer0() interrupt 1          //中断函数
* E5 f! b; K5 d% f/ j1 e0 T  @{
        TL0=(65536-50000)/256;
2 f8 D5 j7 z( i        TH0=(65536-50000)%256;
, X! d; V# V9 V& ^* X6 \4 E1 h        t_50ms++;
}
/ I' p4 g2 }7 b- B$ Y4 R




& V6 S8 b, F( D
& _7 d' J$ w6 z  u; v# B

alone

是不是有段位没接好啊，段位数组里面没有显示F的。

zhqsoft

alone 发表于 2014-5-16 07:22
/ j3 P# r. y2 U" X% s5 c( X是不是有段位没接好啊，段位数组里面没有显示F的。

) f7 B5 L: X2 Y- @+ O- Y没有吧。估计程序。。。那两个脚电平不变的。所以没显示。。。、其他可以设置加减。蜂鸣用led可以看到工作时闪烁。。输出不懂。电平只是稍微变一下不知道算不算正常。。

AT89s2051竟然连不上。。我用stc12c2052AD。

alone

我没有这个板子，电路有修改过，段位编码可能不一样，你按你输出对应的段重新编码看看

微澜

正主不出来啊~~~

微澜

再顶！

浩祺心

微澜 发表于 2014-5-18 09:13
' x1 L6 e$ r! O正主不出来啊~~~

呵呵，看来这个项目得往前提提了，让大家久等了。
5 P) F: m, n) ^( P* W7 O5 a

ain365

zhqsoft 发表于 2014-5-16 09:23
8 J  N% y/ v& Q4 r4 S. k5 W没有吧。估计程序。。。那两个脚电平不变的。所以没显示。。。、其他可以设置加减。蜂鸣用led可以看到工 ...

你这个板子用上面的那个程序不行，那个程序的段码是P1.0至P1.7，P1.0=B,P1.1=A,P1.2=F,P1.3=G,P1.4=E,P1.5=D,P1.6=DOT,P1.7=C

3 Y: J  l: J) u/ M( ^$ ~, u; O

微澜

浩祺心 发表于 2014-5-31 21:03
# v1 |! _" a6 Y4 [3 m" q呵呵，看来这个项目得往前提提了，让大家久等了。

  [4 D' ~5 a* R) f) j太好了，终于有消息了