Home » Archimedes archive » Archimedes World » AW-1995-04-Disc1.adf » Disk1Apr95 » !AWApr95/Goodies/Draw/!DrawBasic/Info/Commands/Transforms

!AWApr95/Goodies/Draw/!DrawBasic/Info/Commands/Transforms

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1995-04-Disc1.adf » Disk1Apr95
Filename: !AWApr95/Goodies/Draw/!DrawBasic/Info/Commands/Transforms
Read OK:
File size: 0407 bytes
Load address: 0000
Exec address: 0000
File contents
Resources.Transforms :                   
====================

 Transforms are discussed in Chapter 6 of the DrawBasic book. Pages 55-60
  
----------------------------------------------------------------------------- 
  � TRANFORMS  
  -----------
               
 �Transform(path,A(),b())             �Transform(path,A(),b())                  
 �Translate(path,dx,dy)               �Translate(path,dx,dy) 
 �Magnify(path,a,b,factor)            �Magnify(path,a,b,factor)    
 �Rotate(path,a,b,angle)              �Rotate(path,a,b,angle)

 �TransformPath(path,A(),b())              
 �TransformText(path,A(),b())    
 �Tile(path,rows%,columns%)
              
 �Copy(path%)                             
 �CopyPath(path%)                         
 �CopyText(path%)                         
 �CreateTransform(A(),b())                
 �TransformStore                 
                  
 �Draw_Bound                              
 �Draw_BoundingBox(path,RETURN dx%,RETURN dy%)                
                 
                    
00000000  52 65 73 6f 75 72 63 65  73 2e 54 72 61 6e 73 66  |Resources.Transf|
00000010  6f 72 6d 73 20 3a 20 20  20 20 20 20 20 20 20 20  |orms :          |
00000020  20 20 20 20 20 20 20 20  20 0a 3d 3d 3d 3d 3d 3d  |         .======|
00000030  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 0a 0a  |==============..|
00000040  20 54 72 61 6e 73 66 6f  72 6d 73 20 61 72 65 20  | Transforms are |
00000050  64 69 73 63 75 73 73 65  64 20 69 6e 20 43 68 61  |discussed in Cha|
00000060  70 74 65 72 20 36 20 6f  66 20 74 68 65 20 44 72  |pter 6 of the Dr|
00000070  61 77 42 61 73 69 63 20  62 6f 6f 6b 2e 20 50 61  |awBasic book. Pa|
00000080  67 65 73 20 35 35 2d 36  30 0a 20 20 0a 2d 2d 2d  |ges 55-60.  .---|
00000090  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000000d0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 20 0a 20 20 8f 20  |---------- .  . |
000000e0  54 52 41 4e 46 4f 52 4d  53 20 20 0a 20 20 2d 2d  |TRANFORMS  .  --|
000000f0  2d 2d 2d 2d 2d 2d 2d 2d  2d 0a 20 20 20 20 20 20  |---------.      |
00000100  20 20 20 20 20 20 20 20  20 0a 20 b7 54 72 61 6e  |         . .Tran|
00000110  73 66 6f 72 6d 28 70 61  74 68 2c 41 28 29 2c 62  |sform(path,A(),b|
00000120  28 29 29 20 20 20 20 20  20 20 20 20 20 20 20 20  |())             |
00000130  bb 54 72 61 6e 73 66 6f  72 6d 28 70 61 74 68 2c  |.Transform(path,|
00000140  41 28 29 2c 62 28 29 29  20 20 20 20 20 20 20 20  |A(),b())        |
00000150  20 20 20 20 20 20 20 20  20 20 0a 20 b7 54 72 61  |          . .Tra|
00000160  6e 73 6c 61 74 65 28 70  61 74 68 2c 64 78 2c 64  |nslate(path,dx,d|
00000170  79 29 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |y)              |
00000180  20 bb 54 72 61 6e 73 6c  61 74 65 28 70 61 74 68  | .Translate(path|
00000190  2c 64 78 2c 64 79 29 20  0a 20 b7 4d 61 67 6e 69  |,dx,dy) . .Magni|
000001a0  66 79 28 70 61 74 68 2c  61 2c 62 2c 66 61 63 74  |fy(path,a,b,fact|
000001b0  6f 72 29 20 20 20 20 20  20 20 20 20 20 20 20 bb  |or)            .|
000001c0  4d 61 67 6e 69 66 79 28  70 61 74 68 2c 61 2c 62  |Magnify(path,a,b|
000001d0  2c 66 61 63 74 6f 72 29  20 20 20 20 0a 20 b7 52  |,factor)    . .R|
000001e0  6f 74 61 74 65 28 70 61  74 68 2c 61 2c 62 2c 61  |otate(path,a,b,a|
000001f0  6e 67 6c 65 29 20 20 20  20 20 20 20 20 20 20 20  |ngle)           |
00000200  20 20 20 bb 52 6f 74 61  74 65 28 70 61 74 68 2c  |   .Rotate(path,|
00000210  61 2c 62 2c 61 6e 67 6c  65 29 0a 0a 20 b7 54 72  |a,b,angle).. .Tr|
00000220  61 6e 73 66 6f 72 6d 50  61 74 68 28 70 61 74 68  |ansformPath(path|
00000230  2c 41 28 29 2c 62 28 29  29 20 20 20 20 20 20 20  |,A(),b())       |
00000240  20 20 20 20 20 20 20 0a  20 b7 54 72 61 6e 73 66  |       . .Transf|
00000250  6f 72 6d 54 65 78 74 28  70 61 74 68 2c 41 28 29  |ormText(path,A()|
00000260  2c 62 28 29 29 20 20 20  20 0a 20 b7 54 69 6c 65  |,b())    . .Tile|
00000270  28 70 61 74 68 2c 72 6f  77 73 25 2c 63 6f 6c 75  |(path,rows%,colu|
00000280  6d 6e 73 25 29 0a 20 20  20 20 20 20 20 20 20 20  |mns%).          |
00000290  20 20 20 20 0a 20 bb 43  6f 70 79 28 70 61 74 68  |    . .Copy(path|
000002a0  25 29 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |%)              |
000002b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 0a  |               .|
000002c0  20 bb 43 6f 70 79 50 61  74 68 28 70 61 74 68 25  | .CopyPath(path%|
000002d0  29 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |)               |
000002e0  20 20 20 20 20 20 20 20  20 20 0a 20 bb 43 6f 70  |          . .Cop|
000002f0  79 54 65 78 74 28 70 61  74 68 25 29 20 20 20 20  |yText(path%)    |
00000300  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000310  20 20 20 20 20 0a 20 bb  43 72 65 61 74 65 54 72  |     . .CreateTr|
00000320  61 6e 73 66 6f 72 6d 28  41 28 29 2c 62 28 29 29  |ansform(A(),b())|
00000330  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000340  0a 20 bb 54 72 61 6e 73  66 6f 72 6d 53 74 6f 72  |. .TransformStor|
00000350  65 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |e               |
00000360  20 20 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |  .             |
00000370  20 20 20 20 20 0a 20 b7  44 72 61 77 5f 42 6f 75  |     . .Draw_Bou|
00000380  6e 64 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |nd              |
00000390  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003a0  0a 20 b7 44 72 61 77 5f  42 6f 75 6e 64 69 6e 67  |. .Draw_Bounding|
000003b0  42 6f 78 28 70 61 74 68  2c 52 45 54 55 52 4e 20  |Box(path,RETURN |
000003c0  64 78 25 2c 52 45 54 55  52 4e 20 64 79 25 29 20  |dx%,RETURN dy%) |
000003d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 0a  |               .|
000003e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003f0  20 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | .              |
00000400  20 20 20 20 20 20 0a                              |      .|
00000407