Welcome, Guest. Please login or register.

Author Topic: AmigaBasic revisited  (Read 5032 times)

Description:

0 Members and 1 Guest are viewing this topic.

Offline melottTopic starter

  • Hero Member
  • *****
  • Join Date: Dec 2002
  • Posts: 989
    • Show all replies
AmigaBasic revisited
« on: February 18, 2003, 02:08:40 PM »
So....

For x=0 to 255
Print chr$(x) ;
Gosub LineLen
Next x
end

LineLen:
for y=1 to 25
If y<25 then Return
If y=25 then Print chr$(13)
next y

What I'm tring to do is print 25 characters
per line then a carrage return and start another
line until X reaches 255.

This doesn't work .
Anyone????
And how do I do a carrage return without
doing a Print chr$(13) ?

Mel Ott
 :-?
Stealth ONE  8-)
 

Offline melottTopic starter

  • Hero Member
  • *****
  • Join Date: Dec 2002
  • Posts: 989
    • Show all replies
Re: AmigaBasic revisited
« Reply #1 on: February 19, 2003, 02:12:24 AM »
Thanks guys....
 I guess I just needed a little push in a different
 direction. This works...........

 Y=0
FOR X=0 to 255
PRINT CHR$(X) ;
Y=Y+1
IF Y=25 THEN PTINT CHR$(10) : Y=0
NEXT X

Mel Ott
 :-D
Stealth ONE  8-)
 

Offline melottTopic starter

  • Hero Member
  • *****
  • Join Date: Dec 2002
  • Posts: 989
    • Show all replies
Re: AmigaBasic revisited
« Reply #2 on: February 20, 2003, 03:42:49 PM »
Thanks ...
 
 I posted, up a reply or two, that I got it
 worked out. Yes the "LINELEN" thing wasn't
 the way to go. I'm a beginner and it takes
 time to learn.
 Yes I know that the first 32 or so characters
 don't print. It was only a test example to
 work out the code. What I was looking for
 is to get a specific number of chrs. reguardless
 what they are to print on a line then goto
 the next line.
 
 Mel Ott
   
Stealth ONE  8-)