²¼¤Ë¤¢¤ë ¥×¥í¥°¥é¥à¡¡¤Ç glay scale ²èÁü¤¬ÆÀ¤é¤ì¤Þ¤¹¡£
¤È¤³¤í¤Ç¡¢¥×¥í¥°¥é¥àÃæ¤Ç¡¤ò¢¤ËÊѹ¹¤¹¤ì¤Ð¡¢glay scale ¤Î
ȿž²èÁü¤¬ÆÀ¤é¤ì¤ë¤È´üÂÔ¤¹¤ë¤Î¤Ç¤¹¤¬¡¢¡¤Ç¤â¢¤Ç¤âƱ¤¸¤è¤¦¤Ë
¥Ý¥¸²èÁü¤·¤«ÆÀ¤é¤ì¤Þ¤»¤ó¡£¥Ý¥¸¥Í¥¬È¿Å¾¤·¤Þ¤»¤ó¡£palette Æâ
¤Ç¤Ïȿž¤·¤Æ¤¤¤ë¤Î¤Ç¤¹¤¬¡£
¤³¤ì¤Ï¤É¤¦¤·¤Æ¤Ê¤Î¤Ç¤·¤ç¤¦¤«¡£
¤´»ØƳ¤Î¤Û¤É¤è¤í¤·¤¯¤ª´ê¤¤¤¤¤¿¤·¤Þ¤¹¡£
#module
#deffunc glaypal int p1
screen p1,,,1
repeat 256 : palette cnt,cnt,cnt,cnt : loop ; ¡
// repeat 256 : palette cnt,255-cnt,255-cnt,255-cnt : loop ; ¢
palette ,,,,1
return
#global
glaypal 0
dialog "bmp;*.jpg", 16, "BMP or JPEG"
if stat == 0 : end
picload refstr
stop