-----------------------------------

copthesaint

Mon Jan 12, 2009 11:59 am


Check Turing's speed on YOUR computer

-----------------------------------

This a program I made to see how fast turing will run with my different games.
This is usefull to see how well turing runs on your computer.
The test will take approx. 6 seconds.


NOTE: This is without Graphics.
%This test will takes 6 seconds find how many times your program will loop
%My computer (4 Gb of ram LBTP) runs at 600000-800000
%The first loop is normally the slowest
%Remember this is without pictures, music, drawn objects ect. so this is only what turing is at it's max speed
View.Set ("graphics:max;max;offscreenonly;nocursor")
var timervar, timervar2, checksec, reading1, reading2, reading3, reading4,
    reading5, readingcheck, average : int := 0
Time.Delay (100)
procedure computerspeed
    timervar := Time.Sec
    loop
        timervar2 := Time.Sec
        checksec += 1
        if timervar + 1