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

alone

zhqsoft 发表于 2014-5-15 20:44
内容程序没文字版的。。。手工码字中。。。。变压器才简单好不。。。都不用动脑筋的

: R* j: o( b4 A& S1 N& c用11F04E写的，免得大家码字，贴上来吧

1. #include <STC11.H>
   ! B2 r" N/ ?, z) ~& y
2. #define uint unsigned int
   + P% W( |% T! N: x% |6 |
3. #define uchar unsigned char
   
4. #define NUM_DUAN P1 //数码管段定义
   
5. uchar code duan_value[]={0x48,0x7e,0xc4,0x54,0x72,0x51,0x41,0x7c,0x40,0x50,0xff};
   / Q  Z& R' N( H. _5 }& a, K& b+ s
6. uchar t_5ms;
   
7. sbit SET=P3^1;//设置时间
   
8. sbit SPK=P3^5;//报警
   
9. sbit OPEN=P3^4;//启动
   : q6 B' S' F, P( K
10. sbit OUT=P3^2;//输出
    , u, Q2 z* }8 |& N- H
11. sbit DOT=P3^7;//点显示，用于显示定时是否启动
    
12. sbit SUB=P3^0;//时间减
    
13. 
    
14. void delay_ms(uint z)
    ) Y' ~* R4 t+ _: @- A
15. {
    % H3 _0 P7 Z$ I8 @
16.         uint x;uchar y;
    
17.         for ( x = z; x > 0; x--)
    
18.                 for(y=615;y>0;y--);
    
19. }
    + @" h% [, w0 Z. ^; x
20. 
    ' D- \6 I9 p1 x  [! @( _
21. 
    
22. void main()
    , Q# ~4 N3 W6 b6 [
23. {
    
24.         uchar set_time=0,run_time=0,temp=0;
    $ ^& l; P  ^9 y: ]+ b
25.         AUXR = AUXR|0x80;
    5 |& H- `& o( B7 m* m- S, R; x+ S8 i
26.         EA=1;//开总中断
    
27.         ET0=1;//开定时器0中断
    
28.         TMOD=0x01;//工作方式1,16位
    
29.         TR0=0;//关定时器0
      r& Q8 n/ w1 r4 Z
30.         TL0=(65536-40000)%256;
    . U, m  ?! k8 P2 C
31.         TH0=(65536-40000)/256;
    
32.         OUT=1;//输出关
    ' M4 C; |* ?) s- o% u1 }
33.         SPK=1;//蜂鸣器关
    
34.         while(1)
    & T$ ]1 u0 q% ?5 |
35.         {
    
36.                 //NUM_DUAN=duan_value[set_time]数码管初始显示
    
37.                 if(t_5ms==200)//1秒程序
    
38.                 {
    : Y8 T/ e$ S# V3 f4 ?- a0 {
39.                         t_5ms=0;
    
40.                         run_time++;//要运行的时间
    
41.                         if(run_time>9)
    $ H3 ]# U  b# ~1 E% q* t5 j
42.                                 run_time=0;
    9 R9 r% y: M% i
43.                 }
    7 F2 L# W8 ~3 V3 T1 X5 d# R" f$ f) V
44.                 if(SET==0)//设置键按下
    
45.                 {
    1 i2 u# f6 Y6 h' }6 b, Q/ p
46.                         delay_ms(500);
      {. U' ^3 {* G6 E0 j4 {
47.                         if(SET==0)
    . Y7 ^- H! Z) R; w! B" O
48.                         {
    
49.                                 set_time++;//设置的时间加1
    8 N! a4 L2 Z0 F& X  U% d; @
50.                                 if(set_time>9)
    6 o* B& b9 H* o. t. t( W
51.                                 {
    8 g! ]/ z: `& q7 V6 S/ x7 |
52.                                         set_time=0;
    
53.                                 }       
    * n6 V, M3 u+ ]% J5 `/ {+ h& ]
54.                                 delay_ms(500);
    + s! l/ ]% @# c  Z
55.                                 while(SET!=1);
    
56.                         }
    
57.                 }
    
58.                 if(SUB==0)//设置时间减1
    
59.                 {
    2 \- E, e- A3 W8 g, w7 a) O
60.                         delay_ms(500);
    / |! Z3 L" Y8 w5 ]9 Q7 K
61.                         if(SUB==0)
    4 ~' `1 h, _1 L) O% r$ L% y" B
62.                         {
    
63.                                 if(set_time==0)
    ' X3 T( E3 Y8 `5 ]" d. P
64.                                 {
    
65.                                         set_time=9;
    
66.                                 }
    
67.                                 else
    
68.                                 {
    
69.                                         set_time--;//设置时间减1
    4 u, N; _3 x# ]8 l2 u4 o
70.                                 }
    
71.                                 delay_ms(500);
    
72.                                 while(SUB!=1);       
    
73.                         }
    
74.                 }
    
75.                 if(OPEN==0)//外部开关打开
    ! {. ^  B4 V) o+ j# L
76.                 {
    
77.                         delay_ms(500);
    4 k# v8 q8 R1 W( Z# I8 p
78.                         while(OPEN!=1)//检测外部开关是否关闭
    
79.                         {
    
80.                                 delay_ms(500);
    1 _  M. E0 o7 Z$ V7 F5 g+ j
81.                         }
    
82.                         DOT=0;//打开秒点显示
    
83.                         TR0=1;//开启定时器0
    
84.                         t_5ms=0;//清空
    
85.                         run_time=0;//清空
    
86.                         OUT=0;//打开输出
    
87.                         temp=1;//此变量用于检测外部开关是否打开过
    9 l! x/ j/ F  C, v; _: K
88.                         SPK=1;//蜂鸣器关闭
    0 K' n6 e, ?- p2 u5 x
89.                 }
    / h! _% ^3 u7 F6 j' E& H3 ]
90.                 if((run_time==set_time)&&temp)//当运行时间与设定时间相等时，temp的作用是防止首次上电运行用的
    
91.                 {
    . a$ r, X8 `+ v7 ^4 f, c6 P
92.                         DOT=1;//关闭点显示
    
93.                         OUT=1;//关闭输出
    
94.                         SPK=0;//打开蜂鸣器
    
95.                         delay_ms(1000);
    , b0 f1 d, H1 w$ o8 d8 |/ O
96.                         SPK=1;
    
97.                         delay_ms(1000);
    
98.                         SPK=0;
    1 d# l: F* ?- I
99.                         delay_ms(1000);
    7 ?( a6 S. `* d. n! d; v  k
100.                         SPK=1;
     
101.                         delay_ms(1000);
     
102.                         SPK=0;
     $ e6 `+ b& K$ T( Q! m
103.                         delay_ms(1000);
     
104.                         SPK=1;
     
105.                         delay_ms(1000);
     4 m  x! P/ P( L, @
106.                         SPK=0;
     - ?2 R5 n, r3 b0 A. i' b3 M  i
107.                         delay_ms(1000);
     
108.                         SPK=1;
     
109.                         temp=0;//复位标志位，等待下次外部开关触发
     
110.                         TR0=0;
     
111.                         NUM_DUAN=duan_value[set_time];
     
112.                         run_time=0;
     0 ?( C- n1 K+ R" X! M' z
113.                 }
     
114.                 else
     
115.                 {
     # a/ @' j' l' K) N) W  n
116.                         NUM_DUAN=duan_value[set_time-run_time];
     3 a! O  F: L! [8 d5 y# t
117.                         delay_ms(10);
     ) a! `+ C- p3 z; Y' L
118.                         NUM_DUAN=duan_value[10];
     $ y6 z/ ]+ ~" g. H" Z5 q# Q3 u
119.                         delay_ms(1);
     
120.                 }
     4 F5 @9 M5 c: [- Y# K
121.         }
     * O# j0 l  m1 K& f0 h
122. }
       m9 e' }+ k( I7 B7 i9 ?/ U5 y
123. void timer0() interrupt 1
     
124. {
     0 a0 p, M  ~" v. _
125.         TL0=(65536-40000)%256;
     
126.         TH0=(65536-40000)/256;
     # }8 l" q( I6 k
127.         t_5ms++;
     5 S, _# }. {" U0 e2 r. u  Z' W
128. }

复制代码

zhqsoft

alone 发表于 2014-5-15 20:56
用11F04E写的，免得大家码字，贴上来吧

  L+ i, ^, N' }0 X, @" f; u7 Z非常感谢。。
; B$ a; a: u) K9 \9 s貌似程序不会改了。
能帮看看么
左边两个段不亮。。程序貌似可以工作了。显示不正常。。。。输出不知道是怎么样才算有输出。默认4.8v，输出时5v

8 Q+ z6 [9 @& {, c) i! l

- k$ t/ ^- r1 U4 ?; M4 e: ~, J#include <AT892051.h>
# y, E) Z% Y; q: k- Y' J" u
; _! Y* F6 d( v! Z- O#define uint unsigned int
: g$ U8 L! B/ J* x$ w  [' o  ~#define uchar unsigned char
, J* A, e/ F( y
+ H8 m( j$ D# C2 t2 Q$ V2 T2 f#define NUM_DUAN P1 //数码管段定义


9 b+ D/ [% i% I8 j, w2 huchar code duan_value[]={0x48,0x7e,0xc4,0x54,0x72,0x51,0x41,0x7c,0x40,0x50,0xff};
uchar t_50ms;
sbit SET=P3^4;  //设置时间
: d# M9 H9 d. V4 rsbit SPK=P3^5;  //报警
sbit OPEN=P3^1; //启动
sbit OUT=P3^3;  //输出
sbit DOT=P1^5;  //点显示，用于显示定时是否启动
sbit SUB=P3^0;  //时间减

7 y. Z+ X$ g7 ^, {* }7 [/ Avoid delay_ms(uint z)
. L/ E8 p" ^4 x& w: ?{
9 s4 h0 o: N' T8 U        uint x;uchar y;
9 M! Q! `( @' i- ]' b        for ( x = z; x > 0; x--)
                for(y=114;y>0;y--);
" U# k3 [7 {8 W/ p+ S+ W}
4 T9 u7 i$ u1 q1 \! }0 Z

void main()
{
- G$ }% i" E6 u% ~$ k2 Y. i1 d$ i        uchar set_time=0,run_time=0,temp=0;
) \; x9 R  z" P        //AUXR = AUXR|0x80;
' \3 k/ l8 `' O, c, g7 o! o7 G+ X        EA=1;//开总中断
8 X+ L- E' V  r3 F. N" i' c        ET0=1;//开定时器0中断
, ^. M& P) n. m8 Q9 N: ^  s; E        TMOD=0x20;//工作方式1,16位
& s9 v0 F- F' K        TR0=0;//关定时器0
, Q0 m+ y: q8 H) N, J0 N        TL0=(65536-50000)/256;
. `2 f- H$ X0 {' G' F        TH0=(65536-50000)%256;
9 o, q" h4 {) p) e1 _        OUT=1;//输出关
        SPK=1;//蜂鸣器关
        while(1)
        {
) r& W( m% U' e                //NUM_DUAN=duan_value[set_time]数码管初始显示
                if(t_50ms==200)//1秒程序
; i4 }  J% p+ H) d7 M                {
& H: N, S0 n) h7 o1 F+ \/ @                        t_50ms=0;
                        run_time++;//要运行的时间
+ e+ H) v% h1 p! I' i3 i                        if(run_time>9)
                                run_time=0;
) m6 g4 B6 d1 A* U6 q8 t0 X3 u. m                }
                if(SET==0)//设置键按下
# J7 U9 W& u1 x' \                {
- M# G5 I' n. R0 \" U( K1 q/ M                        delay_ms(500);
                        if(SET==0)
, I+ S. n. V0 g( F6 K1 ]                        {
                                set_time++;//设置的时间加1
0 ]2 h' n# p2 B7 P. Z' @  ]                                if(set_time>9)
1 ^4 T& \% P5 B
                                   set_time=0;

6 ?. N7 P. Q+ @                                delay_ms(500);
! S9 r3 ^9 x5 T4 i8 |9 ^+ }                                while(SET!=1);
* r' j* q) w; k: Y( w' }! U                        }
. F1 Y, n) R$ C* r                }
                if(SUB==0)//设置时间减1
                {
3 ?1 `# g3 B+ t: Q( K4 h                        delay_ms(500);
; \& @8 _, s+ g) B( B                        if(SUB==0)
3 `- r* l& W+ \/ M                        {
: |: s! D. I$ Z# B# V9 D                                if(set_time==0)
                                {
* J8 p  k4 l  F1 P/ y: v( h                                        set_time=9;
                                }
4 L5 U  m" j6 A4 P* e                                else
, K, Q) B) O$ W) H                                {
6 Q5 O+ Z) Q; T; G' ~7 o                                        set_time--;//设置时间减1
/ z7 f4 g3 A9 |5 E6 }7 e/ A5 M8 B& c                                }
                                delay_ms(500);
                                while(SUB!=1);        
                        }
                }
                if(OPEN==0)//外部开关打开
4 t0 A4 B% b, Q8 k- s! K! N0 S/ x  j! Q                {
                        delay_ms(500);
                        while(OPEN!=1)//检测外部开关是否关闭
4 t" g: G4 C/ }3 v, W: E                        {
* E; \3 e2 P! g, v. V                                delay_ms(500);
                        }
                        DOT=0;//打开秒点显示
                        TR0=1;//开启定时器0
                        t_50ms=0;//清空
5 R" E6 S$ E) A0 J- n9 g/ t" B                        run_time=0;//清空
                        OUT=0;//打开输出
                        temp=1;//此变量用于检测外部开关是否打开过
! y- h5 F6 O5 R( [7 }$ i6 g2 f6 x                        SPK=1;//蜂鸣器关闭
. A5 v% H# n9 [3 {                }
                if((run_time==set_time)&&temp)//当运行时间与设定时间相等时，temp的作用是防止首次上电运行用的
. Z0 J# d$ q" n8 O0 V                {
1 i( @& g  ]. K( c) Q                        DOT=1;//关闭点显示
0 X, v7 p$ t: l6 E, R& z/ f                        OUT=1;//关闭输出
2 I3 l7 n) @- R3 s2 M5 p4 b) L                        SPK=0;//打开蜂鸣器
                        delay_ms(1000);
                        SPK=1;         //关闭蜂鸣器
                        delay_ms(1000);
2 P/ a8 q5 F$ [0 U$ e4 P                        SPK=0;         //打开蜂鸣器
                        delay_ms(1000);
) A) Z& V5 ]6 I' s. C                        SPK=1;         //关闭蜂鸣器
: V, `( l0 x3 _4 W2 c" P) C                        delay_ms(1000);
1 I; f, k0 z0 D% ^1 D  I                        SPK=0;         //打开蜂鸣器
4 U& ?# a0 F1 |                        delay_ms(1000);
                        SPK=1;         //关闭蜂鸣器
' X" b5 M2 \0 I( C8 e* t% w0 \7 R                        delay_ms(1000);
                        SPK=0;         //打开蜂鸣器
, ?9 l/ m% z# t: S+ d6 L                        delay_ms(1000);
                        SPK=1;        //关闭蜂鸣器
                        temp=0;//复位标志位，等待下次外部开关触发
                        TR0=0;
                        NUM_DUAN=duan_value[set_time];
" |! {+ A% \; E4 e" |                        run_time=0;
                }
                else
4 J) i* t) @4 a                {
                        NUM_DUAN=duan_value[set_time-run_time];
0 _4 M0 n0 t; H$ b2 `( @5 m                        delay_ms(10);
                        NUM_DUAN=duan_value[10];
) Z% E1 ~. T- B6 n# i( E                        delay_ms(1);
                }
/ S# X; f* D6 _. k        }
- c+ E: k- _$ K$ k}
# g7 J6 b& [6 Ovoid timer0() interrupt 1          //中断函数
9 d; x, |6 z% s( E- M{
        TL0=(65536-50000)/256;
) `0 z6 R. m# p* a& O, v' r        TH0=(65536-50000)%256;
7 t0 R; L* h2 o7 j; M( m' a        t_50ms++;
. C4 ?2 m2 p$ t8 @7 ?}




8 {' H$ h' ~- `# ^& o


  I$ n% H/ v( A$ |; s1 n, I( d0 P
, m$ k2 ~* [7 X

alone

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

zhqsoft

alone 发表于 2014-5-16 07:22
是不是有段位没接好啊，段位数组里面没有显示F的。

1 o; Q: B4 k; i1 Z- c没有吧。估计程序。。。那两个脚电平不变的。所以没显示。。。、其他可以设置加减。蜂鸣用led可以看到工作时闪烁。。输出不懂。电平只是稍微变一下不知道算不算正常。。

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

alone

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

微澜

正主不出来啊~~~

微澜

再顶！

浩祺心

微澜 发表于 2014-5-18 09:13
正主不出来啊~~~

" c8 u6 s# `" ?5 D" k呵呵，看来这个项目得往前提提了，让大家久等了。

ain365

, l! p5 W: `6 l* \9 u' M( u0 J

zhqsoft 发表于 2014-5-16 09:23
# H9 X! d7 J1 g9 V# A2 a7 _: x没有吧。估计程序。。。那两个脚电平不变的。所以没显示。。。、其他可以设置加减。蜂鸣用led可以看到工 ...

3 [0 D* h4 k) a' Z! ~3 Y你这个板子用上面的那个程序不行，那个程序的段码是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
7 k; e6 n& ]; \/ P# T. o. A
+ A7 ]+ ~7 D' I# [0 @" m  C: [

微澜

浩祺心 发表于 2014-5-31 21:03
呵呵，看来这个项目得往前提提了，让大家久等了。

5 |0 h9 t0 H3 t太好了，终于有消息了
4 Z) e% [% S" S" V8 e8 \( o