IDL编程学习之图片文件读写大全

15195775117

掌握了读写图片文件的方法，也就走进了PS高阶的大门！
------读------
IDL> fig=image('C:\Users\Administrator\Desktop\1.png')

或，
IDL> fig=read_png('C:\Users\Administrator\Desktop\1.png')
IDL> help,fig
FIG             BYTE      = Array[4, 1280, 715]
IDL> image(fig);显示图
.PNG图居然有4层！不知道除了红绿蓝通道还多出了什么？亮度？
或者，
IDL> read_png,'C:\Users\Administrator\Desktop\1.png',fig
% Compiled module: READ_PNG.
IDL> help,fig
FIG             BYTE      = Array[4, 1280, 715]
IDL> read_jpeg,'C:\Users\Administrator\Desktop\1.jpg',fig
IDL> help,fig
FIG             BYTE      = Array[3, 1280, 715]
3是红绿蓝三个通道，1280和715是横竖像素数。
显示读取的数组：
IDL> image(fig)
如果使用IDL> tv,fig,true=1则在直接图形法的窗口中显示一部分图，十分不便！
------写------
IDL> write_image,'C:\Users\Administrator\Desktop\2.png','png',fig
IDL> write_image,'C:\Users\Administrator\Desktop\2.png','png',randomu(s,50,50)*200
结果：

IDL> write_jpeg,'C:\Users\Administrator\Desktop\2.jpg',randomu(s,1000,1000)*200

IDL> write_png,'C:\Users\Administrator\Desktop\2.png',randomu(s,100,100)*200

IDL> write_png,'C:\Users\Administrator\Desktop\3.png',randomu(s,3,100,100)*200

15195775117

read_png,'C:\Users\Administrator\Desktop\xymap\111.png',ima
help,ima
fig=plot(ima[3,*,*],linestyle=6,sym=24,color='r')

控制台输出：
IMA             BYTE      = Array[4, 625, 696]

可见，第四层alpha层都是255，表示全不透明