按键精灵有生成13位时间戳的代码或插件吗，求大神指点

按键精灵有生成13位时间戳的代码或插件吗，求大神指点

UserVar ShuChuFangShi = 1 ;获取到时间之后的输出方式。
1是弹对话框，适合平时看时间；
2是文本输出，适合网游里使用;
Dim Y,Mon,D,W,h,m,s,SJ
//先声明变量
Y=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)
//利用VBS函数获得当前系统的年,月,日,星期 并各自保存到变量中
h=Hour(time):m=Minute(time):s=Second(time)
//利用VBS函数获得当前系统的时,分,秒 并各自保存到变量中
SJ=Y ;年; Mon ;月; D ;号; W ; ; h ;点; m ;分; s ;秒;
//把得到的年,月,日,星期,时,分,秒连接起来 并保存到SJ变量中
If ShuChuFangShi=1 Then
//最后弹出个窗口 显示当前的系统时间（变量SJ）
MessageBox SJ
End If
If ShuChuFangShi=2 Then
//最后弹出个窗口 显示当前的系统时间（变量SJ）
MessageBox SJ
End If

日期型现时间 =plugin.sys.getdatetime() traceprint 日期型现时间 //取出现行时间的毫秒数据  这个可以自行百度搜方法 t = timer'现行时间 现行毫秒 = round((t - int(t)) * 1000, 0) //下面把毫秒进行强制转换成3位 s=len(现行毫秒) if s < 3 then      traceprint s     毫秒=replace(现行毫秒,"0","",3-s)     毫秒=cstr(毫秒)+cstr(现行毫秒) else      毫秒=cstr(现行毫秒) end if traceprint 毫秒 //最后取现行时间和19700101080000的间隔秒 时间间隔秒 = cstr(datediff("s", #1970/01/01 08:00:00#, 日期型现时间)) //最后取到的这个时间 再加上上面计算的毫秒 traceprint 时间间隔秒+毫秒附：按键精灵支持post吗 取这个时间有意义吗？ 附：能申请高质量吗？应该没人回答过这种问题