数字转换成时分秒

admin

在一个论坛上看到一个时分秒转换脚本收50元,感觉 没什么难度,就做了一个
为确保大部分引擎通用,没有使用数学运算脚本命令,所以会多几行脚本.
秒转换为时分秒
通用脚本
;定时器1秒
#ACT
;倒计时总数
MOV N$定时 3800
setontimer 250 1
[@ontimer250]
;计算时
#IF
#ACT
MOV N$分 <$STR(N$定时)>
MOV N$时 <$STR(N$定时)>
MOV N$时秒 0
MOV N$分秒 0
#IF
LARGE N$定时 3599
#ACT
DIV N$时 3600
MUL N$时秒 <$STR(N$时)> 3600
DEC N$分 <$STR(N$时秒)>
#ELSEACT
MOV N$时 0
#IF
LARGE N$定时 59
#ACT
MOV N$秒 <$STR(N$分)>
DIV N$分 <$STR(N$分)> 60
MUL N$分秒 <$STR(N$分)> 60
DEC N$秒 <$STR(N$分秒)>
#IF
#ACT
DEC N$定时 1
sendmsg 6 剩余秒[<$STR(N$定时)>],[<$STR(N$时)>]时[<$STR(N$分)>]分[<$STR(N$秒)>]秒