Source Insight3 中文顯示修正及鍵盤困擾

本文格式為Word版，下載可任意編輯——SourceInsight3中文顯示修正及鍵盤困擾

SourceInsight3中文顯示修正及鍵盤困擾

stop;

}

num=1;//delonechar

if(ipos0){

//processChinesecharacter

i=ipos;

count=0;

while(AsciiFromChar(text[i-1])=160){

i=i-1;

count=count+1;

if(i==0)

break;

}

if(count0){

//Ithinkitmightbeatwo-bytecharacter

num=2;

//Thisidiotdoesnotsupportmodandbitwiseoperators

if(((count/2*2!=count)||count==0)(iposlen-1))

ipos=ipos+1;//adjustcursorposition

}

//keepingsafe

if(ipos-num0)

num=ipos;

}

else{

i=ipos;

count=0;

while(AsciiFromChar(text)=160){

i=i+1;

count=count+1;

if(i==len-1)

break;

}

if(count0){

num=2;

}

}

text=cat(strmid(text,0,ipos),strmid(text,ipos+num,len));

DelBufLine(hbuf,ln);

InsBufLine(hbuf,ln,text);

SetBufIns(hbuf,ln,ipos);

stop;

}

/*======================================================================

3、左移鍵——SuperCursorLeft.em

======================================================================*/

macroIsComplexCharacter()

{

hwnd=GetCurrentWnd();

hbuf=GetCurrentBuf();

if(hbuf==0)

return0;

//當前位置

pos=GetWndSelIchFirst(hwnd);

//當前行數(shù)

ln=GetBufLnCur(hbuf);

//得到當前行

text=GetBufLine(hbuf,ln);

//得到當前行長度

len=strlen(text);

//從頭計算漢字字符的個數(shù)

if(pos0)

{

i=pos;

count=0;

while(AsciiFromChar(text[i-1])=160)

{

i=i-1;

count=count+1;

if(i==0)

break;

}

if((count/2)*2==count||count==0)

return0;

else

return1;

}

return0;

}

macromoveleft()

{

hwnd=GetCurrentWnd();

hbuf=GetCurrentBuf();

if(hbuf==0)

stop;//emptybuffer

ln=GetBufLnCur(hbuf);

ipos=GetWndSelIchFirst(hwnd);

if(GetBufSelText(hbuf)!=||(ipos==0ln==0))//第0行或者是選中文字,則不移動

{

SetBufIns(hbuf,ln,ipos);

stop;

}

if(ipos==0)

{

preLine=GetBufLine(hbuf,ln-1);

SetBufIns(hBuf,ln-1,strlen(preLine)-1);

}

else

{

SetBufIns(hBuf,ln,ipos-1);

}

}

macroSuperCursorLeft()

{

moveleft();

if(IsComplexCharacter())

moveleft();

}

/*======================================================================

4、右移鍵——SuperCursorRight.em

======================================================================*/

macromoveRight()

{

hwnd=GetCurrentWnd();

hbuf=GetCurrentBuf();

if(hbuf==0)

stop;//emptybuffer

ln=GetBufLnCur(hbuf);

ipos=GetWndSelIchFirst(hwnd);

totalLn=GetBufLineCount(hbuf);

text=GetBu

fLine(hbuf,ln);

if(GetBufSelText(hbuf)!=)//選中文字

{

ipos=GetWndSelIchLim(hwnd);

ln=GetWndSelLnLast(hwnd);

SetBufIns(hb

SourceInsight3中文顯示修正及鍵盤困擾

uf,ln,ipos);

stop;

}

if(ipos==strlen(text)-1ln==totalLn-1)//末行

stop;

if(ipos==strlen(text))

{

SetBufIns(hBuf,ln+1,0);

}

else

{

SetBufIns(hBuf,ln,ipos+1);

}

}

macroSuperCursorRight()

{

moveRight();

if(IsComplexCharacter())//definedinSuperCursorLeft.em

moveRight();

}

/*======================================================================

5、shift+右移鍵——ShiftCursorRight.em

======================================================================*/

macroIsShiftRightComplexCharacter()

{

hwnd=GetCurrentWnd();

hbuf=GetCurrentBuf();

if(hbuf==0)

return0;

selRec=GetWndSel(hwnd);

pos=selRec.ichLim;

ln=selRec.lnLast;

text=GetBufLine(hbuf,ln);

len=strlen(text);

if(len==0||lenpos)

return1;

//Msg(@len@;@pos@;);

if(pos0)

{

i=pos;

count=0;

while(AsciiFromChar(text[i-1])=160)

{

i=i-1;

count=count+1;

if(i==0)

break;

}

if((count/2)*2==count||count==0)

return0;

else

return1;

}

return0;

}

macroshiftMoveRight()

{

hwnd=GetCurrentWnd();

hbuf=GetCurrentBuf();

if(hbuf==0)

stop;

ln=GetBufLnCur(hbuf);

ipos=GetWndSelIchFirst(hwnd);

totalLn=GetBufLineCount(hbuf);

text=GetBufLine(hbuf,ln);

selRec=GetWndSel(hwnd);

curLen=GetBufLineLength(hbuf,selRec.lnLast);

if(selRec.ichLim==curLen+1||curLen==0)

{

if(selRec.lnLast==totalLn-1)

stop;

selRec.lnLast=selRec.lnLast+1;

selRec.ichLim=1;

SetWndSel(hwnd,selRec);

if(IsShiftRightComplexCharacter())

shiftMoveRight();

stop;

}

selRec.ichLim=selRec.ichLim+1;

SetWndSel(hwnd,selRec);

}

macroSuperShiftCursorRight()

{

if(IsComplexCharacter())

SuperCursorRight();

shiftMoveRight();

if(IsShiftRightComplexCharacter())

shiftMoveRight();

}

/*======================================================================

6、shift+左移鍵——ShiftCursorLeft.em

======================================================================*/

macroIsShiftLeftComplexCharacter()

{

hwnd=GetCurrentWnd();

hbuf=GetCurrentBuf();

if(hbuf==0)

return0;

selRec=GetWndSel(hwnd);

pos=selRec.ichFirst;

ln=selRec.lnFirst;

text=GetBufLine(hbuf,ln);

len=strlen(text);

if(len==0||lenpos)

return1;

//Msg(@len@;@pos@;);

if(pos0)

{

i=pos;

count=0;

while(AsciiFromChar(text[i-1])=160)

{

i=i-1;

count=count+1;

if(i==0)

break;

}

if((count/2)*2==count||count==0)

return0;

else

return1;

}

return0;

}

macroshiftMoveLeft()

{

hwnd=GetCurrentWnd();

hbuf=GetCurrentBuf();

if(hbuf==0)

stop;

ln=GetBufLnCur(hbuf);

ipos=GetWndSelIchFirst(hwnd)

;

totalLn=GetBufLineCount(hbuf);

text=GetBufLine(hbuf,ln);

selRec=GetWndSel(hwnd);

//curLen=GetBufLineLength(hbuf,selRec.lnFir

SourceInsight3中文顯示修正及鍵盤困擾

st);

//Msg(@curLen@;@selRec@);

if(selRec.ichFirst==0)

{

if(selRec.lnFirst==0)

stop;

selRec.lnFirst=selRec.lnFirst-1;

selRec.ichFirst=GetBufLineLength(hbuf,selRec.lnFirst)-1;

SetWndSel(hwnd,selRec);

if(I