do i=0 to 15
call charout,substr(x2b(c2x('	��t�[�AV�cV��')),8*i+1,8)" "
end