program keeps crashing

zylum · **Posted:** Wed Mar 10, 2004 10:41 pm

whenever i try running this, "the environment crashes"

code:

var clr : int
var pic : int := Pic.FileNew ("flamebw.jpg")
pic := Pic.Scale (pic, 100, 100)
Pic.Draw (pic, 0, 0, picCopy)
var dots : array 1 .. 100, 1 .. 100 of int

for x : 1 .. 100
for y : 1 .. 100
clr := whatdotcolor (x, y)
if (clr < (16 + 31) div 2 and clr not= 7) or clr = 0 then
dots (x, y) := 0
else
dots (x, y) := 1
end if
end for
end for

var file : int

open : file, "picture.txt", put
for x : 1 .. 100
for y : 1 .. 100
if x < 100 then
put dots (x, y) ..
else
put dots (x, y)
end if
end for
end for

does this happen to anyone else? how can i fix this?

-zylum

Catalyst · **Posted:** Wed Mar 10, 2004 10:44 pm

works fine for me
might be the image itself?

jonos · **Posted:** Wed Mar 10, 2004 11:16 pm

does there a prompt that pops up saying something about turing environment error, because if there is, thats something wrong with turing, and you should contact holtsoft (unless your copy is illegal).

Catalyst · **Posted:** Wed Mar 10, 2004 11:23 pm

those are usually caused by some unfinished command, but none of those are present here

zylum · **Posted:** Wed Mar 10, 2004 11:27 pm

catalyst was right... for some reason there was something wrong with my picture file.. i tried it on a different one and it works fine! Smile

	Computer Science Canada Programming C, C++, Java, PHP, Ruby, Turing, VB Username: Password: Register
Wiki Blog Search Turing Chat Room Members