Umm what

[Pyrokid]

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

alright i edited it abit cause some of the other stuff doesnt affect my problem.
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