home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1996 February / VPR9602A.ISO / fwindows / archive / dtt250.lzh / DTTJUMP.MAC < prev    next >
Text File  |  1995-08-21  |  1KB  |  49 lines
  1. // セクションジャンプマクロ V1.10　for 秀丸エディタ(斉藤秀夫氏作)
  2. //
  3. // 　ポップアップしたメニューからジャンプ先のセクションを選択
  4. //
  5. // V1.01 escape 追加
  6. // V1.10 [Group?] title →[forMacro]
  7. //       正規表現中止
  8.  
  9. disablebreak ;
  10. #defMenu=7 ;
  11. if (basename!="dtt.ini") {
  12.     message "dtt.ini 編集専用マクロです" ;
  13.     endmacro ;
  14. }
  15.  
  16. $mnuStr[0]="ｱｲｺﾝﾗﾝﾁｬｰ" ;
  17. $mnuStr[1]="ﾒﾆｭｰ式ﾗﾝﾁｬｰ" ;
  18. $mnuStr[2]="ｼｮｰﾄｶｯﾄ式ﾗﾝﾁｬｰ" ;
  19. $mnuStr[3]="ﾃｷｽﾄｾｯﾄ" ;
  20. $mnuStr[4]="iniﾌｧｲﾙの変更" ;
  21. $mnuStr[5]="iniﾌｧｲﾙのｴﾝﾄﾘ削除" ;
  22. $mnuStr[6]="─────────" ;
  23.  
  24. $mnuCmd[0]="[IconLaunch]" ;
  25. $mnuCmd[1]="[Menu]" ;
  26. $mnuCmd[2]="[ShortCut]" ;
  27. $mnuCmd[3]="[TextSet0]" ;
  28. $mnuCmd[4]="[IniSelect0]" ;
  29. $mnuCmd[5]="[IniRemove]" ;
  30. $mnuCmd[6]="" ;
  31.  
  32. #ct=0 ;
  33. while (#ct<50) {
  34.     $mnuStr[#defMenu+#ct]=getinistr("dtt.ini","forMacro",str(#ct)) ;
  35.     if ($mnuStr[#defMenu+#ct]=="")    break ;
  36.     $mnuCmd[#defMenu+#ct]="title="+$mnuStr[#defMenu+#ct] ;
  37.     #ct=#ct+1 ;
  38. }
  39.  
  40. mousemenuarray $mnuStr,#ct+#defMenu ;
  41. if (!result)    endmacro ;
  42.  
  43. #ct=result-1 ;
  44. searchdown $mnuCmd[#ct],word ;
  45. if (!result)
  46.     searchup $mnuCmd[#ct],word ;
  47. down ;
  48. escape ;
  49.