当前位置： 首页 > wzjs >正文

网站开发毕业设计参考文献湛江网页定制

wzjs 2025/9/11 21:28:45
网站开发毕业设计参考文献,湛江网页定制,软件开发商是什么意思,网站里宣传视频怎么做继续开发我们的编辑器——Sprit Edit。我们已经创建了这个小编辑器，它可以显示很多精灵（sprites），并且我们可以遍历所有精灵。这真的很棒，我们可以创建新的精灵，这也不错。但是，唉，我…

继续开发我们的编辑器——Sprit Edit。我们已经创建了这个小编辑器，它可以显示很多精灵（sprites），并且我们可以遍历所有精灵。这真的很棒，我们可以创建新的精灵，这也不错。但是，唉，我们目前还不能编辑单个精灵。这就是我们要做的事情——创建一个用户界面（UI）来编辑单个精灵。

编辑器的设计理念

这次，我的想法是，当你跳转到一个精灵时，我想看到精灵的所有值，并且能够单独编辑每个值。这有点像垂直布局，而不是水平布局，因为水平布局最终会因为空间不足而显得混乱，特别是当数字很长时。而且，我认为重要的是，当你编辑时，你应该能看到你正在编辑的内容，这样才有即时的反馈。

实现过程

首先，我们要在顶部菜单添加一个项目，显示当前正在编辑的精灵的名称。然后，我们要列出当前精灵的所有值。我们需要至少显示八个值，并且要检查是否有nil值。

接下来，我们要为每个值添加一个文本框，并在文本框后显示对应的标签（如X、Y、高度等），以便用户知道每个值代表什么。

遇到的问题与解决

在开发过程中，我遇到了一些问题。例如，当我在不同模式之间切换时，程序有时会崩溃。原因是我在切换模式后没有刷新界面。我通过添加刷新函数解决了这个问题。

另一个问题是，当编辑nil值时，我想在文本框中显示一个空字符串，而不是nil。这需要我在获取数据时做一些额外的检查。

后续计划

现在，我们的编辑器已经可以基本工作了，但还有一些小细节需要调整。例如，我们还需要添加删除精灵的功能，以及处理一些可能导致程序崩溃的边界情况（如设置下一个精灵为当前精灵时导致的无限循环）。

我希望大家能发挥自己的创造力，思考如何设计自己的UI，并尝试实现这些功能。

pico-8 cartridge // http://www.pico-8.com
version 41
__lua__
function _init()--- customize here ---#include shmup_myspr.txtfile="shmup_myspr.txt"arrname="myspr"data=mysprreload(0x0,0x0,0x2000,"cowshmup.p8")----------------------debug={}msg={}_drw=draw_list_upd=update_listmenuitem(1,"export",export)curx=1cury=1scrolly=0scrollx=0poke(0x5f2d, 1)
endfunction _draw()_drw()if #msg>0 thenbgprint(msg[1].txt,64-#msg[1].txt*2,80,14)msg[1].t-=1if msg[1].t<=0 thendeli(msg,1)end  end-- debug --cursor(4,4)color(8)for txt in all(debug) doprint(txt)end
endfunction _update60()dokeys()mscroll=stat(36)_upd()
endfunction dokeys()if stat(30) thenkey=stat(31)if key=="p" thenpoke(0x5f30,1)endelsekey=nilendend
-->8
--draw
function draw_edit()-- backgroundfillp(0b11001100001100111100110000110011)rectfill(0,0,127,127,33)fillp(▒)line(63,0,63,127,13)line(0,63,127,63,13)fillp()draw_menu()-- draw spriteif selspr thenmspr(selspr,63,63)end-- blinking dotif (time()*2)%1<0.5 thenpset(63,63,rnd({8,13,7,15}))end
endfunction draw_list()fillp(0b11001100001100111100110000110011)rectfill(0,0,127,127,33)fillp(▒)line(63,0,63,127,13)line(0,63,127,63,13)fillp()draw_menu()if (time()*2)%1<0.5 thenpset(63,63,rnd({8,13,7,15}))end
endfunction draw_table()cls(2)draw_menu()
endfunction draw_menu()--spr(0,0,0,16,16)if menu thenfor i=1,#menu dofor j=1,#menu[i] dolocal mymnu=menu[i][j]local c=mymnu.c or 13if i==cury and j==curx thenc=7if _upd==upd_type thenc=0endendbgprint(mymnu.w,mymnu.x+scrollx,mymnu.y+scrolly,13)   bgprint(mymnu.txt,mymnu.x+scrollx,mymnu.y+scrolly,c) endendendif _upd==upd_type thenlocal mymnu=menu[cury][curx]local txt_bef=sub(typetxt,1,typecur-1)local txt_cur=sub(typetxt,typecur,typecur)local txt_aft=sub(typetxt,typecur+1)txt_cur=txt_cur=="" and " " or txt_cur if (time()*2)%1<0.5 thentxt_cur="\^i"..txt_cur.."\^-i"endlocal txt=txt_bef..txt_cur..txt_aftbgprint(txt,mymnu.x+scrollx,mymnu.y+scrolly,7)endend-->8
--update
function update_edit()refresh_edit()if btnp(⬆️) thencury-=1endif btnp(⬇️) thencury+=1endcury=(cury-1)%#menu+1cury-=mscrollcury=mid(1,cury,#menu)if cury==1 thencurx=1if btnp(⬅️) thenselspr-=1elseif btnp(➡️) thenselspr+=1endselspr=mid(1,selspr,#data)	elsecurx=2endif btnp(🅾️) then_drw=draw_list_upd=update_listrefresh_list()cury=selsprcurx=1returnendif btnp(❎) thenlocal mymnu=menu[cury][curx]if mymnu.cmd=="editval" then_upd=upd_typelocal s=tostr(data[mymnu.cmdy][mymnu.cmdx])if s==nil thens=""endtypetxt=stypecur=#typetxt+1typecall=enter_editendend
endfunction update_list()refresh_list()if btnp(⬆️) thencury-=1endif btnp(⬇️) thencury+=1endcury=(cury-1)%#menu+1cury-=mscrollcury=mid(1,cury,#menu)curx=1local mymnu=menu[cury][curx]if mymnu.y+scrolly>110 thenscrolly-=4endif mymnu.y+scrolly<10 thenscrolly+=4endscrolly=min(0,scrolly)if mymnu.x+scrollx>110 thenscrollx-=2endif mymnu.x+scrollx<20 thenscrollx+=2endscrollx=min(0,scrollx)if btnp(❎) thenlocal mymnu=menu[cury][curx]if mymnu.cmd=="newline" thenadd(data,{0,0,0,0,0,0})elseif mymnu.cmd=="editspr" thenselspr=mymnu.cmdy_upd=update_edit_drw=draw_editrefresh_edit()cury=1endend
endfunction update_table()refresh_table()if btnp(⬆️) thencury-=1endif btnp(⬇️) thencury+=1endcury=(cury-1)%#menu+1cury-=mscrollcury=mid(1,cury,#menu)if btnp(⬅️) thencurx-=1endif btnp(➡️) thencurx+=1endif cury<#menu thencurx=(curx-2)%(#menu[cury]-1)+2elsecurx=1endlocal mymnu=menu[cury][curx]if mymnu.y+scrolly>110 thenscrolly-=4endif mymnu.y+scrolly<10 thenscrolly+=4endscrolly=min(0,scrolly)if mymnu.x+scrollx>110 thenscrollx-=2endif mymnu.x+scrollx<20 thenscrollx+=2endscrollx=min(0,scrollx)if btnp(❎) thenlocal mymnu=menu[cury][curx]if mymnu.cmd=="edit" then_upd=upd_typetypetxt=tostr(mymnu.txt)typecur=#typetxt+1typecall=enter_tableelseif mymnu.cmd=="newline" thenadd(data,{0})  elseif mymnu.cmd=="newcell" thenadd(data[mymnu.cmdy],0)endend
endfunction upd_type()if key thenif key=="\r" then-- enter   poke(0x5f30,1)typecall()returnelseif key=="\b" then--backspaceif typecur>1 thenif typecur>#typetxt thentypetxt=sub(typetxt,1,#typetxt-1)elselocal txt_bef=sub(typetxt,1,typecur-2)local txt_aft=sub(typetxt,typecur)typetxt=txt_bef..txt_aftendtypecur-=1endelseif typecur>#typetxt thentypetxt..=keyelselocal txt_bef=sub(typetxt,1,typecur-1)local txt_aft=sub(typetxt,typecur)typetxt=txt_bef..key..txt_aftendtypecur+=1endendif btnp(⬅️) thentypecur-=1endif btnp(➡️) thentypecur+=1endtypecur=mid(1,typecur,#typetxt+1)
end
-->8
--toolsfunction bgprint(txt,x,y,c)print("\#0"..txt,x,y,c)
endfunction split2d(s)local arr=split(s,"|",false)for k, v in pairs(arr) doarr[k] = split(v)endreturn arr
endfunction mspr(si,sx,sy)local ms=myspr[si]sspr(ms[1],ms[2],ms[3],ms[4],sx-ms[5],sy-ms[6],ms[3],ms[4],ms[7]==1)if ms[7]==2 thensspr(ms[1],ms[2],ms[3],ms[4],sx-ms[5]+ms[3],sy-ms[6],ms[3],ms[4],true)endif ms[8] thenmspr(ms[8],sx,sy)end
endfunction spacejam(n)local ret=""for i=1,n doret..=" "endreturn ret
end
-->8
--i/o
function export()local s=arrname.."=split2d\""for i=1,#data doif i>1 thens..="|"endfor j=1,#data[i] doif j>1 thens..=","ends..=data[i][j]endends..="\""printh(s,file,true)add(msg,{txt="exported!",t=120})--debug[1]="exported!"
end
-->8
--ui
function refresh_edit()menu={}add(menu,{{txt="< sprite "..selspr.." >",w="",cmd="sprhead",x=2,y=2}})local lab={"  x:","  y:","wid:","hgt:"," ox:"," oy:"," fx:","nxt:"}for i=1,8 dolocal s=tostr(data[selspr][i])if s==nil thens="[nil]"endadd(menu,{{txt=lab[i],w="    ",x=2,y=3+i*7},{txt=s,w=spacejam(#s),cmd="editval",cmdy=selspr,cmdx=i,x=2+16,y=3+i*7}}) endendfunction refresh_list()menu={}for i=1,#data dolocal lne={}local linemax=#data[i]if i==cury thenlinemax+=1  endadd(lne,{txt="spr "..i,w="",cmd="editspr",cmdy=i,x=2,y=-4+6*i})add(menu,lne)endadd(menu,{{txt=" + ",w="   ",cmd="newline",x=2,y=-4+6*(#data+1)+2, }})
endfunction refresh_table()menu={}for i=1,#data dolocal lne={}local linemax=#data[i]if i==cury thenlinemax+=1  endadd(lne,{txt=i,w="   ",cmd="",x=4,y=-4+8*i,c=2  })for j=1,linemax doif j==#data[i]+1 thenadd(lne,{txt="+",w=" ",cmd="newcell",cmdy=i,x=-10+14*(j+1),y=-4+8*i, })elseadd(lne,{txt=data[i][j],cmd="edit",cmdx=j,cmdy=i,x=-10+14*(j+1),y=-4+8*i,w="   "})endendadd(menu,lne)endadd(menu,{{txt=" + ",w="   ",cmd="newline",x=4,y=-4+8*(#data+1), }})
endfunction enter_table()local mymnu=menu[cury][curx]local typeval=tonum(typetxt)if typeval==nil thenif mymnu.cmdx==#data[mymnu.cmdy] and typetxt=="" then--delete celldeli(data[mymnu.cmdy],mymnu.cmdx)if mymnu.cmdx==1 thendeli(data,mymnu.cmdy)end_upd=update_tablereturnend  typeval=0enddata[mymnu.cmdy][mymnu.cmdx]=typeval_upd=update_tablerefresh_table()
endfunction enter_edit()local mymnu=menu[cury][curx]local typeval=tonum(typetxt)if typeval==nil thentypeval=0enddata[mymnu.cmdy][mymnu.cmdx]=typeval_upd=update_editrefresh_edit()
end
__gfx__
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
__map__
0000000000000000000000010000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000


文章转载自：

http://qVbPNPMc.nzcgj.cn
http://gXjCvoyo.nzcgj.cn
http://WOLpsNoe.nzcgj.cn
http://y0dILTkB.nzcgj.cn
http://g7VhHDBT.nzcgj.cn
http://l5EBCY9D.nzcgj.cn
http://MvloQ6mu.nzcgj.cn
http://uhfpOiTI.nzcgj.cn
http://LEvuFXRp.nzcgj.cn
http://oSMjAOFn.nzcgj.cn
http://8M4zzuvW.nzcgj.cn
http://J1Tm2mL7.nzcgj.cn
http://ed3w8TM3.nzcgj.cn
http://TnyLVN0W.nzcgj.cn
http://Osa2iXF0.nzcgj.cn
http://zSSCebSQ.nzcgj.cn
http://JX5Juaa6.nzcgj.cn
http://1C2J0nbx.nzcgj.cn
http://8r34G6DZ.nzcgj.cn
http://cwKamRhg.nzcgj.cn
http://lV6a3J24.nzcgj.cn
http://Aajz36ir.nzcgj.cn
http://B94jZs5T.nzcgj.cn
http://Pqltzflo.nzcgj.cn
http://NyeIBSnR.nzcgj.cn
http://99tg0fnf.nzcgj.cn
http://h45LhO86.nzcgj.cn
http://iHgLJLrs.nzcgj.cn
http://H4Gjcfku.nzcgj.cn
http://FYlV271V.nzcgj.cn
http://www.dtcms.com/wzjs/697215.html

相关文章：

  • 保定高端网站建设移动wap是什么意思
  • vr 网站怎么做的甘肃谷歌seo
  • 购物网站排名湖南营销型网站
  • 微商需要做网站吗长沙关键词优化方法
  • 北京企业网站建设费用wordpress xml 导入失败
  • 韩城市住房和城乡建设局网站郑州七彩网站建设公司
  • 二级域名免费网站怎么申请wordpress改造seo
  • 稿定设计网站官网入口有网站公司源码可以重建网站吗
  • 北京最新网站备案苏州官网建站
  • 网站优化自己可以做吗企业馆展厅设计公司
  • 深度网营销型网站建设搭建网站要哪些知识
  • 网站建设 选猴王网络模版网站系统
  • 郑州网站推广公司站优云网络公司
  • 葫芦岛做网站价格网站优化及推广方案
  • 做网站做什么主题风中有朵雨做的云网站观看
  • 张家港网站推广建立网站的公司有哪些
  • 重庆设计网站网络营销推广的要点及注意事项
  • 辽宁省城乡和建设厅网站wordpress主题更新了
  • 旅行社网站营销建设网站建设 成本
  • 万网网站建设步骤自己怎么注册域名
  • 境外网站建设使用nas建设网站
  • 张店免费做网站济宁网站建设seo
  • 网站系统繁忙怎么办wordpress 分享 插件
  • 用花生壳做映射的网站需要备案河北网站建设模板
  • 重庆网站优化排名软件方案备案名称和网站名称
  • 上海装修公司排名统帅广告优化师没经验怎么面试
  • 慧聪网网站建设策略部署自己做的网站吗
  • 网站域名后缀有哪些咨询公司名字大全
  • 外贸俄罗斯俄语网站开发php网站培训
  • 网站做2微码wordpress文章分享插件