Just wondering some stuff on Pixels

[Rattrapmax6]

For, next delay?!!?!?!?!?!

:o

Tar and Feathers! Tar and Feathers!

[Dio]

no no!! i could of done a real time delay! im just lazy and wanted a quick way to do it!!! here:

Code:

1:stimer = timer
for i = 0 to 100000000
    if timer > stimer +1 then ii = i:exit for
    if timer < stimer then stimer = 86400 - stimer: stimer = 0 - stimer
next :if ii = 1 then goto 1

see?!? SEE!!?!?!?!11//

anyways,

Dio, he posted this in the QB Programming Help section, so FB code will probably be useless to him.

i know, i was posting the code for you guys.
so you could help him. sheesh.

[thegrogen]

no no!! i could of done a real time delay! im just lazy and wanted a quick way to do it!!! here:

Code:

1:stimer = timer
for i = 0 to 100000000

    if timer > stimer +1 then ii = i:exit for
    if timer < stimer then stimer = 86400 - stimer: stimer = 0 - stimer
next :if ii = 1 then goto 1

That is without a doubt the weirdest misuse of GOTO I've ever seen...

Here's what it should be:

Code:

dim t as integer
t = timer
while ((timer-t) < 5000) : wend ' five seconds

Or, better yet:

Code:

'Qb
sleep 5

'FB
sleep 5000

[Dio]

Hey, you know what?




FANTASTIC.


honestly. i nearly fell out of my chair when i read you post.
and to show you how much i really care, i just sent you a picture of a giant crap i just took. 'cause that's just how much i care... a giant crap load worth.
but thanks for the help anyway.

[Rattrapmax6]

Well,. bad programming in a noob forum can cause for someone learing to program the wrong way.... and FOR.. NEXT delays are bad,. very, very, bad... :lol: