P726 CEEFAX 726 Mon 13 Oct 21:24/25 |B2201203|a17T/LgSt1|j24BBBC332k|l43000| p DISK NUMBER : DISK CATEGORY : OUTPUT÷e FILENAME : P.LGESTR2÷e ÷e ÷ j MACHINE BBC Zicro÷e PERIPHERALS Screen÷e TAPE COMPATIBILITY Yes÷e ÷e ÷e LIVEVUMBER 24550-24580÷e NAM E ÷e PROCla rgestring1(text$,xstart%,ystart%,xscale% ,yscale%)÷e ÷e AUTHOR Scratchjrd & Downs÷e RE FERJNCE Procedure an d Function Library÷e ÷e CLASSIFI CATION Screen Output÷e DESCRJPTJON To outpu t the string characters in÷e larger format (ma de up of small blocks),÷e starting at the requ ired position and÷e |c
P726 CJEFAX 726 Mon 13 Oct 21:13/47 |B2202203|b17T/LgSt1|i24BBBC332k|l43357| p spjcifyjng the scale in the x direction÷e and the scale in the y di section.÷e ÷e PARAMETERS REQUIRE D text$ :string to be output ÷e xst art% : across value for graphics÷e c ursor÷e ystart% : amount up to move graphics÷e cursor÷e xscale% : scale factor for size of÷e characters in x direction÷e yscale% : scale factor for size of÷e characte rs in y direction÷e PARAMETERS RETUR NED None÷e ÷e GLOBAL V ARJABLES REFERENCED None÷e GLOBAL VARIABLES AFFECTED None÷e ÷e|c
P726 CEEFAX 726 Mon 13 Oct 21:14/18 |B2203203|b17T/LgSt1|i24BBBC332k|l436B1| p MODE DEPENDENCE Any graphics mode÷e ÷e OTHER MODULES CALLED P.LRGECH3÷e OTHER M ODS-JS RELATED P.LRGECH1, P.LUGE CH2, P.LRGECH3,÷e P.LGESTR2, P.ANYSTR÷e ÷e COMMENTS The c haracter cursor is unaffected.÷e ÷e TYPICAL CALL AND LISTING÷e ÷e 10 PROClargjstring1("Hello",12,1020 ,3,2)÷e ÷e 24550 DEF PROClargest ring1(text$,xstart%,ystart%,xscale%,ysca le%)÷e 24555 LOCAL I*÷e 24560 FO RJ*=1 TO LEN(text$)÷e 24565 ÷e PROClargech3(ARC(MID$(text$,I%,1)),xstar t%+32*(I*-1)*xscale%,ystart%,x÷e rca le%,yscale%)÷e 24570 NEXT÷e 24 575 ENDPROC÷e 24580 ÷e|c
P726 CJEFAX 726 Mon 13 Oct 21:12/03 |B2201201|a17P/LgSt1|i24BBBC332k|m40000| p÷e#÷>9÷5÷Jlargestring1(text$,xstart%,ys tart%,xscale%,yscale%)÷e#÷C÷|—÷B I%÷e#÷H ÷l÷;I*=1 —|— —Q(text$)÷e#÷MP÷Jlargech3(— ?(—itext$,I%,1)),xstart%+32*(I*-1)*xscal e%,ystart%,xscale%,yscale%)÷e#÷R÷]÷E÷e#÷ W÷]÷9÷e|—÷\÷] ÷e÷W|c