seriously i need help bad

[matt]

hi everyone i need ytur help as how to wright a procedure so that i can cheack the boxes in my tic tac toe turing. if i make it so an x is placed down in my program the ai seems to be able to goi over my x. For example if I place my x in the top left hand corner oft the tic tac toe box the ai has a chance to go over it. please help me with a procedure that will make mny boxes stop from being taken over. as well i am sure as to how to end my pogram when it gets three in a row any suggestions

*****************************
hey guys to make it work there is one cspecial thing u must go into paint and draw x and o and name them work.bmp and work2.bmp thats why this program is so frigan hard i no it takes time please helpm me nothing like this has ever been attempted before
____________________________________________________________-
_________________________________________________________________

code:

var yes: string var no: string var ansuer: string var x, y : int setscreen ("graphics: 450;225") Pic.ScreenLoad ("title.bmp", 100, 0, picCopy) delay (3000) %Variables var cheak : array 1 .. 3, 1 .. 3 of string (1) var b : int % initialize grid for row : 1 .. 3     for column : 1 .. 3         cheak (row, column) := "-"     end for end for % Draw the x and o grid setscreen ("graphics: 300;300") drawline (0, 100, 300, 100, black) drawline (0, 200, 300, 200, black) drawline (100, 0, 100, 300, black) drawline (200, 0, 200, 300, black) drawline (101, 0, 101, 300, black) drawline (201, 0, 201, 300, black) drawline (301, 201, 0, 201, black) drawline (0, 101, 301, 101, black) drawbox (0, 299, 299, 0, black) loop     loop         mousewhere (x, y, b)         if b = 1 then             if x > 0 and x < 100 and y > 0 and y < 100 then                 Pic.ScreenLoad ("work.bmp", 0, 0, picCopy)             elsif x > 100 and x < 200 and y > 0 and y < 100 then                 Pic.ScreenLoad ("work.bmp", 100, 0, picCopy)             elsif x > 200 and x < 300 and y > 0 and y < 100 then                 Pic.ScreenLoad ("work.bmp", 200, 0, picCopy)             elsif x > 0 and x < 100 and y > 100 and y < 200 then                 Pic.ScreenLoad ("work.bmp", 0, 100, picCopy)             elsif x > 100 and x < 200 and y > 100 and y < 200 then                 Pic.ScreenLoad ("work.bmp", 100, 100, picCopy)             elsif x > 200 and x < 300 and y > 100 and y < 200 then                 Pic.ScreenLoad ("work.bmp", 200, 100, picCopy)             elsif x > 0 and x < 100 and y > 200 and y < 300 then                 Pic.ScreenLoad ("work.bmp", 0, 200, picCopy)             elsif x > 100 and x < 200 and y > 200 and y < 300 then                 Pic.ScreenLoad ("work.bmp", 100, 200, picCopy)             elsif x > 200 and x < 300 and y > 200 and y < 300 then                 Pic.ScreenLoad ("work.bmp", 200, 200, picCopy)             end if         end if         exit when b = 1     end loop     delay (1000)         loop         randint (x, 0, 300)         randint (y, 0, 300)         if x > 0 and x < 100 and y > 0 and y < 100 then             Pic.ScreenLoad ("work2.bmp", 0, 0, picCopy)         elsif x > 100 and x < 200 and y > 0 and y < 100 then             Pic.ScreenLoad ("work2.bmp", 100, 0, picCopy)         elsif x > 200 and x < 300 and y > 0 and y < 100 then             Pic.ScreenLoad ("work2.bmp", 200, 0, picCopy)         elsif x > 0 and x < 100 and y > 100 and y < 200 then             Pic.ScreenLoad ("work2.bmp", 0, 100, picCopy)         elsif x > 100 and x < 200 and y > 100 and y < 200 then             Pic.ScreenLoad ("work2.bmp", 100, 100, picCopy)         elsif x > 200 and x < 300 and y > 100 and y < 200 then             Pic.ScreenLoad ("work2.bmp", 200, 100, picCopy)         elsif x > 0 and x < 100 and y > 200 and y < 300 then             Pic.ScreenLoad ("work2.bmp", 0, 200, picCopy)         elsif x > 100 and x < 200 and y > 200 and y < 300 then             Pic.ScreenLoad ("work2.bmp", 100, 200, picCopy)         elsif x > 200 and x < 300 and y > 200 and y < 300 then             Pic.ScreenLoad ("work2.bmp", 200, 200, picCopy)         end if         exit     end loop end loop end if _________________________________________________________________

[cycro1234]

We won't be able to see hte pictures if you don't upload them.

[ste_louis26]

We don't do the work for you on compsci we just give suggestions. You have no basic text to test box if it's x or o.-it's just a bunch of pictures-

[matt]

sorry about that i will reword my problem thank u for pointing it out

[Leftover]

Tic tac toe has been attempted before... And you can upload the pictures easily your self.

[basketball4ever]

use a 2d array or just an if statement... kind of procedure

2D array --> go check out the tutorials

If statement... i guess u can just go like:
if %the coordinates of the box then
Draw.ThickLine(%watever)
then u make sure that the ai cant press these coordinates... and rand the other coordinates.. u'll have a crappy AI but ... tic tac toe... u can rreally have a medium ai....

[ste_louis26]

You could test the box the see if it's been played with whatdot colour. It would be more code but not as much thinking.

[cycro1234]

Don't spam the help section!!

[matt]

plaease give me an example of a 2d array

[scottyrush13]

matt the isu's were due in class today

i doubt he'll let you hand it in on the exam day,

[person]

code:

var a : array 1..5 of int for x : 1..5          a (x) := x end for

for this, code, a (1) = 1, and 1 (2) = 2 and etc
this is all in turing help

[scottyrush13]

matt, before you start asking questions about 2d arrays and such, you should check the tutorials, because im almost certain that there is something about them there

they arent all that difficult and i do believe that tony mentioned them in his arrays tutorial

check the tutorials before asking a question thats already been answered elsewhere