Post - Forum - Plus/4 World



	Home Search Games Tapes Covers Cheats Maps Software New Stuff Hall Of Fame HVTC Game Endings Solutions Remakes Publications Magazines Effects Top List Members Groups Features Plus/4 Encyclopedia Hardware Tools Options Forum Home Search Games Tapes Covers Cheats Maps Software New Stuff Hall Of Fame HVTC Game Endings Solutions Remakes Publications Magazines Effects Top List Members Groups Features Plus/4 Encyclopedia Hardware Tools Options Forum	Login

Forum Help

Post Your Message

Previous Messages

Posted By

JamesC
on 2017-03-08
15:44:04

Re: PRINT USING / PUDEF

Not strictly by PRINT USING. Though string splicing might qualify as "automatic".

10 PAD$="----------":REM 10 -
20 SKU$(1)="ZYXWVUT" : SKP(1)=1000.00
30 SKU$(2)="SRQP" : SKP(2)=99.99
40 SKU$(3)="NMLKJ" : SKP(3)=500.00
50 PUDEF "*.,E"
60 FOR ITEM=1 TO 3
70 : L = LEN(SKU$(ITEM))
80 : PD$ = RIGHT$(PAD$,9-L)
90 : LINE$ = PD$+SKU$(ITEM)
100 PRINT USING"#########"; LINE$; : PRINT , , : PRINT USING "#$###,###.##"; SKP(ITEM)
110 NEXT ITEM

Posted By

SVS
on 2017-03-08
12:02:01

Re: PRINT USING / PUDEF

Yes James, but I was looking for an automatic way

Posted By

JamesC
on 2017-03-06
13:15:59

Re: PRINT USING / PUDEF

10 A$="ABCDEFGHIJ"
20 PRINT USING "############";A$ : REM 12 # LEFT JUSTIFIED
30 PRINT USING "=###########";A$ : REM 11 # = CENTERED
40 PRINT USING ">###########";A$ : REM 11 # > RIGHT JUSTIFIED

You need one # for every desired output character. If your A$ is 10 characters long, but your PRINT USING only allows for 6 characters, it will only output the first 6 characters.

If your A$ is shorter than the PRINT USING statement, and you desire a different lead character instead of Space (ie, *s), build A$ with *'s instead of Spaces. ;)

Posted By

SVS
on 2017-03-05
05:43:19

PRINT USING / PUDEF

It seems that the filling character of a PRINT USING mask, does work only with numeric data (for example "****123"). Does anybody know a way to make it working in text data too? (For example "****ABCD").