boowaga
想要个FLASH倒计时器的FLA源代码
/*=======================注意======================*//* 新建文档，选择图层1，帧1，打开动作面板，直接粘贴本代码 *//* 将场景大小设置为宽200，高20以适合创建的文本 */this.createTextField（＂文本＂， this.getNextHighestDepth(), 0, 0, 200, 20）；//创建文本文本.html = true；//设置文本启用HTML格式支持var 总时间：Number = new Number(40*60)；//设置倒计时时间为40分钟乘以每分钟60秒var 剩余时间：Number = new Number（总时间）；//设置剩余时间function 执行倒计时（）：Void { //执行倒计时 if （剩余时间>=1） { //如果剩余时间大于1秒时运行 剩余时间 -= 1； //剩余时间减去1秒 } 文本.text = ＂残残倒计时，剩余时间：＂+int（剩余时间/60）+＂分，＂+int（剩余时间%60）+＂秒＂；}执行倒计时（）；//执行倒计时，用于一开始显示启动计时 = setInterval（执行倒计时， 1000）；//启动计时器，每1000毫秒（即1秒）运行一次＂执行倒计时＂函数...
易语言做一个倒计时的,而且要一启动程序就开始倒计时,倒计时10...
很简单，加一个时钟，加一个程序集变量。
看代码。
.版本 2.支持库 shell.程序集 窗口程序集1.程序集变量 倒计时时间， 整数型.子程序 __启动窗口_创建完毕时钟1.时钟周期 = 1000倒计时时间 = 10.子程序 _时钟1_周期事件倒计时时间 = 倒计时时间 - 1.如果 （倒计时时间 = 0）时钟1.时钟周期 = 0关闭系统 （#关机， 真） ﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌如果你想看到时间数字变化，可以加入编辑框或标签。
代码如下.倒计时时间 = 倒计时时间 - 1标签1.标题 = 到文本 （到数值 （倒计时时间））.如果 （倒计时时间 = 0）时钟1.时钟周期 = 0关闭系统 （#关机， 真）
html页面的倒计时代码。
。
。
。
急求！！！！
AVA使用步骤： 1、将源代码直接另存为html2、只能用IE浏览器打开。
如果默认浏览器不是IE。
可以右键点击Html文件，选择用IE打开3、如果提示是否同意运行activex插件。
请选择允许阻止的内容即可。
4、窗口化游戏模式下，切换游戏画面和计时网页 较为方便。
请用 atl+tab键或win键 尝试切换5、游戏每局第一回合倒计时2分30秒时，开始计时。
源代码如下：网页版倒计时 游戏已进行分秒距抽奖时间分秒请点击上面的“开始计时”按钮。
输入框会从 600 开始一直进行倒计时。
点击“停止计时”可停止计时。
...
怎么写60秒倒计时的程序,在51单片机液晶屏
有数码管做的。
ORG 0000H JMP BEGIN ORG 000BH LJMP T0INT ORG 001BH LJMP T1INTLEDD EQU 30HLEDC EQU 36HSECC EQU 37HTCNT EQU 3AH ORG 0030H;---------------------------------------TABLE： ； 共阴极数码管显示代码表 DB 0FCH ;＂0＂ 00H DB 60H ;＂1＂ 01H DB 0DAH ;＂2＂ 02H DB 0F2H ;＂3＂ 03H DB 66H ;＂4＂ 04H DB 0B6H ;＂5＂ 05H DB 0BEH ;＂6＂ 06H DB 0E0H ;＂7＂ 07H DB 0FEH ;＂8＂ 08H DB 0F6H ;＂9＂ 09H DB 0EEH ;＂A＂ 0AH DB 3EH ;＂B＂ 0BH DB 9CH ;＂C＂ 0CH DB 7AH ;＂D＂ 0DH DB 9EH ;＂E＂ 0EH DB 8EH ;＂F＂ 0FH DB 00H ;＂ ＂ 10H; DB 3FH,06H,5BH,4FH,66H ;12345; DB 6DH,7DH,07H,7FH, ;6789;---------------------------------------DELAY: MOV R6,#25DLY01: MOV R7,#100 DJNZ R7,$ DJNZ R6,DLY01 RET;---------------------------------------BEGIN: MOV SP,#5FH MOV TMOD,#11H MOV TH0,#3CH MOV TL0,#0B0H MOV TH1,#0F4H MOV TL1,#48H MOV LEDC,#0 MOV R0,#LEDD CLR AINIT: MOV @R0,A INC R0 DJNZ LEDC,INIT SETB ET1 SETB TR1 MOV P2,#0 MOV TCNT,#0 MOV SECC,#0 SETB ET0 SETB EA MOV SECC,#60 LCALL DISSEC SETB TR0 SETB TR1LOOP: SJMP $;---------------------------------------T1INT: PUSH ACC CLR TR1 MOV TH1,#0F4H MOV TL1,#48H SETB TR1 MOV DPTR,#TABLE MOV R0,#LEDD MOV A,LEDCT1INT0: JNZ T1INT1 MOV P2,#01H MOV A,@R0 MOVC A,@A+DPTR CPL A MOV P0,A SJMP T1INTDT1INT1: MOV P2,#02H INC R0 MOV A,@R0 MOVC A,@A+DPTR CPL A MOV P0,AT1INTD: INC LEDC MOV A,LEDC CJNE A,#2,T1INT6T1INT6: JC T1INTE MOV LEDC,#0T1INTE: POP ACC RETI;---------------------------------------HBCD: MOV B,#10 DIV AB SWAP A ORL A,B RET ;---------------------------------------T0INT: PUSH ACC CLR TR0 MOV TH0,#3CH MOV TL0,#0B0H SETB TR0 INC TCNT MOV A,TCNT CJNE A,#20,T0INT1T0INT1: JC T0INTE MOV TCNT,#0 MOV A,SECC DEC A MOV SECC,A JNZ T0INT2 MOV SECC,#60T0INT2: LCALL DISSECT0INTE: POP ACC RETI;---------------------------------------DISSEC: MOV A,SECC LCALL HBCD PUSH ACC ANL A,#0FH MOV 30H,A POP ACC SWAP A ANL A,#0FH MOV 31H,A RET;--------------------------------------- END
51单片机数码管倒计时程序,从999999开始倒计时,用定时器T1的中...
这个和代码顺序有关系： while (1) { if (flag1s == 1) //判断1秒定时标志 { flag1s = 0; //1秒定时标志清零 sec--； //秒计数自减1【这里是先减一，后面再送显示】 //将sec按十进制位从低到高依次提取到buf数组中 buf[0] = sec%10; buf[1] = sec/10%10; buf[2] = sec/100%10; buf[3] = sec/1000%10; buf[4] = sec/10000%10; buf[5] = sec/100000%10； //从最高为开始，遇到0不显示，遇到非0退出循环 } }如果初值要改为999999，代码可以改成如下： while (1) { if (flag1s == 1) //判断1秒定时标志 { flag1s = 0; //1秒定时标志清零 // sec--； //秒计数自减1【屏蔽】 //将sec按十进制位从低到高依次提取到buf数组中 buf[0] = sec%10; buf[1] = sec/10%10; buf[2] = sec/100%10; buf[3] = sec/1000%10; buf[4] = sec/10000%10; buf[5] = sec/100000%10; sec--； //秒计数自减1【这里是先送显示，后面再减一】 //从最高为开始，遇到0不显示，遇到非0退出循环 } }...
vb倒计时代码
Dim i As LongPrivate Sub Command1_Click()Select Case Command1.CaptionCase ＂启动时间＂Command1.Caption = ＂暂停时间＂Timer1.Enabled = TrueCase ＂暂停时间＂Command1.Caption = ＂启动时间＂Timer1.Enabled = FalseCase ElseEnd SelectEnd SubPrivate Sub Form_Load()Command1.Caption = ＂启动时间＂Timer1.Enabled = FalseTimer1.Interval = 1000i = CLng(Val(Text1.Text))End SubPrivate Sub Timer1_Timer()i = i - 1Label1.Caption = ＂倒计时： ＂ & iIf i = 0 ThenTimer1.Enabled = FalseCommand1.Caption = ＂启动时间＂End IfEnd Sub...
淘宝打折活动,怎么展示倒计时？有没有什么促销软件可以设置？不要...
#include #include #include void wait ( int seconds ){ clock_t endwait; endwait = clock () + seconds * CLK_TCK ; while (clock() }void main(){int t,m,s;printf(＂input counterdown time in seconds\n＂);scanf(＂%d＂,&t);printf(＂\n===================\n＂);while(1){wait ( 1 );t--;if (t==0) break;s = t % 60;m = t / 60;printf(＂\r\t%02d:%02d＂,m,s);}exit(0);};...
求 VB 10秒倒计时代码
一个文本控件text1显示倒计时 一个定时器控件定时，一个按钮控件触发倒计时事件Dim i As Integer '全局变量Private Sub Command1_Click() Text1.Text = 10 '文本初始值10 Timer1.Enabled = True '开定时器 Timer1.Interval = 1000 'MS单位 i = 10 ' i赋初始值End SubPrivate Sub Form_Load() Text1.Text = ＂＂ '文本初始值空值End SubPrivate Sub Timer1_Timer() i = i - 1 '每到1s响应定时器，响应次数+1 Text1.Text = i If i = 0 Then Timer1.Enabled = False '关定时器 End IfEnd Sub
