Posted by kaptan 208.4.90.24 using Mozilla/4.0 (compatible; MSIE 4.01; Windows 98) on April 08, 2000 at 19:35:56:
In Reply to: Check out this effect I made for your title screens! Just copy it into the RPGCode Editor. posted by Ion Eagle 2000 on April 08, 2000 at 16:46:40:
Try This
There two modes
#MWin("What Color R G B?")
#Wait (Color$)
#Clear
#x1!=1
#R! = 0
#G! = 0
#B! = 0
#y1!=40
#x2!=640
#y2!=40
#For(Counter!=1; Counter!<=256; Counter!=Counter!+1)
{
#y1!=1
#y2!=1
#we! = we! + Counter!
#if (Color$ = R)
{
#R! = we!
}
#if (Color$ = B)
{
#B! = we!
}
#if (Color$ = G)
{
#G! = we!
}
#y1!=y1!+Counter!
#ColorRGB (R!,G!,B!)
#y2!=y2!+Counter!
#DrawLine (x1!, y1!, x2!, y2!)
}
#ColorRGB (0,0,0)
#Text(2,4, P U T)
#Text(2,4, P U T Y O U R)
#Text(2,4, P U T Y O U R T I T L E)
#Text(2,4, P U T Y O U R T I T L E H E R E)
*or
#Clear
#x1!=1
#y1!=40
#x2!=640
#y2!=40
#For(Counter!=1; Counter!<=256; Counter!=Counter!+1)
{
#y1!=1
#we! = we! + Counter!
#if (Color$ = R)
{
#R! = we!
}
#if (Color$ = B)
{
#B! = we!
}
#if (Color$ = G)
{
#G! = we!
}
#y1!=y1!+Counter!
#ColorRGB (R!,G!,B!)
#y2!=y2!+Counter!
#DrawLine (x1!, y1!, x2!, y2!)
}
#ColorRGB (0,0,0)
#Text(2,4, P U T)
#Text(2,4, P U T Y O U R)
#Text(2,4, P U T Y O U R T I T L E)
#Text(2,4, P U T Y O U R T I T L E H E R E)