-----------------------------------

msimard8

Mon Dec 13, 2004 10:43 am


pic.scale

-----------------------------------

how do i make this guy smaller uising pic.scale

sorry the same program is posted twice..


-----------------------------------

Neo

Mon Dec 13, 2004 10:53 am



-----------------------------------

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.