## Re: [libertybasic] Printing in 6 columns

Expand Messages
• Here is one way: :-) horizontally for x=0 to 255 if count = 6 then print : count = 0 print x,chr\$(x); ; count = count + 1 next x -Carl ... [Non-text
Message 1 of 4 , Feb 19, 2013
Here is one way: :-)

'horizontally
for x=0 to 255
if count = 6 then print : count = 0
print x,chr\$(x);" ";
count = count + 1
next x

-Carl

On Tuesday, February 19, 2013, henriknilson wrote:

> The following code is for all ASCII codes, printed either vertically or
> horizontally, what I am asking for is to print them in 6 "more or less"
> columns in the mainwin.
> Many thanks for any help.
>
> 'Vertically
>
> for x=0 to 255
> print x,chr\$(x)
> next
>
> 'horizontally
>
> for x=0 to 255
> print x,chr\$(x);" ";
> next
>
>
>
>
> ------------------------------------
>
>
>
>
>

[Non-text portions of this message have been removed]
• If you want to do it in 8 columns it is neater to do like this: for x = 0 to 248 step 8 for y = 0 to 7 print x+y; , ; chr\$(x+y); ; next y print next x
Message 2 of 4 , Feb 19, 2013
If you want to do it in 8 columns it is neater to do like this:

for x = 0 to 248 step 8
for y = 0 to 7
print x+y; ","; chr\$(x+y); " ";
next y
print
next x

-Carl Gundel
Liberty BASIC for Windows - http://www.libertybasic.com
Run BASIC, easy web programming - http://www.runbasic.com

On Feb 19, 2013, at 11:01 PM, Carl Gundel <carlg@...> wrote:

> Here is one way: :-)
>
> 'horizontally
> for x=0 to 255
> if count = 6 then print : count = 0
> print x,chr\$(x);" ";
> count = count + 1
> next x
>
> -Carl
>
> On Tuesday, February 19, 2013, henriknilson wrote:
>
>> The following code is for all ASCII codes, printed either vertically or
>> horizontally, what I am asking for is to print them in 6 "more or less"
>> columns in the mainwin.
>> Many thanks for any help.
>>
>> 'Vertically
>>
>> for x=0 to 255
>> print x,chr\$(x)
>> next
>>
>> 'horizontally
>>
>> for x=0 to 255
>> print x,chr\$(x);" ";
>> next
>>
>>
>>
>>
>> ------------------------------------
>>
>
>
> [Non-text portions of this message have been removed]
>
>
>
> ------------------------------------
>
>
>
>
• Thank you so much Carl. ________________________________ From: Carl Gundel To: libertybasic@yahoogroups.com
Message 3 of 4 , Feb 20, 2013
Thank you so much Carl.

________________________________
From: Carl Gundel <carlg@...>
To: "libertybasic@yahoogroups.com" <libertybasic@yahoogroups.com>
Sent: Wednesday, February 20, 2013 5:08 AM
Subject: Re: [libertybasic] Printing in 6 columns

If you want to do it in 8 columns it is neater to do like this:

for x = 0 to 248 step 8
for y = 0 to 7
print x+y; ","; chr\$(x+y); " ";
next y
print
next x

-Carl Gundel
Liberty BASIC for Windows - http://www.libertybasic.com
Run BASIC, easy web programming - http://www.runbasic.com

On Feb 19, 2013, at 11:01 PM, Carl Gundel carlg@...> wrote:

> Here is one way: :-)
>
> 'horizontally
> for x=0 to 255
> if count = 6 then print : count = 0
> print x,chr\$(x);" ";
> count = count + 1
> next x
>
> -Carl
>
> On Tuesday, February 19, 2013, henriknilson wrote:
>
>> The following code is for all ASCII codes, printed either vertically or
>> horizontally, what I am asking for is to print them in 6 "more or less"
>> columns in the mainwin.
>> Many thanks for any help.
>>
>> 'Vertically
>>
>> for x=0 to 255
>> print x,chr\$(x)
>> next
>>
>> 'horizontally
>>
>> for x=0 to 255
>> print x,chr\$(x);" ";
>> next
>>
>>
>>
>>
>> ------------------------------------
>>
>
>
> [Non-text portions of this message have been removed]
>
>
>
> ------------------------------------
>