单片机篮球计分器编程
看板子是无法编程的,必须原理图才可以,这里有一个篮球计分程序,供参考。
UP1?EQU?P1.1
DOWN1?EQU?P1.2
UP2?EQU?P1.3
DOWN2?EQU?P1.4
CHANGE?EQU?P1.5
BEGIN?EQU?P1.6
BEEF?EQU?P2.4
DUAN?EQU?P2.3
WEI?EQU?P2.2
GRATE1?EQU?30H
GRATE2?EQU?31H
GRATE_CHG?EQU?33H
TIME?EQU?34H
CNT?EQU?35H
ORG?0000H
LJMP?MAIN
ORG?001BH
LJMP?T1ISR
ORG?0030H
MAIN:
LCALL?INITTIMER1
SETB?UP1
SETB?DOWN1
SETB?UP2
SETB?DOWN2
SETB?CHANGE
SETB?BEGIN
LOOP:
JB?UP1,LOOP1
CLR?ET1
MOV?R7,#5
LCALL?DELAY
JNB?UP1,$
INC?GRATE1
SETB?ET1
SJMP?LOOP6
LOOP1:
JB?DOWN1,LOOP2
CLR?ET1
MOV?R7,#5
LCALL?DELAY
JNB?DOWN1,$
MOV?A,GRATE1
DEC?A
MOV?GRATE1,A
SETB?ET1
SJMP?LOOP6
LOOP2:
JB?UP2,LOOP3
CLR?ET1
MOV?R7,#5
LCALL?DELAY
JNB?UP2,$
INC?GRATE2
SETB?ET1
SJMP?LOOP6
LOOP3:
JB?DOWN2,LOOP4
CLR?ET1
MOV?R7,#5
LCALL?DELAY
JNB?DOWN2,$
MOV?A,GRATE2
DEC?A
MOV?GRATE2,A
SETB?ET1
SJMP?LOOP6
LOOP4:
JB?CHANGE,LOOP5
CLR?ET1
MOV?R7,#5
LCALL?DELAY
JNB?CHANGE,$
MOV?GRATE_CHG,GRATE1
MOV?GRATE1,GRATE2
MOV?GRATE2,GRATE_CHG
SETB?ET1
SJMP?LOOP6
LOOP5:
JB?BEGIN,LOOP6
MOV?R7,#5
LCALL?DELAY
JNB?BEGIN,$
SETB?TR1
LOOP6:
MOV?A,TIME
JNZ?LOOP7
MOV?TIME,#99
CLR?TR1
MOV?R7,#100
LCALL?BEEFE
LOOP7:
LCALL?DISPLAY
LJMP?LOOP
T1ISR:
CLR?TR1
MOV?TH1,#HIGH(65536-50000)
MOV?TL1,#LOW(65536-50000)
SETB?TR1
DJNZ?CNT,T0E
MOV?CNT,#20
DEC?TIME
T0E:
RETI
INITTIMER1:
MOV?TMOD,#10H
MOV?TH1,#HIGH(65536-50000)
MOV?TL1,#LOW(65536-50000)
SETB?EA
SETB?ET1
MOV?CNT,#20
MOV?TIME,#99
RET
DELAY:
MOV?R2,#17
DLY:
MOV?R3,#26
DJNZ?R3,$
DJNZ?R2,DLY
DJNZ?R7,DELAY
RET
BEEFC:
MOV?R2,#17
BEEFD:
MOV?R3,#16
BEEFE:
CPL?BEEF
DJNZ?R3,BEEFE
DJNZ?R2,BEEFD
DJNZ?R7,BEEFC
RET
DISPLAY:
MOV?A,GRATE1
MOV?B,#10
DIV?AB
MOV?40H,A
MOV?41H,B
MOV?A,GRATE2
MOV?B,#10
DIV?AB
MOV?42H,A
MOV?43H,B
MOV?A,TIME
MOV?B,#10
DIV?AB
MOV?46H,A
MOV?47H,B
MOV?P0,#0FFH
SETB?WEI
MOV?P0,#0FEH
CLR?WEI
MOV?P0,#0FFH
SETB?DUAN
MOV?DPTR,#LEDTAB
MOV?A,40H
MOVC?A,@A+DPTR
MOV?P0,A
CLR?DUAN
MOV?R7,#5
LCALL?DELAY
MOV?P0,#0FFH
SETB?WEI
MOV?P0,#0FDH
CLR?WEI
MOV?P0,#0FFH
SETB?DUAN
MOV?DPTR,#LEDTAB
MOV?A,41H
MOVC?A,@A+DPTR
MOV?P0,A
CLR?DUAN
MOV?R7,#5
LCALL?DELAY
MOV?P0,#0FFH
SETB?WEI
MOV?P0,#0FBH
CLR?WEI
MOV?P0,#0FFH
SETB?DUAN
MOV?DPTR,#LEDTAB
MOV?A,42H
MOVC?A,@A+DPTR
MOV?P0,A
CLR?DUAN
MOV?R7,#5
LCALL?DELAY
MOV?P0,#0FFH
SETB?WEI
MOV?P0,#0F7H
CLR?WEI
MOV?P0,#0FFH
SETB?DUAN
MOV?DPTR,#LEDTAB
MOV?A,43H
MOVC?A,@A+DPTR
MOV?P0,A
CLR?DUAN
MOV?R7,#5
LCALL?DELAY
MOV?P0,#0FFH
SETB?WEI
MOV?P0,#0BFH
CLR?WEI
MOV?P0,#0FFH
SETB?DUAN
MOV?DPTR,#LEDTAB
MOV?A,46H
MOVC?A,@A+DPTR
MOV?P0,A
CLR?DUAN
MOV?R7,#5
LCALL?DELAY
MOV?P0,#0FFH
SETB?WEI
MOV?P0,#07FH
CLR?WEI
MOV?P0,#0FFH
SETB?DUAN
MOV?DPTR,#LEDTAB
MOV?A,47H
MOVC?A,@A+DPTR
MOV?P0,A
CLR?DUAN
MOV?R7,#5
LCALL?DELAY
RET
LEDTAB:
DB?3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH
END用excel制作计分器
数据在A列,不分有几个的公式:
第一种
=TRIMMEAN(A:A,2/COUNTA(A:A))
第二种
=SUMPRODUCT(SMALL(A:A,ROW(INDIRECT("2:"&COUNTA(A:A)-1))))/(COUNTA(A:A)-2)
两种得到的效果都一样怎么使用斯诺克的计分器?
斯诺克是英式台球,英语为snooker,就是障碍的意思,这种球和9号台球不同的地方,虽然仍然是以进球为主要目的,但是还有一个技术就是利用自己的技术给对手制造障碍球,让对手无法击球或者因为障碍击错球而让自己得分或给自己制造进球机会,这点才是斯诺克的精髓
一、基本规则
1、斯诺克台球球台内沿长350厘米,内沿宽175厘米,高85厘米。
22个彩球共分8种颜色,红色球1 5个(1分),黄色球1个(2分),绿色球1个(3分),棕色球1个(4分),蓝色球1个(5分),粉色球1个(6分),黑色球一个(7分),白色球1个(主球)。
2、开球前主球可在开球区(D型区)内任选一点位置。
开球必须首先直接或间接击中红球。
按照击落一个红球再击落一个彩球的顺序直至红球全部落袋。
其中彩球落袋后放回原置球点。
然后按照彩色球的分值从低到高依次为黄、绿、棕、蓝、粉、黑色球击落袋中。
3、当台面上只剩下黑球时,击球入袋或犯规都会使比赛结束,这时如果双方比分相等则重新放置黑球,进行决胜期比赛,此时无论谁击球入袋或犯规都使比赛结束。
4、遇有下列犯规行为,应判罚分(分值小于4分按4分罚分,大于4分按自身的分值罚分):球未停稳就击球;击球时杆头触击主球一次以上;击成空杆;主球击目标球后自落;击球时双脚离地,开球时主球未放入开球区(D型区);击成跳球;击球出界;主球首先撞击非活球;击球时,球员的衣服、身体、球杆及佩戴物等触动台面上的球。
5、下列犯规判罚7分:击红球入袋后,尚未指定球就开始击球;击进红球后,未报彩球又击打红球;不使用白球而使用其他任何一个球作主球。
二、斯诺克基本玩法和胜负决定
斯诺克共用球22个,其中15个红球,6个彩球(黑、粉、蓝、棕、绿、黄各1个)和1个白球。
红球和彩球用来得分,白球用来击打红球和彩球。
每次开始之前,将球摆如图1的形式。
开球前,双方可以通过抛硬币来决定谁先开球。
在开球时,开球一方,可将白球摆在开球区的任何位置,去打击红球。
其后,白球停在什么位置,就必须接着由什么位置打起。
每一方必须先打入一个红球,然后任选一个有利的彩球打。
打入彩球后,需将彩球取出重新摆回其自己的原位点上(即开球前,其所在的位置上)。
接着,再打红球,打彩球,如此反复,直到所有红球入袋。
之后,就必须按照一定顺序打彩球。
就是说,先打黄球,再打绿球、棕球、蓝球、粉球和黑球。
此时,进一个彩球,台面上就少一个彩球(不再需要将入袋彩球取出摆回自己的原位点上),直以所有彩球入袋,台面上中剩下白球,就宣告结束。
从开始到所有彩球和红球被击打入袋这么一个过程称为一局。
在整个进球过程中,一方如果没有能够成功进球,或者打了一个坏球,此时他就得让位于另一方打。
连续成功进球的过程叫“一杆”。
每局的胜负是由双方积分多寡决定,得分多者为胜方。
得分有两种途径:一是靠进球得分,二是通过对方失误罚分而得分。
打入一个红球得1分(又可称“1度”),打入一次黄球得2分,绿球得3分,棕球得4分,蓝球得5分,粉球得 6分,黑球得7分。
因此,双方都会尽最大努力,多将黑球打入袋内。
在打红球时,如果白球未能碰到任何红球,则要罚4分;如果误碰了彩球,则按照该彩球的分数罚分,但是最少都要罚4分。
就是说,如果碰到了黑球罚7分,碰到了黄球罚4分。
同样,在打彩球时,如果未能打到要打的彩球,则按照此彩球的分数罚分;如果误撞了更高分的彩球,按照高分罚分,最少都要罚4分。
因此在进了红球后,打彩球前,理论上,打球方都要先声明他将要打哪个彩球。
而实践上,如果要打的彩球很明显看得出,则无须声明,但是如果不明显,则一定要声明,否则自动罚7分。
如图2,打方一定要先声明,他要打哪个彩球(棕球、蓝球或粉球)。
如果误将白球击入袋,最少罚4分,或者按照白球进袋前最先碰到的更高分数球罚分。
如果白球入袋,接着打的一方可将白球摆在开球区的任何位置击球。
罚分不从受罚方的分中扣减,而是加入对方的得分中。
正因为还可以通过双方的失误而得分,所以场上一方如果觉得自己没有进球机会,则会试图制做“斯诺克”。
所谓“斯诺克”,就是造成这样的一个局面,使接着打的一方无法直接打到要打的球,而不得不采取反弹或弧线等高难度球,因而很容易失误而导致罚分,如图3 。
一场比赛可约定打一局或三局、五局、七局来决定最后胜负。
而世界职业锦标赛的决赛则是打三十五局。
如果在结束时,双方平分,传统的决定胜负方法是:将黑球留在黑球位上,白球摆在开球区,双方通过抛币,决定谁先打,先将黑球打入者为胜方。
2)斯诺克一些常见规则及其应用
斯诺克的规则非常繁琐复杂,甚至连世界冠军级的大师们也经常不能悉数掌握。
不过,这些规则通常可以在实践中不断获得。
下面是一些经常令新手混淆不清的常见规则。
失误球:
失误球最少罚分4分,如果失误的球是4分以上的彩球,则按此彩球的实际分数罚分。
(1)将球打离台桌面。
(2)双脚同时离地击球。
(3)白球跳过中间球击打目标球。
(4)台面上的球被球杆击球端以外任何物品或身体任何部位所碰到。
(5)在出杆时,球杆连续击白球两次以上。
(6)球杆、白球和目标球同时接触。
当白球和目标球靠得太近时,这种情况就时常发生。
例如,当两球的距离少于2.5厘米时,想不犯规出杆就非常困难,除非轻碰目标球,如图4。
所以当白球紧贴目标球时,击球方就只准将白球击开,而不得带动目标球。
这种特殊情况下,只要将白球打开目标球,就当作击中目标球。
一个好的球手,经常会利用这种机会制做安全球,或者做斯诺克。
因为,这时可以只打白球而无须白球撞到任何其他球,做安全球和斯诺克就变得很容易,如图5 。
自由球:
在一方打了失误球后,台面出现了斯诺克,令接着打的一方无法直接打到红球时,接着打的一方可以任选一彩球当红球打,此彩球便称作自由球。
如果这个彩球入袋,就当做红球入袋得1分,接着照常规打彩球。
如果台面红球已被打完,出现的情况是令接着打的一方无法直接打到要打的彩球,接着打的一方可以任选一彩球打,此球即为自由球,自由球入袋得分则按台面上所剩的最低分球计算,然后按常规则顺序打彩球。
重打球:
如果一方打了一个失误球,而使对方处于不利的处境,对方有权要求失误方接着打。
这条规则同自由球规则一样,是防止任何一方有意打失误球从中获利。
不过,在决定让失误方打之前,一定要确信台面上每个球都不存在机会,而且要把失误方打球的水平因素考虑在内。
无意识救球:
在一方打了失误球以后,如果裁判认为这个球应该可以打到,则可以判罚无意识救球。
在这种情况下,得益方可以有以下几个选择权:(1)将球恢复失误球前的原状,要求失误方重新打;(2)要求失误方在现在的位置上接着打;(3 )在现在的位置上自己打;(4)如果台面上出现斯诺克,自己打自由球。
彩球摆位:
当彩球落袋重新摆回台面时,如果这个彩球的原位点被其它球占了,则将这个彩球摆到当时最高分的彩球空位点上。
如图6,当绿球进袋后,它自己的原位点被其它球所占,台面上空出的彩球点有棕球点、黄球点和粉球点,这时绿球就应该摆在粉球点上。
假如所有彩球点都被点,这时就应该将此彩球摆在自己原位点垂直于底边的直线上,最靠近自己原位点,并且不能够碰到其它球。
僵局:
当裁判认为台面已形成僵局,裁判便会向双方声明,如果几个回合之内,局面再无明显变化,此局便成为无效,得重新开始。
此外,斯诺克还形成了一些特有的规矩:
(1)双方通过抛硬币决定谁先开球,但是注意不要在台球桌面上旋转硬币,以免损坏台布。
(2)当双方在打球时,尽量保持肃静,注意不要站在对方瞄准的袋口后面。
或者其它容易影响到打球方的位置。
(3)在友谊赛和平时对阵时,场上无裁判。
这时,在对方进了彩球后,应该帮忙将彩球摆回台面,并且主动报分数。
(4)当自己打了失误球时,即使裁判没有看出,都应主动声明。
(5)要有端正的态度和良好的举止。
期诺克同高尔夫一样,要求参加者具有高水准的体育精神和绅士风范。
RackNerd 商家给的感觉就是一直蹭节日热点,然后时不时通过修改配置结构不断的提供低价年付的VPS主机,不过他们家还是在做事的,这么两年多的发展,居然已经有新增至十几个数据中心,而且产品线发展也是比较丰富。比如也有独立服务器业务,不过在他们轮番的低价年付VPS主机活动下,他们的服务器估摸着销路不是太好的。这里,今天有看到RackNerd商家的独立服务器业务有促销。这次提供美国多个机房的高配独立...
rfchost怎么样?rfchost是一家开办了近六年的国人主机商,一般能挺过三年的国人商家,还是值得入手的,商家主要销售VPS,机房有美国洛杉矶/堪萨斯、中国香港,三年前本站分享过他家堪萨斯机房的套餐。目前rfchost商家的洛杉矶机房还是非常不错的,采用CN2优化线路,电信双程CN2 GIA,联通去程CN2 GIA,回程AS4837,移动走自己的直连线路,目前季付套餐还是比较划算的,有需要的可...
专心做抗投诉服务器的VirtVPS上线瑞士机房,看中的就是瑞士对隐私的保护,有需要欧洲抗投诉VPS的朋友不要错过了。VirtVPS这次上新的瑞士服务器采用E-2276G处理器,Windows/Linux操作系统可选。VirtVPS成立于2018年,主营荷兰、芬兰、德国、英国机房的离岸虚拟主机托管、VPS、独立服务器、游戏服务器和外汇服务器业务。VirtVPS 提供世界上最全面的安全、完全受保护和私...
计分器为你推荐
360杀毒在线安装怎样使用360度安全卫士在线查杀病毒防恶意点击如何防止恶意点击开放网开放wifi怎么改为不开放wifi垃圾文件清理bat一键清理系统垃圾文件的批处理goalgoalgoal为什么西班牙进球,央视解说喊那么多进啦bt4破解教程请教BT4光盘版的教程magento模板网站建好了,但是对模板不满意,有哪位亲知道怎么换模板吗?人脸检测综述人脸检测技术的来源北漂论坛介绍些北漂生活的经验操控人心怎样帮助别人让别人觉得欠我人情?
php虚拟空间 1g虚拟主机 如何申请免费域名 服务器评测 dd444 双拼域名 165邮箱 域名接入 世界测速 如何用qq邮箱发邮件 国外免费asp空间 美国独立日 数据库空间 lamp的音标 稳定空间 北京主机托管 镇江高防服务器 空间排行榜 美国十大啦 so域名 更多