[Blitz] Title Page - Cervantes vs. Jonos !!

[jonos]

CERVANTES EDIT: This war was originally in (Tutorial)(Blitz)Graphics Engine

just to show that i am learning something, and that THIS IS THE BEST FORUM PART i will post my program i made from this tutorial's teachings:

Graphics 400, 400

h%=50
h%=50
v%=50
v%=50

While h<350
Plot 50, h
Plot 350, h
h=h+1
Wend

While v <350
Plot v ,50
Plot v, 350
v=v+1
Wend

i want to be able to make a delay between making the dots, so could one of you please show me how, thanks.

jonos edit:
nm, its delay(ms), guessing does help sometimes

[Cervantes]

ppfffft jonos!!

Less lines, looks cooler

code:

Graphics 400, 400 For k = 50 To 350 Step 2   Plot 50, k   Plot 350, k   Plot  k, 50   Plot k, 350   Delay 10 Next For i = 50 To 350   Plot 50, i   Plot 350, i   Plot  i, 50   Plot i, 350   Delay 5 Next

[jonos]

i didn't know about the for loops, i only knew about the loops shorthair showed us.

it looks like shorthair only has two pupils, me and you cervantes, haha

[jonos]

here cervantes, ill one up you:

code:

Graphics 400, 400 count% = 60 For k = 50 To 350 Step 10         Plot 50, k         Plot 350, k         Plot k, 50         Plot k, 350         Delay 10 Next For count = 50 To 350 Step 10         For count2 = 50 To 350 Step 10                 Plot count, count2                 Delay 5         Next Next Delay(3000)

jonos edit:


ongoing contest of for loops

code:

Graphics 400, 400 count% = 60 For k = 50 To 350 Step 10         Plot 50, k         Plot 350, k         Plot k, 50         Plot k, 350         Delay 10 Next For count1 = 50 To 350 Step 10         For count2 = 50 To 350 Step 10                 Plot count1, count2                 Delay 5         Next Next For count3 = 55 To 345 Step 10         For count4 = 50 To 350 Step 2.5                 Plot count3, count4                 Delay 3         Next Next For count5 = 55 To 345 Step 10         For count6 = 50 To 350 Step 2.5                 Plot count6, count5                 Delay 3         Next Next Delay(3000)

more lines, cooler effect, but you might want to decrease the delay amoutn, its still pretty slow

[Cervantes]

looks neat, is definately slow

code:

Graphics 400, 400 SetBuffer BackBuffer() x1 = 350 y1 = 50 x2 = 50 y2 = 350 For k = 0 To 350 Step 3   x1 = x1 - 3   y1 = y1 + 3   x2 = x2 + 3   y2 = y2 - 3   Line 50, y1, 50, y1 + 3   Line x1, 50, x1 - 3, 50   Line 350, y2, 350, y2 - 3   Line x2, 350, x2 + 3, 350   Flip Next x1 = 0 y1 = 400 x2 = 400 y2 = 0 For k = 0 To 350 Step 3 x1 = x1 + 3 y1 = y1 - 3 x2 = x2 - 3 y2 = y2 + 3 For i = 0 To 50 Step 3   Plot x1, i   Plot i, y1   Plot x2, i + 350   Plot i + 350, y2 Next Flip Next ;;;;;;;;; While Not KeyHit (1) Wend End

getting kinda off topic though