Wundervollen guten Morgen!
Programmiere momentan mit Msw logo tic tac toe jedoch gelningt mir das nciht so ganzweil ich an einer stelle ein problem habe und zwar ich habe alles schön programmiert sprich die mausklicks laufen auch perfekt jedoch fehlt mir eins und zwar der wechsel zwischen dem x und dem kreis
Ein Screenshot vom spielfeld
habe mir berlegt das wenn ich auf das x drücke der das x auswählt jedoch kriege ich dasn achher nicht gebacken das so zu programmieren wegen den mauklicks der kommt i wie durcheinander
fals jemand ne idee hat wie der sonst zwischen dem x und dem kreis wechseln kann ohne diese auswahl bitte vorschlagen
achja das spielfeld ist so aufgebaut
das jeder kasten nen buchtsaben hat
der kasten ganz unten links ist mit dem befehl a und ab verbunden a macht nur einen kreis ab macht ein x
hoffe es ist klar geworden wie ich das aufgebaut habe einfach richtig simple
und ich hoffe auf ne menge antworten , danke!
Programmiere momentan mit Msw logo tic tac toe jedoch gelningt mir das nciht so ganzweil ich an einer stelle ein problem habe und zwar ich habe alles schön programmiert sprich die mausklicks laufen auch perfekt jedoch fehlt mir eins und zwar der wechsel zwischen dem x und dem kreis
Code:
to a
pu
setxy 50 50
pd
O
end
to ab
pu
setxy 50 50
pd
x
end
to b
pu
setxy 150 50
pd
O
end
to bb
pu
setxy 150 50
pd
x
end
to c
pu
setxy 250 50
pd
O
end
to cb
pu
setxy 250 50
pd
x
end
to change
pu
setxy -50 100
pd
x
pu
setxy -50 50
pd
o
end
to choose
pu
setxy -70 220
pd
x
pu
setxy -70 50
pd
o
end
to d
pu
setxy 50 150
pd
O
end
to db
pu
setxy 50 150
pd
x
end
to e
pu
setxy 150 150
pd
O
end
to eb
pu
setxy 150 150
pd
x
end
to f
pu
setxy 250 150
pd
O
end
to fb
pu
setxy 250 150
pd
x
end
to feld
ht
setsc [255 255 255]
setpc [51 102 204]
setpensize [3 3]
cs
home
pd
repeat 4 [ fd 300 rt 90]
home
fd 100
rt 90
fd 300
lt 90
fd 100
lt 90
fd 300
home
rt 90
fd 100
lt 90
fd 300
rt 90
fd 100
rt 90
fd 300
end
to g
pu
setxy 50 250
pd
O
end
to gb
pu
setxy 50 250
pd
x
end
to h
pu
setxy 150 250
pd
O
end
to hb
pu
setxy 150 250
pd
x
end
to i
pu
setxy 250 250
pd
O
end
to ib
pu
setxy 250 250
pd
x
end
to mousepressed
localmake "curpos mousepos
localmake "x item 1 :curpos
localmake "y item 2 :curpos
localmake "suggest -1
if (AND :x>0 :x<100 :y>0 :y<100) [make "suggest a]
if (AND :x>100 :x<200 :y>0 :y<100) [make "suggest b]
if (AND :x>200 :x<300 :y>0 :y<100) [make "suggest c]
if (AND :x>0 :x<100 :y>100 :y<200) [make "suggest d]
if (AND :x>100 :x<200 :y>100 :y<200) [make "suggest e]
if (AND :x>200 :x<300 :y>100 :y<200) [make "suggest f]
if (AND :x>0 :x<100 :y>200 :y<300) [make "suggest g]
if (AND :x>100 :x<200 :y>200 :y<300) [make "suggest h]
if (AND :x>200 :x<300 :y>200 :y<300) [make "suggest i]
end
to O
pu
setpc [255 0 153]
setpensize [2 3]
pd
circle 42
pu
end
to start
cs
feld
choose
mousepressed
yourturn
end
to x
pu
setpc [51 255 51]
setpensize [2 3]
pu
fd 5
pd
rt 30
fd 35
bk 70
fd 35
lt 60
fd 35
bk 70
end
to yourturn
make "selection -1
mouseon [mousepressed] [] [] [] []
while [:selection < 0] [wait 1]
mouseoff
place :selection
end
Make "selection -1Ein Screenshot vom spielfeld
habe mir berlegt das wenn ich auf das x drücke der das x auswählt jedoch kriege ich dasn achher nicht gebacken das so zu programmieren wegen den mauklicks der kommt i wie durcheinander
fals jemand ne idee hat wie der sonst zwischen dem x und dem kreis wechseln kann ohne diese auswahl bitte vorschlagen
achja das spielfeld ist so aufgebaut
das jeder kasten nen buchtsaben hat
der kasten ganz unten links ist mit dem befehl a und ab verbunden a macht nur einen kreis ab macht ein x
hoffe es ist klar geworden wie ich das aufgebaut habe einfach richtig simple
und ich hoffe auf ne menge antworten , danke!
