Ok now I am confused, just did this test ran two DBPro programes one of which was the ball drop demo for phyics, plus had windows media run watching NASA TV plus had Kaspersky doing a drive scan, now all this lot pushed the cpu to 100% most of the time and tempature was at a 60C all the time all doing for a good 30mins.
now if I run this code
sync on
sync rate 60
autocam off
position camera 0,0,-60
`position camera 0,100,0
`point camera 0,0,0
make object cylinder 1,10
make mesh from object 1,1
make object cone 2,10
make mesh from object 2,2
make object cone 3,10
make mesh from object 3,3
make object cylinder 4,10
rotate object 4,90,90,0
scale object 4,10,500,10
make mesh from object 4,4
make object box 5,10,10,.5
make mesh from object 5,5
delete object 2
delete object 3
delete object 4
delete object 5
add limb 1,1,1
add limb 1,2,2
add limb 1,3,3
add limb 1,4,4
add limb 1,5,5
add limb 1,6,3
offset limb 1,2,0,10,0
offset limb 1,3,0,-10,0
rotate limb 1,3,180,0,0
offset limb 1,4,0,-15,0
offset limb 1,5,20,0,0
offset limb 1,6,-27,0,0
rotate limb 1,6,90,-90,0
scale limb 1,6,10,50,10
link limb 1,4,5
link limb 1,4,6
make object sphere 7,5
make mesh from object 7,7
add limb 1,7,7
offset limb 1,7,0,15,0
add limb 1,8,4
scale limb 1,8,25,100,100
offset limb 1,8,0,0,5
rotate limb 1,8,0,90,0
link limb 1,7,8
delete object 7
add limb 1,9,7
offset limb 1,9,0,0,0
add limb 1,10,4
scale limb 1,10,25,100,100
offset limb 1,10,0,0,5
rotate limb 1,10,90,90,0
link limb 1,9,10
link limb 1,7,9
rotate limb 1,9,0,limb angle y(1,9)+120,0
add limb 1,11,7
offset limb 1,11,0,0,0
add limb 1,12,4
scale limb 1,12,25,100,100
offset limb 1,12,0,0,5
rotate limb 1,12,90,90,0
make object cone 100,-10
make mesh from object 100,100
link limb 1,11,12
link limb 1,7,11
rotate limb 1,11,0,limb angle y(1,11)+240,0
add limb 1,13,3
add limb 1,14,100
link limb 1,7,13
link limb 1,7,14
rotate limb 1,13,-90,30,0
rotate limb 1,14,90,30,0
offset limb 1,13,10,0,-3
offset limb 1,14,10,0,-3
add limb 1,15,3
add limb 1,16,100
link limb 1,7,15
link limb 1,7,16
rotate limb 1,15,-90,-90,0
rotate limb 1,16,90,-90,0
offset limb 1,15,-4,0,10
offset limb 1,16,-4,0,10
add limb 1,17,3
add limb 1,18,100
link limb 1,7,17
link limb 1,7,18
rotate limb 1,17,-90,150,0
rotate limb 1,18,90,150,0
offset limb 1,17,-7,0,-8
offset limb 1,18,-7,0,-8
hide limb 1,9
hide limb 1,11
delete object 100
rem speed pointer
make object sphere 2,2.5
make object cone 3,5
make mesh from object 30,2
make mesh from object 31,3
add limb 2,1,30
add limb 2,2,31
link limb 2,1,2
scale limb 2,2,25,100,25
offset limb 2,2,0,3,0
position object 2,-35,20,0
delete object 3
rem driction pointer
make object sphere 3,2.5
make object cone 4,5
make mesh from object 32,3
make mesh from object 33,4
add limb 3,1,32
add limb 3,2,33
link limb 3,1,2
scale limb 3,2,25,100,25
offset limb 3,2,0,3,0
position object 3,35,20,0
delete object 4
`rotate object 2,0,0,-230
`fix object pivot 2
time=timer()
oldyangle#=limb angle y(1,4)
newyangle#=0.0
speedangle#=0.0
do
nowtime = timer()
timesegment = nowtime - lasttime
inc milliseconds, timesegment
if milliseconds > 999
inc seconds
dec milliseconds, 1000
tick = TRUE
if seconds > 59
inc minutes
dec seconds, 60
if minutes > 59
inc hours
dec minutes, 60
endif
endif
lasttime = nowtime
endif
print "Program runtime : " + str$(hours) + " hours " + str$(minutes) + " minutes " + str$(seconds) + " seconds." + " FPS : " + str$(screen fps())
text 880,100,"N"
text 930,120,"NE"
text 880,230,"S"
text 930,210,"SE"
text 815,165,"W"
text 830,210,"SW"
text 945,165,"E"
text 830,120,"NW"
if timer()>time+9000
oldyangle#=newyangle#
oldspeedangle#=speedangle#
newyangle#=wrapvalue(limb angle y(1,4))+rnd(360)
`speedangle#=wrapvalue(limb angle y(2,1))+rnd(130)
speedangle#=wrapvalue(limb angle y(2,1))+rnd(100)
time=timer()
endif
oldyangle#=curveangle(newyangle#, oldyangle#, 50)
rotate limb 1,4,0,oldyangle#+90,0
rotate limb 3,1,0,0,-oldyangle#,0
set cursor screen width()-50,0
print abs(int(-oldyangle#))
wd=abs(int(-oldyangle#))
tx=880
ty=250
gap=11.25
if wd>=0 and wd<gap then center text tx,ty,"North"
if wd>=22.5-gap and wd<=22.5+gap then center text tx,ty,"North North East"
if wd>=45-gap and wd<=45+gap then center text tx,ty,"North East"
if wd>=67.5-gap and wd<=67.5+gap then center text tx,ty,"North East North"
if wd>=90-gap and wd<=90+gap then center text tx,ty,"East"
if wd>=112.5-gap and wd<=112.5+gap then center text tx,ty,"East South East"
if wd>=135-gap and wd<=135+gap then center text tx,ty,"South East"
if wd>=157.5-gap and wd<=157.5+gap then center text tx,ty,"South South East"
if wd>=180-gap and wd<=180+gap then center text tx,ty,"South"
if wd>=202.5-gap and wd<=202.5+gap then center text tx,ty,"South West South"
if wd>=225-gap and wd<=225+gap then center text tx,ty,"South West"
if wd>=247.5-gap and wd<=247.5+gap then center text tx,ty,"West West South"
if wd>=270-gap and wd<=270+gap then center text tx,ty,"West"
if wd>=292.5-gap and wd<=292.5+gap then center text tx,ty,"North West North"
if wd>=315-gap and wd<=315+gap then center text tx,ty,"North West"
if wd>=337.5-gap and wd<=337.5+gap then center text tx,ty,"North North West"
if wd>=360-gap and wd<=360 then center text tx,ty,"North"
text 90,200,"0"
text 70,185,"10"
text 65,165,"20"
text 70,145,"30"
text 80,125,"40"
text 100,110,"50"
text 120,100,"60"
text 140,100,"70"
text 160,110,"80"
text 180,125,"90"
text 190,145,"100"
oldspeedangle#=curveangle(speedangle#, oldspeedangle#, 50)
set cursor 0,0
print int(oldspeedangle#)
set text size 50
text 150,180,str$(int(oldspeedangle#))
set text size 12
rotate limb 2,1,0,0,(-oldspeedangle#*2.0)-230.0
`rotate limb 1,7,0,wrapvalue(limb angle y(1,7))+speedangle#/2.75,0
sync
loop
It shuts down within about 5mins so whats is the above code doing that can make it stop running.
edit
took all the real numbers out eg # numbers now runs without reset system or locking up. strange?
Dark Physics makes any hot drink go cold.
