home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1998 January (DVD) / VPR980100.ISO / OLS / WIN32 / KAKIMAC / KAKIMAC2.LZH / MES_XYC.MAC < prev    next >
Text File  |  1994-06-24  |  1KB  |  34 lines
  1. //【マクロ名】 mess_xyc.mac by 水銀水(Suigwinsui) / 小田 明夫 (HGD01603) 
  2. //【主な用途】秀丸マクロ作成支援
  3. //【使用対象】秀丸 for Windows 上でマクロ作成する全てのみなさま。
  4. //【機能概略】カーソルのある位置の（ｘ，ｙ）とカーソル上のコードや指定範囲を表示する
  5. //                (1)非選択時：カーソル上の文字コードと位置
  6. //                (2)選択時：選択範囲の範囲情報＋カーソル上の文字コードと位置
  7. //【使用法】  (1)非選択時：調べたい文字にカーソルを移動して mess_xyc.mac を実行する。
  8. //          (2)選択時：調べたい範囲を選択しておいて mess_xyc.mac を実行する。
  9. if (!selecting)
  10. {
  11.     message "●カーソル位置の情報\n"+
  12.         "  ( x , y )   =  ( "+str(x)+" , "+str(y)+" )\n\n"+
  13.         "( 行 , 桁 ) =  ( "+str(y+1)+" , "+str(x+1)+" )\n"+
  14.         "(y+1 , x+1)\n\n"+
  15.         "● code number="+str(code);
  16. }else{
  17. #tlx=seltopx;        //tlx:Top_Line_X
  18. #tly=seltopy;        //tly:Top_Line_Y
  19. #elx=selendx;        //elx:End_Line_X
  20. #ely=selendy;        //elx:End_Line_X
  21. message "●選択範囲情報\n"+
  22.     "              (  x ,  y  )    (行 , 桁 )\n"+
  23.     "top point: ( "+str(#tlx  )+" , "+str(#tly  )+" )"+
  24.       "   ( "+str(#tly+1)+" , "+str(#tlx+1)+" )\n"+
  25.         "end point: ( "+str(#elx  )+" , "+str(#ely  )+" )"+
  26.         "   ( "+str(#ely+1)+" , "+str(#elx+1)+" )\n\n"+
  27.        "●カーソル位置の情報\n"+
  28.     " ( x , y )  =  ( "+str(x)+" , "+str(y)+" )\n\n"+
  29.     "( 行 , 桁 ) =  ( "+str(y+1)+" , "+str(x+1)+" )\n"+
  30.     "(y+1 , x+1)\n\n"+
  31.     "● code number="+str(code);
  32. }
  33. endmacro;
  34.