Code: Select all
0 x$="{home}{right*39}":y$="{down*24}"
10 x=10:y=7: rem x is across and y is down
20 print left$(x$,x)right$(y$,y)"hello";
Regards,
Shaun.
Code: Select all
0 x$="{home}{right*39}":y$="{down*24}"
10 x=10:y=7: rem x is across and y is down
20 print left$(x$,x)right$(y$,y)"hello";
Code: Select all
10 print "{clear}"
20 row = 5:col = 10:gosub 1000
30 print "hello"
40 row = 6:col = 10:gosub 1000
50 print "world"
60 end
1000 poke 780,0
1010 poke 781,row
1020 poke 782,col
1030 sys 65520
1040 return
Good idea! We can cry into our beer together...If I'm ever in the North East again, I'll nudge you and we'll have a pint and mull over some Commodore, eh?
I think you guys drink too much.ajordison wrote:You might be right. wrap it up in a timer and call it 1000 times.
Good idea! We can cry into our beer together...If I'm ever in the North East again, I'll nudge you and we'll have a pint and mull over some Commodore, eh?
Users browsing this forum: No registered users and 3 guests