- 注册时间
- 2006-5-9
- 最后登录
- 2011-1-10
③业余
- 积分
- 123
|
发表于 2006-6-13 13:21:33
|
显示全部楼层
其实我觉得楼主那一闪一闪的效果蛮可爱的[s:1]
如果硬要做成渐变效果的话,可以借用btntime
不过在按钮的选择上会有些小麻烦。
代码如下:
*define
effect 2,10,300
effect 3,10,800
effect 4,1
game
*start
*b
bg "1.jpg",3
bg "2.jpg",3
bg "3.jpg",3
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
;按钮准备
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
lsp 1,":a/2,0,3;img\\btn\\chapter1.jpg",194,408
lsp 2,":a/2,0,3;img\\btn\\chapter2.jpg",315,408
lsp 3,":a/2,0,3;img\\btn\\chapter3.jpg",410,408
lsp 4,":a/2,0,3;img\\btn\\chapter4.jpg",501,408
lsp 5,":a/2,0,3;img\\btn\\chapter0.jpg",523,445
spbtn 1,1
spbtn 2,2
spbtn 3,3
spbtn 4,4
spbtn 5,5
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
;背景图片准备
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
lsp 10,":c/6,1000,3;bg.bmp",0,0
*bgdisplay
cell 10,0:print 2:gosub *btnrdy
cell 10,1:print 2:gosub *btnrdy
cell 10,2:print 2:gosub *btnrdy
cell 10,3:print 2:gosub *btnrdy
cell 10,4:print 2:gosub *btnrdy
cell 10,5:print 2:gosub *btnrdy:goto *bgdisplay
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
;按钮等待
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
*btnrdy
mov %2,1000
mov %3,0
*btnwait
sub %2,%3
btntime %2
btnwait2 %0
if %0=-2 return
if %0<=0 getbtntimer %3:goto *btnwait
if %0=1 bg white,4:goto *start1
if %0=2 bg white,4:goto *special
if %0=3 bg white,4:goto *comet
if %0=4 bg white,4:goto *equipment
if %0=5 bg white,4:goto *back
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
;各分支
;☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
*start1
csp -1
print 4
btndef ""
bg "img\\start.jpg",2
click
goto *b
*special
csp -1
print 4
btndef ""
bg "img\\special.jpg",2
click
goto *b
*comet
csp -1
print 4
btndef ""
bg "img\\comet.jpg",2
click
goto *b
*equipment
csp -1
print 4
btndef ""
bg "img\\equipment.jpg",2
click
goto *b
*back
csp -1
print 4
btndef ""
bg "img\\back.jpg",2
click
goto *b |
|