当前位置: 首页 > news >正文

做证明图片的网站中国字体设计网官网

做证明图片的网站,中国字体设计网官网,网页设计短期培训,东莞教育网官网--罗盘时钟 --星空露珠工作室制作 --作者:韩永旗 --数字换中文 local zhChar {一,二,三,四,五,六,七,八,九} function formatNumber( num ) if type(num)~number then return num..is not a num end if num>99 then return num..不是两位数 end if num0 then return 零 el…

--罗盘时钟

--星空露珠工作室制作

--作者:韩永旗

--数字换中文

local zhChar = {'一','二','三','四','五','六','七','八','九'}

function formatNumber( num )

  if type(num)~='number' then return num..'is not a num' end

  if num>99 then return num..'不是两位数' end

  if num==0 then return '零' 

  elseif num>0 and num<10 then return zhChar[num] 

  elseif num>=10 then

   if num==10 then return '十' end

   if num%10==0 then return zhChar[math.floor(num/10)]..'十'

elseif num>10 and num<20 then return '十'..zhChar[num%10]

   else return zhChar[math.floor(num/10)]..'十'..zhChar[num%10]

   end

  end

end

 

  -- 测试一下:(禁用002)

  --print(formatNumber(20))  

  迷你世界监听函数方便使用

  local ui={'7382219973642268578','7382219973642268578_'}

  --设置元件图片 

 local function setgip(p,id,url) Customui:setTexture(p,ui[1],ui[2]..id,url) end

--设置元件大小 

 local function setsize(p,id,d,h) Coustomui:setSize(p,ui[1],ui[2]..id,d,h) end

--设置元件位置

 local function setpos(p,id,x,y) Trigger.UI:setPosition(p,ui[1],ui[2]..id,x,y) end 

--设置元件颜色 

 local function setcolor(p,id,color) Trigger.UI:setColor(p,ui[1],ui[2]..id,color) end

--显示元件 

 local function show(p,id) Trigger.UI:showElement(p,ui[1],ui[2]..id) end

--隐藏元件 

 local function hide(p,id) Trigger.UI:hideElement(p,ui[1],ui[2]..id) end

--设置文字框

 local function setstr(p,id,str) Trigger.UI:setText(p,ui[1],ui[2]..id,str) end

--设置元件文字大小 

 local function setfontsize(p,id,size) Trigger.UI:setFontSize(p, ui[1],ui[2]..id,size) end

--旋转元件

 local function rotate(p,pi) Customui:rotateElement(p,ui[1],ui[2]..button.rotate1,pi) Trigger.UI:setText(p,ui[1],ui[2]..button.rotate2,pi) end 

--元件平滑旋转到指定角度

 local function smoothrotateto(p,id,time,angle) Customui:SmoothRotateTo(p,ui[1],ui[2]..id,time,angle) end

--元件平滑旋转到相对角度

 local function smoothrotateby(p,id,time,angle) Customui:SmoothRotateBy(p,ui[1],ui[2]..id,time,angle) end

--播放声音

 local function music(p) Player:playMusic(p,10948,50,1,false) end

等待时间

 local function wait(time)

    local v1 = time

    if logidx then

        Trigger.Debug:ReportActionRunData(logidx, _status_idx_, 1, v1)

    end

    if v1 == nil then

        print("-- [func_1] Warnning -- param is nil:", v1)

        return

    end

    if Trigger and Trigger.wait then

        return Trigger:wait(v1)

    end

 end

  设置参数大小数量文字位置

  --显示框 2 年份228 节日158 

  local ui0={3,64,125,150,183,215} 

  local data={{'秒',0,59,6,1,370, 15},{'分',0,59,6,1,300, 14},{'时',0,23,15,1,235, 13},{'星期',1,7,45,0,185, 13},{'号',1,31,11.25,0,135, 12},{'月',1,12,30,0,75, 13},}

设置界面大小位置

  local p=247312290

  local function upui(p)

    show(p,1)

  -- setpos(p,1,0,0)

    setsize(p,1,0,0)  

   show(p,2)

    setpos(p,2,-20,0)

   setsize(p,2,400,25)     

   show(p,228)

  setpos(p,228,-15,0)

  setsize(p,228,70,20)

  setstr(p,228,'2024年')

  setfontsize(p,228,15)

 

设置秒分时等等 日期界面

  for k,v in pairs(data) do  

   local id=ui0[k]

    show(p,id)

    setpos(p,id,0,0)

    setsize(p,id,0,0)   

   local str=''   

   for i=v[2],v[3] do if v[1]=='星期' then if i==1 then str=v[1]..'日' else str=v[1]..formatNumber(i-1) end else str=formatNumber(i)..v[1] end  

   local id=ui0[k]+i+v[5]

   local color=Trigger.Graphics:getRandomColor()

   local angle=-(i+v[5]-1)*v[4]

    show(p,id)

    setpos(p,id,0,0)

    setsize(p,id,v[6],20)     

    setstr(p,id,str)

    setcolor(p,id,color)

    setfontsize(p,id,v[7]) 

    smoothrotateto(p,id,4,angle) 

   end

wait(3)

  end

wait(1)

uptime(p)

end

每秒加一时间角度换算刷新界面

 function uptime(p)

local t=os.date("*t",timeInterval)

--print('当前时间:'..t.year.."年"..t.month.."月"..t.day.."日"..B[t.wday]..t.hour..":"..t.min ..":"..t.sec)

local time={t.sec,t.min,t.hour,t.wday,t.day,t.month,t.year}

for k,v in pairs(data) do  

  local id=ui0[k]

  local angle=(time[k]+v[5]-1)*v[4]

  smoothrotateto(p,id,0.6,angle)

end

music(p)

wait(1)

uptime(p)

end

 

玩家进入游戏执行

local function EventMain_1(e)

    local p=e.eventobjid

    upui(p)

end

ScriptSupportEvent:registerEvent_NoError('Game.AnyPlayer.EnterGame', EventMain_1)

http://www.15wanjia.com/news/159162.html

相关文章:

  • 制作一个网站都需要学什么湖州企业网站建设
  • 株洲网站做的好的公司wordpress上传主题提示要ftp
  • 洛阳建网站公司wordpress数据库创建
  • 毕业设计网站前端代做化妆品企业网站案例大全
  • 口碑营销案例简短夺宝网站怎样做优化
  • 邢台专业做网站的地方招投标网站
  • 山西孝义网站开发网站开发树形图
  • c net 做网站好吗网站后台管理界面代码
  • 天津网站建设外贸网页魔域
  • 建设门户网站的基本意义有哪些华企立方网站
  • seo整站优化哪家好cms影视系统
  • 个人公司网站怎么做公司推广做哪个网站
  • 温州自助模板建站怎样建立网站有哪些流程
  • 手机网站 图片自适应苏州网站建设学费
  • 青州专业网站建设网站推广六种方法
  • asp源代码网站网站建设 php 企业网站
  • 有什么网站可以做宣传泰安软件开发公司哪家好
  • 招聘网站推广怎么做微信商城开发实惠华网天下
  • 做外贸开通哪个网站好吴忠市住房和城乡建设局网站
  • 怎么在境外做网站网站被恶意点击怎么办
  • 深圳做分销网站的公司网站建设设计规范方案
  • 网站内链建设和外链的推广c2c平台举例
  • 石岩做网站哪家好苏州纳米加工平台
  • 网站建设入的什么科目科技类网站源码
  • 茂名网站开发云南网站建设c3sales
  • 给个2021站你们懂得不花钱的如何建设网站哪个济南兴田德润简介
  • 做网站的cnfg视频网站后台登陆
  • 建设监理有限责任公司网站网站上的字体大小
  • 长春网站建设论坛网站设计数据库怎么做
  • 整站优化代理自己建设的网站怎么上传图片