10-11-2005, 06:45 AM
Code:
dim shared player$(52,52)
screen 18,32
dim shared comp$(20)
dim shared plyr$(20)
dim shared lftpile$(5)
dim shared rghtpile$(5)
type pile
x as integer
y as integer
cardname as string
end type
dim shared pile1 as pile
dim shared pile2 as pile
pile1.x=185
pile2.x=380
pile1.y=100
pile2.y=100
for i=1 to 20 'deals comp
comp$(i)=player$(1,i)
next
for i=21 to 40 'deals player
plyr$(i)=player$(1,i)
next
for i=41 to 45 'deals rightpile
rghtpile$(i)=player$(1,i)
next
for i= 46 to 50 'deals left
lftpile$(i)=player$(1,i)
next
print pile2.y
sleep
Well when i run this it freezes. However when i have the other shiz in there (theres an included file) it prints on 32 wich is not what i originally had in there
umm... help
his world has been connected...
Tied to the darkness.
Soon to be completely eclipsed.
There is so very much to learn...
You understand so little.
A meaningless effort.
One who knows nothing can understand nothing.
-Ansem Bringer of darkness and creator of the heartless
Tied to the darkness.
Soon to be completely eclipsed.
There is so very much to learn...
You understand so little.
A meaningless effort.
One who knows nothing can understand nothing.
-Ansem Bringer of darkness and creator of the heartless