Computer Science Canada

pic.scale

Author:  msimard8 [ Mon Dec 13, 2004 10:43 am ]
Post subject:  pic.scale

how do i make this guy smaller uising pic.scale

sorry the same program is posted twice..

Author:  Neo [ Mon Dec 13, 2004 10:53 am ]
Post subject: 

code:
var pic := Pic.FileNew ("turing1.bmp")
var newWidth := Pic.Width (pic)
var newHeight := Pic.Height (pic)
var newPic := Pic.Scale (pic, newWidth div 2, newHeight div 2)
Pic.Draw (newPic, 0, 0, picCopy)


This is scalled down to half its original size. If you want it smaller divide newWidth and newHeight by a bigger number.


: