|
IMGLIB.AB1
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＧｅｔＰａｔ（ ）
語 法：
GetPat( <nXPos>, <nYPos>, <nWidth>,;
<nHeight>, [<nColorFlag>] ) --> cGraphPat
目 地：
在一區域內讀取點陣圖形資料，並傳回。
參 數：~L12;
<nXPos> 欲讀取點陣圖形的左上角Ｘ座標位置。
<nYPos> 欲讀取點陣圖形的左上角Ｙ座標位置。
<nWidth> 欲讀取點陣圖形的寬。
<nHeight> 欲讀取點陣圖形的高。
<nColorFlag>若傳給０表示讀取單色面圖形，１爲欲讀取
四色面圖形（彩色），若不指定則系統預設值爲０。~L8;
┌───────────────────────┐
│備注：於彩色狀態抓取單色面的圖形（如字形）， │
│ 請將<nColorFlag>設爲０，抓取四色面圖 │
│ 形則將<nColorFlag>設爲１。 │
└───────────────────────┘~L12;
傳回值：
一字串,點陣圖形資料
（Byte 1-2 爲寬,Byte 3-4 爲高,其後爲圖形資料）
呼 叫：
ＩＮＴ：１０，ＡＨ：８９，ＡＬ：ＸＸ。
範 例：
nFlag=IIF(ISCOLOR(),1,0)
cBuf=GetPat(100,100,24,24,nFlag)
? '圖形寬爲',_GetInt(cBuf,1)
? '圖形高爲',_GetInt(cBuf,3)
PutPat(200,100,cBuf,3,nFlag)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＰｒｎＰｕｔ（ ）
語 法：
PrnPut( <cPutFile>, [<nPrnPosX>], [<nPrnMode>],;
[<nPrnPort>] ) --> nSucess
目 地：
從圖形檔中讀取圖形資料後,從印表機列印
出在指定的位置。
參 數：
<cPutFile> 欲印出的圖形檔名。(.PUT)
<nPrnPosX> 欲印出圖形的印表機水平座標位置。
（預設值爲０)
<nPrnMode> 印圖模式。（預設值爲５)
０：九針單密度（每寸６０點）。
１：九針雙密度（每寸１２０點）。
２：九針雙密度雙倍速度（每寸１２０點）。
３：九針四密度雙倍速度（每寸２４０點）。
４：九針ＣＲＴ圖像Ⅰ（每寸８０點）。
６：九針ＣＲＴ圖像Ⅱ（每寸９０點）。
３２：二十四針單密度（每寸６０點）。
３３：二十四針雙倍密度（每寸１２０點）。
３８：二十四針ＣＲＣ圖形Ⅲ（每寸９０點）。
３９：二十四針三倍密度（每寸１８０點）。
４０：二十四針六倍密度（每寸３６０點）。
<nPrnPort> 欲輸出的印表機輸出埠。
０：ＬＰＴ１,１：ＬＰＴ２,２：ＬＰＴ３,．．
第四章 函數說明 Ｊ．影像函數館
~Q13@500,640T48W1Z1J2L30X6
傳回值：
一數值,傳回處理結果。
０： 表成功 , 其他： 表失敗。
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
PrnPut('DEMO.PUT',10,5,0)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＰｕｔＰａｔ（ ）
語 法：
PutPat( <nDotPosX>, <nDotPosY>, <cGraphPatt>,;
<nMethod>, [<nColorFlag>] ) --> NIL
目 地：
將點陣資料畫在指定的位置。
參 數：
<nDotPosX> 欲畫點陣圖形的左上角Ｘ座標位置。
<nDotPosY> 欲畫點陣圖形的左上角Ｙ座標位置。
<cGraphPatt>點陣圖形的緩沖記憶體（Buffer）。
<nMethod> 繪圖方式。
0: XOR 1 :OR 2:AND
3: PSET 4:PRESET(先將圖樣作NOT運算,再寫入)
<nColorFlag>若傳給０表示畫出單色面圖形，１爲欲
畫出四色面圖形（彩色），若不指定則
系統預設值爲０。
┌───────────────────────┐
│ 備注：於彩色狀態畫出單色面的圖形（如字形）， │
│ 請將<nColorFlag>設爲０，畫出四色面圖形 │
│ 則將<nColorFlag>設爲１。 │
└───────────────────────┘
第四章 函數說明 Ｊ．影像函數館
~Q13@500,640T48W1Z1J2L30X6
傳回值：
ＮＩＬ。
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ａ，ＡＬ：ＸＸ。
範 例：
nFlag=IIF(ISCOLOR(),1,0)
cBuf=GetPat(100,100,24,24,nFlag)
PutPat(200,100,cBuf,3,nFlag)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＲｅａｄＰｕｔ（ ）
語 法：
ReadPut( <cPutFile> ) --> cGraphBuf
目 地：
從圖形檔中讀取圖形資料後傳回。
參 數：
<cPutFile> 圖形檔名(.PUT)。
(目前僅提供讀取.PUT型態的圖形)。
傳回值：
點陣圖形資料,若傳回空字串表示有誤。
（Byte 1-2 爲寬,Byte 3-4 爲高,其後爲圖形資料）
呼 叫：
ＩＮＴ：ＸＸ，ＡＨ：ＸＸ，ＡＬ：ＸＸ。
範 例：
cBuf=ReadPut('C:\TXT\DEMO.PUT')
IF LEN(cBUF) != 0
PutPat(100,100,cBuf,3)
ENDIF
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＲｅｖＰａｔ（ ）
語 法：
RevPat( <cGraphPatt> ) --> cNewPatt
目 地：
將點陣圖形的色彩反相（倚天目前僅提供處理單色點陣
圖形）。
參 數：
<cGraphPatt>欲處理的點陣圖形資料。
傳回值：
一字串，內含色彩反相處理後的點陣圖形資料。
（Byte 1-2 爲寬,Byte 3-4 爲高,其後爲圖形資料）
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
cBuf=GetPat(100,100,24,24)
PutPat(200,100,EtRevPat(cBuf),3)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＲｏｔＰａｔ（ ）
語 法：
RotPat(<cGraphPatt>,<nRotAngle>) --> cNewPatt
目 地：
將點陣圖形作旋轉處理（倚天目前僅提供處理單色點陣
圖形）。
參 數：
<cGraphPatt>欲處理的點陣圖形資料。
<nRotAngle> 欲旋轉角度 (90,180,270,360度)。
傳回值：
一字串，內含旋轉處理後的點陣圖形資料。
（Byte 1-2 爲寬,Byte 3-4 爲高,其後爲圖形資料）
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
cBuf=GetPat(100,100,24,24)
cBuf=RotPat(cBuf,270)
PutPat(300,100,cBuf,3)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＳｅｎｄＰｕｔ（ ）
語 法：
SendPut( <cPutBuff>, [<nX>], [<nMode>],;
[<nPrnPort>] ) --> nSucess
目 地：
讀取圖形資料後,從印表機列印出在指定的位置。
參 數：
<cPutFile> 欲印出的圖形緩沖區
<nPrnPosX> 欲印出圖形的印表機水平座標位置。
（預設值爲０)
<nPrnMode> 印圖模式。（預設值爲５)
０：九針單密度（每寸６０點）。
１：九針雙密度（每寸１２０點）。
２：九針雙密度雙倍速度（每寸１２０點）。
３：九針四密度雙倍速度（每寸２４０點）。
４：九針ＣＲＴ圖像Ⅰ（每寸８０點）。
６：九針ＣＲＴ圖像Ⅱ（每寸９０點）。
３２：二十四針單密度（每寸６０點）。
３３：二十四針雙倍密度（每寸１２０點）。
３８：二十四針ＣＲＣ圖形Ⅲ（每寸９０點）。
３９：二十四針三倍密度（每寸１８０點）。
４０：二十四針六倍密度（每寸３６０點）。
<nPrnPort> 欲輸出的印表機輸出埠。
０：ＬＰＴ１,１：ＬＰＴ２,２：ＬＰＴ３,．．
第四章 函數說明 Ｊ．影像函數館
~Q13@500,640T48W1Z1J2L30X6
傳回值：
一數值,傳回處理結果。
０： 表成功 , 其他： 表失敗。
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
cBUF := ReadPut('demo.put')
SendPut(cBUF,25,0,0)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＳｈｏｗＰｕｔ（ ）
語 法：
ShowPut( <cPutFile>, <nDotPosX>, <nDotPosY>,;
<nMethod> , <nColorFlag> ) --> lSucess
目 地：
從圖形檔中讀取圖形資料後畫在指定的位置。
參 數：
<cPutFile> 欲畫出的圖形檔名。(.PUT)
<nDotPosX> 欲畫出圖形的左上角Ｘ座標位置。
<nDotPosY> 欲畫出圖形的左上角Ｙ座標位置。
<nMethod> 繪圖方式。
0: XOR 1 :OR 2:AND
3: PSET 4:PRESET(先將圖樣作NOT運算,再寫入)
<nColorFlag>若傳給０表示畫出單色面圖形，１爲欲
畫出四色面圖形（彩色），若不指定則
系統預設值爲０。
┌───────────────────────┐
│ 備注：於彩色狀態畫出單色面的圖形（如字形）， │
│ 請將<nColorFlag>設爲０，畫出四色面圖形 │
│ 則將<nColorFlag>設爲１。 │
└───────────────────────┘
第四章 函數說明 Ｊ．影像函數館
~Q13@500,640T48W1Z1J2L30X6
傳回值：
一邏輯值,傳回處理結果。
．Ｔ． 表成功 , ．Ｆ． 表失敗。
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
cBuf=GetPat(100,100,24,24)
cBuf=TranPat(cBuf,48,24)
PutPat(300,100,cBuf,3)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
ＴｒａｎＰａｔ（ ）
語 法：
TranPat( <cGraphPatt>, <nWidth>,;
<nHeight> ) --> cNewPatt
目 地：
將點陣資料局部放大縮小（倚天目前僅提供處理單色點
陣圖形）。
參 數：
<cGraphPatt>欲處理的點陣圖形資料。
<nWidth> 欲處理後的點陣圖形的寬度。
<nHeight> 欲處理後的點陣圖形的高度。
傳回值：
一字串，傳回處理局部放大縮小後的點陣圖形資料。
（Byte 1-2 爲寬,Byte 3-4 爲高,其後爲圖形資料）
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
cBuf=GetPat(100,100,24,24)
cBuf=TranPat(cBuf,48,24)
PutPat(300,100,cBuf,3)
程式庫：
IMGLIB.LIB,LWFUN.LIB
第四章 函數說明 Ｊ．影像函數館
~Q0W2Z2@600,600B1200,120W1Z1
~Q13@500,640T48W1Z1J2L30X6
Ｕｐ?Ｄｏｗｎ?Ｐａｔ（ ）
語 法：
Up_Down_Pat( <cGraphPatt> ) --> cNewPatt
目 地：
將圖樣作上下顛倒變化（倚天目前僅提供處理單色點陣
圖形）。
參 數：
<cGraphPatt>：欲處理的點陣圖形資料。
傳回值：
一字串，圖樣作上下顛倒變化處理後的點陣圖形資料。
（Byte 1-2 爲寬,Byte 3-4 爲高,其後爲圖形資料）
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
cBuf=GetPat(100,100,24,24)
cBuf=Up_Down_Pat(cBuf)
PutPat(300,100,cBuf,3)
程式庫：
IMGLIB.LIB,LWFUN.LIB
ＷｒｉｔｅＰｕｔ（ ）
語 法：
WritePut( <cFilename>, <cSouBuf> ) --> nSucess
目 地：
將圖形資料寫成(.PUT)圖形檔案。
參 數：
<cFilename> : 欲産生的圖形檔名。(.PUT)
（注意:若産生的圖形檔原存在將會被覆蓋掉）
<cSouBuf> : 點陣圖形緩沖區
（Byte 1-2 爲寬,Byte 3-4 爲高,其後爲圖形資料）
傳回值：
一數值,傳回處理結果。
０： 表成功 , 其他： 表失敗。
呼 叫：
ＩＮＴ：１０，ＡＨ：８Ｂ，ＡＬ：ＸＸ。
範 例：
cBuf=GetPat(100,100,24,24)
WritePut('NEW.PUT',cBUF)
程式庫：
IMGLIB.LIB,LWFUN.LIB
|