Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 dissolve slide fade
Index -> Programming, Turing -> Turing Help
Goto page 1, 2  Next
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
beedub




PostPosted: Thu May 08, 2003 9:22 pm   Post subject: dissolve slide fade

hey all i was thinking, when i change a scene in a program, i can make a dissolve or a cool scene movement. I was wondering how would i do that... locate,randint?
Sponsor
Sponsor
Sponsor
sponsor
Tony




PostPosted: Thu May 08, 2003 10:24 pm   Post subject: (No subject)

code:
colorback (black)

var r,c:int

for i:1..3000
r:= Rand.Int(1,maxrow-1)
c:= Rand.Int(1,maxcol)

locate(r,c)
put " "
end for


randomly color the screen in. It will be more "dissolving" if you use Draw.Dot instead...
Latest from compsci.ca/blog: Tony's programming blog. DWITE - a programming contest.
Homer_simpson




PostPosted: Thu May 08, 2003 10:36 pm   Post subject: (No subject)

i think u forgot to put this in your loop
code:
colorback (c)
Tony




PostPosted: Thu May 08, 2003 10:38 pm   Post subject: (No subject)

code:

colorback(i)


but no, I wanted color to remain black so its consistant. If you keep on changing the colours though, you can cause some people to have siezures (probably bad spelling) Twisted Evil Fixed it. -Asok
Latest from compsci.ca/blog: Tony's programming blog. DWITE - a programming contest.
beedub




PostPosted: Sun May 11, 2003 9:31 pm   Post subject: (No subject)

ty soo much.. thats egcactly what i wanted
beedub




PostPosted: Thu May 15, 2003 9:07 pm   Post subject: (No subject)

umm.. one quick question.. srry if this is newbish but.. what would the perimeters be for the drawdot ??... like drawdot (320,200,black)... or what?
void




PostPosted: Thu May 15, 2003 9:12 pm   Post subject: (No subject)

drawdot (x,y,color)...ye...u were rite...
beedub




PostPosted: Thu May 15, 2003 9:13 pm   Post subject: (No subject)

i know that.. but to correctly make the slide fade look proper... then what would the perimeters be?..like the coordinates... and void what school you go to??
beedub




PostPosted: Thu May 15, 2003 9:31 pm   Post subject: (No subject)

nvm... i found out... this is what my final code is
code:
drawfillbox (0,0, 640, 400, black)

var r,c,r2,c2:int

for i:1..3000
r:= Rand.Int(1,maxrow-1)
c:= Rand.Int(1,maxcol)
r2:=Rand.Int (1,640)
c2:=Rand.Int (1,400)

locate(r,c)
drawfillbox (r2,c2,r2+10,c2+10,white)
delay (1)
end for
cls

thanks for the help;)
Homer_simpson




PostPosted: Thu May 15, 2003 10:05 pm   Post subject: (No subject)

was bored tried to write something short...
code:
colorback(black)
cls
var x,y:array 1..1000 of int

for i:1..3000
for ii:1..1000
x(ii):=Rand.Int (1,640)
y(ii):=Rand.Int (1,400)
end for

for ii:1..1000
drawdot(x(ii),y(ii),white)
%drawfilloval(x(ii),y(ii),1,1,white)
end for
end for
cls
beedub




PostPosted: Thu May 15, 2003 10:08 pm   Post subject: (No subject)

thats nice... the only problem is... it takes to long to end...
Martin




PostPosted: Thu May 15, 2003 10:17 pm   Post subject: (No subject)

Whatchya making, beedub?
beedub




PostPosted: Fri May 16, 2003 5:17 pm   Post subject: (No subject)

when i chage scenes in a program i want it to look cool... and make it just like a quick change of scene... so i make it dissolve..
Homer_simpson




PostPosted: Fri May 16, 2003 6:23 pm   Post subject: (No subject)

this another fade to white effect...
code:
for decreasing ii : 255 .. 1 by 5
    RGB.SetColor (black, ii, ii, ii)
    colorback (black)
    cls
    delay (10)
end for
Homer_simpson




PostPosted: Fri May 16, 2003 6:35 pm   Post subject: (No subject)

this is another effect it fades the black screen to yer image...
code:
View.Set ("offscreenonly")
var i := 257
for decreasing ii : 255 .. 1 by 1
    i -= 1
    RGB.SetColor (black, ii, ii, ii)
    colorback (black)
    cls
    RGB.SetColor (blue, i, i, 255)
    drawfillstar (1, 1, 300, 300, blue)
    View.Update
    %delay (5)
end for
Display posts from previous:   
   Index -> Programming, Turing -> Turing Help
View previous topic Tell A FriendPrintable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 2  [ 20 Posts ]
Goto page 1, 2  Next
Jump to:   


Style:  
Search: