Icon movment challenge!

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|24\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Blitz -> Icon movment challenge!
Fri, 23 May 2008, 14:29
spinal	OK, if anyone remembers my DS menu (DSision), I'm remaking it. However, I would like to add some different animations for the icon movement. Below you will find some blitz code for the current movement, load it up,the green area represents the DS screen (256 wide) press right, et voilà! Anyway, if anyone wants to contribute, please do. I'm not looking for the best ever thing ever, just something that looks nice. Enter as many times as you like, you will get credited if I use your ideas. I know one of you has already came up with a cool idea, and I finally got it working. Thanks. Graphics 640,100,16,2 x=-80 Repeat Delay 2 Color 0,0,0 Rect 0,0,640,100,1 Color 0,255,0 Rect 0,0,256,100,1 Color 0,0,255 If KeyDown(205) Then x=x+1 If KeyDown(203) Then x=x-1 For test=0 To 22 offset=(test32)-x If offset<-200 Then offset=-200 If offset>200 Then offset=200 scale=48- (Abs(offset)) If scale<16 Then scale=16 Rect (test32)+offset -x+128-(scale/2),0,scale,scale,1 Next VWait() Until KeyHit(1) End --v -=-=- Check out my excellent homepage!
Sat, 24 May 2008, 10:51
spinal	No takers? oh well.
Sat, 24 May 2008, 13:07
Jayenkai	Graphics 640,100,16,2 SetBuffer BackBuffer() x=-80 Repeat Color 0,0,0 Rect 0,0,640,100,1 Color 0,255,0 Rect 0,0,256,100,1 Color 0,0,255 spd=2 If KeyDown(205) Then x=x+spd If KeyDown(203) Then x=x-spd For test=0 To 22 offset#=(test64)-x If offset<-180 Then offset=-180 If offset>180 Then offset=180 scaleX=Cos((offset))64 If scaleX<16 Then scaleX=16 scaleY=Cos((offset))64 If scaleY<16 Then scaleY=16 Rect (test32)+offset -x+128-(scaleX/2),0,scaleX,scaleY,1 Next Flip Until KeyHit(1) End --v Half done! moreto come! -=-=- ''Load, Next List!''
Sat, 24 May 2008, 14:20
spinal	the zoomed icon (largest) is not always center (yet?) oh, that other one you did, I cant get the icons to resize properly on the ds, i think cos of how sin/cos work on it. any ideas on making the size changes, um, more extreme? and for anyone else, its okay to scale the hieght and width seperatly. -=-=- Check out my excellent homepage!
Sat, 24 May 2008, 14:44
Jayenkai	Sorry, I was at work pissing about between customers, for that last post... I'll grab myself something to eat, then go have a proper play about, see what I can come up with -=-=- ''Load, Next List!''
Sat, 24 May 2008, 15:05
spinal	Also, I'm planning on adding that smooth-scrolly thing of yours, just like last time. Also, I need to come up with a reliable way of detecting the 'selected' icon, I think x/icongap or something like that will do. -=-=- Check out my excellent homepage!
Sat, 24 May 2008, 15:49
Jayenkai	Graphics 512,192,16,2 SetBuffer BackBuffer() x=-80 Repeat Cls Color 0,255,0 Rect 0,0,256,192,1 Color 0,0,255 spd=2 If KeyDown(205) Then x=x+spd If KeyDown(203) Then x=x-spd nearest=500 nearestuse=0 For test=0 To 22 ; method=1:gap=25:p1#=2.25:p2#=2.15 ; method=2:gap=18:p1#=2.1:p2=2.1 method=3:gap=24:p1#=3:p2=3 ; Just uncomment the one you want to try. offset#=(testgap)-x If nearest>Abs(offset) Then nearest=Abs(offset):nearestuse=test If offset<-90 Then offset=-90 If offset>90 Then offset=90 scaleX=Cos((offsetp1))64 If scaleX<16 Then scaleX=16 If scaleX>64 Then scaleX=64 scaleY=Cos((offsetp2))64 If scaleY<16 Then scaleY=16 If scaley>64 Then scaley=64 If method=1 drawX= ( ((test+2.5)(gap2)) )-((x-2)2) drawY=64+Cos(offset2)64 EndIf If method=2 drawX= 128+Sin(offset)16 drawY=56+Cos(offset2)72 EndIf If method=3 drawX=96+Sin((offset4)+(test3))84 drawy=128-Cos(offset3)64 EndIf Rect drawX-(scaleX/2),DrawY-(scaleY/2),scaleX,scaleY,1 Next Color 255,0,0:Text 1,1,nearestuse If nearest<12 And method=2 Then Rect 128-32,128-32,64,64,1:Color 0,0,0:Text 128,128,nearestuse,1,1 Flip Until KeyHit(1) End --v A few -=-=- ''Load, Next List!''
Fri, 20 Jun 2008, 18:12
dna	Very good Jay. That loop the loop one was OK