Posted: Fri Jan 02, 2009 6:53 pm
http://www.youtube.com/watch?v=ivHaMNBt_kkRook Zimbabwe wrote:Only 3 more years until the end of the world!!!
http://www.youtube.com/watch?v=ivHaMNBt_kkRook Zimbabwe wrote:Only 3 more years until the end of the world!!!
As Albert Einstein (4 years after the bees have died, this may just be approximately, so if 2008-2010 the bees die, the Mayas will get 50% more attention) and the Mayas (they always were right) said ...Rook Zimbabwe wrote:Only 3 more years until the end of the world!!!
That was horribleKaeru Gaman wrote:http://www.youtube.com/watch?v=ivHaMNBt_kk
Buy more honey and save the bees. Good planAs Albert Einstein (4 years after the bees have died, this may just be approximately, so if 2008-2010 the bees die, the Mayas will get 50% more attention) and the Mayas (they always were right) said ...

I think Rook you are wrong. I am sure M$ is planning to release Windows 7 before then!!!Rook Zimbabwe wrote:Only 3 more years until the end of the world!!!
Just in time to save us from the year 2038 problemSFSxOI wrote:according to NASA a comet could possibly slam into the earth in April 2037, which will cause a "life extinction event"
Code: Select all
OpenConsole()
ConsoleTitle("C:\Programfiles\PureBasic\Compilers")
EnableGraphicalConsole(1)
PrintN("")
For a=1 To 50
Print("*")
Delay(1)
Next
PrintN("")
a$="PureBasic v4.30 <Windows - x86>"
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(1)
Next
PrintN("")
For a=1 To 50
Print("*")
Delay(1)
Next
Delay(200)
PrintN("")
a$= "Compiling C:\Programfiles\PureBasic\Examples\Idle.pb"
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(20)
Next
Delay(500)
PrintN("")
a$="Loading external libraries..."
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(10)
Next
PrintN("")
Delay(500)
PrintN("Starting compilation...")
Delay(1500)
PrintN("38 lines processed")
Delay(500)
a$= "Creating executable."
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(5)
Next
PrintN("")
Delay(1000)
PrintN("")
a$="- Feel the ..PuRe.. Power -"
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(100)
Next
Delay(2000)
PrintN("")
a$="C:\Programfiles\PureBasic\Compilers "
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(5)
Next
Delay(1000)
PrintN("")
a$="exe complete, please press enter to test"
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(5)
Next
Input()
ConsoleColor(10,0)
Delay(100)
ClearConsole()
a$="Wake up Idle"
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(Random(400))
Next
Delay(3000)
PrintN("")
a$="The Matrix has you"
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(Random(400))
Next
Delay(4000)
ClearConsole()
a$="Follow the white rabbit"
a=Len(a$)
For b=1 To a
b$=Mid(a$,b,1)
Print(b$)
Delay(Random(400))
Next
Delay(2000)
ClearConsole()
ConsoleColor(15,0)
PrintN(" (\(\")
PrintN(" ( ';')")
PrintN(" o(^)(^)")
ConsoleColor(10,0)
PrintN(" --------------------------------->")
Print(" He went that way...")
Delay(4000)
ClearConsole()
ConsoleColor(15,0)
PrintN("Test complete, press enter to finish")
Input()
CloseConsole()Baldrick wrote:I think Rook you are wrong. I am sure M$ is planning to release Windows 7 before then!!!Rook Zimbabwe wrote:Only 3 more years until the end of the world!!!
+1Tipperton wrote:Baldrick wrote:I think Rook you are wrong. I am sure M$ is planning to release Windows 7 before then!!!Rook Zimbabwe wrote:Only 3 more years until the end of the world!!!