約 1,793,930 件
https://w.atwiki.jp/angel_face/pages/10.html
関連ブログ @wikiのwikiモードでは #bf(興味のある単語) と入力することで、あるキーワードに関連するブログ一覧を表示することができます 詳しくはこちらをご覧ください。 ＝＞http //atwiki.jp/guide/17_161_ja.html たとえば、#bf(ゲーム)と入力すると以下のように表示されます。 #bf
https://w.atwiki.jp/angel_face/pages/7.html
アーカイブ @wikiのwikiモードでは #archive_log() と入力することで、特定のウェブページを保存しておくことができます。 詳しくはこちらをご覧ください。 ＝＞http //atwiki.jp/guide/25_171_ja.html たとえば、#archive_log()と入力すると以下のように表示されます。 保存したいURLとサイト名を入力して"アーカイブログ"をクリックしてみよう サイト名 URL
https://w.atwiki.jp/vsotogi/pages/221.html
戦士の宴 スタミナ：22 バトル数：5 経験値の目安：8120 クリア時の絆報酬 報酬がもらえる確率は、デッキに組まれているオトギで一番絆をもってるオトギの絆値が当たる確率として適用される（合計値ではないので注意） 報酬が当たった場合は、以下の中から絆報酬が選ばれる（100%の絆値をもったオトギがデッキに入ってると報酬は2個もらえる） 素材：火炎の花 ， 聖水の花 ， 疾風の花 オトギ ：御影石・火 中 ， 御影石・水 中 ， 御影石・風 中 ， 御影石・金 中 チケット：なし バトル1 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40030.png フランケンシュタイン 火 40800 6800 910 2 ピエロ・水 10% face_20400.png ピエロ・火 火 8200 3300 1720 1 ピエロ・火 30% バトル2 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40060.png ウィッチ 水 100000 6100 850 2 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5% face_40260.png フェアリー 風 125000 3300 900 1 ピエロ・風 10% face_40340.png セブンゴート 火 32000 4800 2500 2 火炎の花×1 15%火炎の果実×1 10%火炎の結晶×1 5% バトル3 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40380.png カルテット 風 96600 6400 3980 3 疾風の花×1 15%疾風の果実×1 10%疾風の結晶×1 5% face_30480.png ノッカー 風 75800 7100 2980 1 疾風の花×1 15%疾風の果実×1 10%疾風の結晶×1 5% face_40340.png セブンゴート 火 32000 4800 2500 2 火炎の花×1 15%火炎の果実×1 10%火炎の結晶×1 5% バトル4 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40381.png 奇跡の音色カルテット 風 96600 6400 3980 3 疾風の花×1 15%疾風の果実×1 10%疾風の結晶×1 5% face_40780.png リャナンシー 風 56000 6450 4200 3 疾風の花×1 15%疾風の果実×1 10%疾風の結晶×1 5% バトル5 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40781.png 情愛の妖精リャナンシー 風 56000 7450 4200 3 疾風の花×1 15%疾風の果実×1 10%疾風の結晶×1 5% face_40061.png 駆け出し呪術者ウィッチ 水 180000 6500 0 2 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5%
https://w.atwiki.jp/vsotogi/pages/215.html
試練の戦い スタミナ：16 バトル数：5 経験値の目安：5297 クリア時の絆報酬 報酬がもらえる確率は、デッキに組まれているオトギで一番絆をもってるオトギの絆値が当たる確率として適用される（合計値ではないので注意） 報酬が当たった場合は、以下の中から絆報酬が選ばれる（100%の絆値をもったオトギがデッキに入ってると報酬は2個もらえる） 素材：火炎の花 ， 聖水の花 ， 疾風の花 オトギ ：御影石・火 中 ， 御影石・水 中 ， 御影石・風 中 ， 御影石・金 中 チケット：なし バトル1 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_20700.png レイキ・火 火 9000 3000 1650 1 レイキ・火 30% face_20280.png ハクタク・火 火 34820 5800 850 2 ハクタク・火 10% face_20280.png ハクタク・火 火 34820 5800 850 2 ハクタク・火 10% バトル2 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_20250.png バク・火 火 30000 3000 1800 2 バク・火 20% face_20260.png バク・水 水 30000 3000 100 2 バク・水 20% face_20270.png バク・風 風 30000 3000 800 1 バク・風 20% バトル3 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_20270.png バク・風 風 30000 3000 800 1 バク・風 20% face_20290.png ハクタク・水 水 21325 6800 100 1 ハクタク・水 10% バトル4 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_30151.png 南方の守護獣朱雀 火 115000 5510 3830 2 火炎の花×1 15%火炎の果実×1 10%火炎の結晶×1 5% face_30161.png 北方の守護獣玄武 水 190000 6500 900 3 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5% バトル5 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40560.png 白虎 風 88000 5000 3800 1 疾風の花×1 15%疾風の果実×1 10%疾風の結晶×1 5% face_30140.png 青竜 水 160000 7520 1800 2 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5%
https://w.atwiki.jp/nkym_memo/pages/158.html
;; .emacs ;; Last Updated 2011/10/20 Thu 09 26 23 (custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(column-number-mode t) '(show-paren-mode t)) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(default ((t ( inherit nil stipple nil background "gray7" foreground "white" inverse-video nil box nil strike-through nil overline nil underline nil slant normal weight normal height 98 width normal foundry "unknown" family "Takaoゴシック"))))) (if window-system (progn ;; 文字の色を設定 (add-to-list 'default-frame-alist '(foreground-color . "white")) ;; 背景色を設定 (add-to-list 'default-frame-alist '(background-color . "gray7")) ;; カーソルの色を設定 (add-to-list 'default-frame-alist '(cursor-color . "SlateBlue2")) ;; ;; マウスポインタの色を設定 ;; (add-to-list 'default-frame-alist '(mouse-color . "SlateBlue2")) ;; ;; モードラインの文字の色を設定 ;; (set-face-foreground 'modeline "white") ;; ;; モードラインの背景色を設定 ;; (set-face-background 'modeline "MediumPurple2") ;; ;; 選択中のリージョンの色を設定 (set-face-background 'region "Dark Slate Grey") ;; ;; モードライン（アクティブでないバッファ）の文字色を設定 ;; (set-face-foreground 'mode-line-inactive "gray30") ;; ;; モードライン（アクティブでないバッファ）の背景色を設定 ;; (set-face-background 'mode-line-inactive "gray85") (set-face-foreground 'font-lock-comment-face "darkorange") ;; コメント (set-face-foreground 'font-lock-string-face "hotpink") ;; ""で囲まれた文字 (set-face-foreground 'font-lock-keyword-face "cyan") (set-face-foreground 'font-lock-function-name-face "white") (set-face-foreground 'font-lock-variable-name-face "white") (set-face-foreground 'font-lock-type-face "skyblue1") (set-face-foreground 'font-lock-warning-face "yellow") (set-face-foreground 'font-lock-builtin-face "lightsteelblue") )) ;;auto-install.elのインストール手順 ;; $mkdir -p ~/.emacs.d/auto-install ;; cd ~/.emacs.d/auto-install ;; wget http //www.emacswiki.org/emacs/download/auto-install.el ;; emacs --batch -Q -f batch-byte-compile auto-install.el ;;;Emacs Lispインストーラを利用 (add-to-list 'load-path "~/.emacs.d/auto-install") (add-to-list 'load-path "~/.emacs.d/plugins/yasnippet-0.6.1c/") ;;; install-elisp-from-emacswiki "auto-install.el" (require 'auto-install) ;;起動時にEmacswikiのページを補完候補に加える ;;(auto-install-update-emacswiki-package-name t) ;;install-elisp.el互換モード (auto-install-compatibility-setup) ;;ediff関連のバッファを一つのフレームにまとめる (setq ediff-window-setup-function 'ediff-setup-windows-plain) ;;================================================================================ ;; 基本設定 ;;================================================================================ ;; スタートアップを非表示 (setq inhibit-startup-screen -1) ;; ビープ音を消す (setq ring-bell-function 'ignore) ;; 現在行に色をつける (global-hl-line-mode 1) ;; その行の色 (set-face-background 'hl-line "black") ;; 履歴を次回Emacs起動時にも保存する (savehist-mode 1) ;; 対応する括弧を光らせる (show-paren-mode 1) ;; カーソルの位置が何文字目かを表示する (column-number-mode t) ;; バックアップファイルを作らない (setq backup-inhibited t) ;; Xでのクリップボードを共有 (setq x-select-enable-clipboard t) ;; yes-or-noをy-or-nに省略 (defalias 'yes-or-no-p 'y-or-n-p) ;; 行の先頭でC-kを一回押すだけで行全体を消去する (setq kill-whole-line t) ;; ツールバーを非表示 (tool-bar-mode -1) ;; メニューバーを非表示 (menu-bar-mode -1) ;; 圧縮されたファイルも編集できるようにする (auto-compression-mode t) ;; スクロールを一行ずつにする (setq scroll-step 1) ;;; 現在の関数名をモードラインに表示 (which-function-mode 1) ;;; emacsclient ;; ファイルを現在のemacsで開く ;(server-start) ;;------------------------ キーバインドの変更 ---------------------------------- ;; 指定の行に移る (global-set-key "\M-g" 'goto-line) ;; undo (global-set-key "\C-z" 'undo) ;; ウィンドウの移動をM-tに (global-set-key "\M-t" 'other-window) ;; C-hをBackSpaceに (global-set-key "\C-h" 'delete-backward-char) ;; M-x compile を f5 に (global-set-key [f5] 'compile) ;;;------------------- 初期フレームの設定 ------------------------------------ (setq initial-frame-alist (append '((width . 45) ; フレーム幅(文字数) (height . 92)) ; フレーム高(文字数) initial-frame-alist)) ;;; 新規フレームのデフォルト設定 (setq default-frame-alist (append '((width . 45); フレーム幅(文字数) (height . 92)); フレーム高(文字数) default-frame-alist)) ;;; ファイル更新日を自動的に書き換える。 ;; ファイルの頭に "last updated "をつけくわえればよい (require 'time-stamp) ;; 日本語で日付を入れたくないのでlocaleをCにする (defun time-stamp-with-locale-c () (let ((system-time-locale "C")) (time-stamp) nil)) (if (not (memq 'time-stamp-with-locale-c write-file-hooks)) (add-hook 'write-file-hooks 'time-stamp-with-locale-c)) (setq time-stamp-active t) (setq time-stamp-start "Last Updated ") (setq time-stamp-format "%04y/%02m/%02d %3a %02H %02M %02S") (setq time-stamp-end " ") ;;;Last Updated の後に空白2つ以上いれると置換 ;;; タイトルバーにファイル名を表示する (setq frame-title-format (format "emacs@%s %%f" (system-name))) ;;; ファイルの自動挿入 (auto-insert-mode) ;; 自動挿入するファイルのあるディレクトリ ;; 最後の/は必須 (setq auto-insert-directory "~/.emacs.d/insert/") ;; 自動挿入するファイル (define-auto-insert "\\.c" "c-template.c") ;;================================================================================ ;;; viewer.el view-modeの設定 ;; M-x install-elisp-from-emacswiki viewer.el ;; ;; C-x C-rでview-modeでファイルを開く (setq view-read-only t) ;; 書き込み不能な場合はview-modeを抜けないように (require 'viewer) (viewer-stay-in-setup) ;; .log .out .datファイルをview-modeで開く (setq view-mode-by-default-regexp "\\.log") (setq view-mode-by-default-regexp "\\.out") (setq view-mode-by-default-regexp "\\.dat") ;;; view-mode時にモードラインに色をつける ;; 色名を指定 (setq viewer-modeline-color-unwritable "tomato") (setq viewer-modeline-color-view "orange") (viewer-change-modeline-color-setup) ;; view-mode時のキーバインド (define-key view-mode-map "h" 'backward-char) (define-key view-mode-map "j" 'next-line) (define-key view-mode-map "k" 'previous-line) (define-key view-mode-map "l" 'forward-char) (define-key view-mode-map "J" 'View-scroll-line-forward) (define-key view-mode-map "K" 'View-scroll-line-backward) (define-key view-mode-map "b" 'scroll-down) (define-key view-mode-map " " 'scroll-up) ;; ;; bm.el (define-key view-mode-map "m" 'bm-toggle) (define-key view-mode-map "[" 'bm-previous) (define-key view-mode-map "]" 'bm-next) ;; view-modeを有効・無効にする ;; 0.04秒以内に jk を同時押しでview-modeに移行 (require 'key-chord) (setq key-chord-two-keys-delay 0.04) (key-chord-mode 1) (key-chord-define-global "jk" 'view-mode) ;================================================================================ ;;; redo+.el (require 'redo+) ;; M-zに設定 (global-set-key "\M-z" 'redo) (setq undo-no-redo t); 過去のundoがredoされないようにする ;; 大量のundoに耐えられるようにする (setq undo-limit 600000) (setq undo-strong-limit 900000) ;;;fullscreen.el (require 'fullscreen) ;;;-------------------- recentf-ext.el -------------------------- ;; install-elisp-from-emacswiki recentf-ext.el ;; 保存しておく数 (setq recentf-max-saved-items 1000) ;; 最近使ったファイルに加えないファイルを正規表現で指定する (setq recentf-exclude '("/TAGS$" "/var/tmp/")) (require 'recentf-ext) ;; f8をショートカットキーに (global-set-key [f8] 'recentf-open-files) ;;; auto-complete.el ;; install-elisp-from-emacswiki auto-complete.el ;;(require 'auto-complete) ;;(global-auto-complete-mode 1) ;;;col-highlight.el ;; auto-install-batch col-highlight.el ;(require 'col-highlight) ;(column-highlight-mode 1) ;;何もしないでいるとハイライトを始めるようにする場合 ;(toggle-highlight-column-when-idle 1) ;(col-highlight-set-interval 3) ;;;============================= hippie-expand ==================================== ;;; 略語展開の順を設定 (setq hippie-expand-try-functions-list '(try-expand-dabbrev try-expand-dabbrev-all-buffers try-expand-dabbrev-from-kill try-complete-file-name-partially try-complete-file-name try-expand-all-abbrevs try-expand-list try-expand-line try-complete-lisp-symbol-partially try-complete-lisp-symbol)) ;; キーバインドの変更 C-; (global-set-key [?\C-\;] 'hippie-expand ) ;;; ipa.el (require 'ipa) ;;; 背景色 (set-face-background 'highlight "Corn Flower Blue") ;;;---------------------- sequential-command.el--------------------------------- ;;; M-x auto-install-batch sequential-command (require 'sequential-command-config) (sequential-command-setup-keys) ;;================================================================================ ;;; smartchr.el ;; M-x install-elisp ;; https //github.com/imakado/emacs-smartchr/raw/master/smartchr.el (require 'smartchr) ;; once "", twice " (global-set-key (kbd "\"") (smartchr '("\"`!!'\"" "\""))) (add-hook 'c-mode-hook '(lambda () (local-set-key ( kbd "(") (smartchr '("( `!!' )" "()" "("))) (local-set-key ( kbd "\'") (smartchr '("\'`!!'\'" "\'"))) (local-set-key ( kbd "\,") (smartchr '("\, " "\,"))) (local-set-key (kbd "[") (smartchr '("[ `!!' ]" "["))) (local-set-key (kbd "=") (smartchr '("= " "==" "="))) )) (add-hook 'c++-mode-hook '(lambda () (local-set-key ( kbd "(") (smartchr '("( `!!' )" "()" "("))) (local-set-key ( kbd "\'") (smartchr '("\'`!!'\'" "\'"))) (local-set-key ( kbd "\,") (smartchr '("\, " "\,"))) (local-set-key (kbd "[") (smartchr '("[ `!!' ]" "["))) (local-set-key (kbd "=") (smartchr '("= " "== " "="))) )) (add-hook 'org-mode-hook '(lambda () (local-set-key ( kbd "$" ) ( smartchr '("" "$" ))) (local-set-key ( kbd "\{" ) ( smartchr '("\{`!!'\}" "\{" ))) )) ;;;----------------------- auto-save-buffers.el --------------------------------- ;; M-x install-elisp ;; http //homepage3.nifty.com/oatu/emacs/archives/auto-save-buffers.el (require 'auto-save-buffers) ;; アイドル0.5秒で保存 (run-with-idle-timer 0.5 t 'auto-save-buffers) (run-with-idle-timer 0.5 t 'auto-save-buffers "" ".ipa$") ;;; open-junk-file.el ;; M-x install-elisp-from-emacswiki open-junk-file.el ;; Usage M-x open-junk-file (require 'open-junk-file) (setq open-junk-file-format "~/junk/%Y-%m-%d-%H%M%S.") (global-set-key "\C-x\C-j" 'open-junk-file) ;;; bm.el ;; M-x install-elisp ;; http //cvs.savannah.gnu.org/viewvc/*checkout*/bm/bm/bm.el (setq-default bm-buffer-persistence nil) (setq bm-restore-repository-on-load t) (require 'bm) (add-hook 'find-file-hooks 'bm-buffer-restore) (add-hook 'kill-buffer-hook 'bm-buffer-save) (add-hook 'after-save-hook 'bm-buffer-save) (add-hook 'after-revert-hook 'bm-buffer-restore) (add-hook 'vc-before-checkin-hook 'bm-buffer-save) (global-set-key [f7] 'bm-toggle) (global-set-key "\C-xp" 'bm-previous) (global-set-key "\C-xn" 'bm-next) ;;; twittering-mode (add-to-list 'load-path "~/.emacs.d/twittering-mode-1.0.0/") (require 'twittering-mode) ;; Show icons (setq twittering-icon-mode t) ;; Update your timeline each 300 seconds (5 minutes) (setq twittering-timer-interval 30) (add-hook 'twittering-mode-hook (lambda () (mapc (lambda (pair) (let ((key (car pair)) (func (cdr pair))) (define-key twittering-mode-map (read-kbd-macro key) func))) '(("F" . twittering-friends-timeline) ("R" . twittering-replies-timeline) ("U" . twittering-user-timeline) ("W" . twittering-update-status-interactive))))) ;;;================== Latex ======================================== ;; 日本語コードをeuc-japanに (set-language-environment "Japanese") (set-default-coding-systems 'euc-japan) (set-terminal-coding-system 'euc-japan) ;;; Yatex (setq YaTeX-inhibit-prefix-letter nil) (setq dvi2-command "xdvi -geo +0+0 -s 7 -expert -watchfile 3") ;;;reftex (add-hook 'latex-mode-hook 'turn-on-reftex) ; with Emacs latex mode (add-hook 'LaTeX-mode-hook 'turn-on-reftex) ; with AUCTeX LaTeX mode (add-hook 'yatex-mode-hook 'turn-on-reftex) ; with YaTeX mode ;;------------------- 行番号の表示 --------------------------------- (autoload 'setnu-mode "setnu" nil t) (global-set-key [f12] 'setnu-mode) ;;========================== kmacro-save =============================== (defvar kmacro-save-file "~/.emacs" "キーボードマクロを保存するファイル") (defun kmacro-save (symbol) (interactive "name for last kbd macro ") (name-last-kbd-macro symbol) (with-current-buffer (find-file-noselect kmacro-save-file) (goto-char (point-max)) (insert-kbd-macro symbol) (basic-save-buffer))) ;; 現在行をコピー (fset 'select-this-line "\C-e\C-@\C-a\M-w") (global-set-key [?\C-\,] 'select-this-line) ;; 文末に;を入力 (fset 'insert-statement-end "\C-e;\C-j") (global-set-key [?\C-\.] 'insert-statement-end) ;; {}を改行してインデント (fset 'parentheses-and-indent "\C-e{\C-j\C-j}\C-p") (global-set-key [?\M-\[] 'parentheses-and-indent) ;; インデントして次の行へ (fset 'indent-and-next "\C-i\C-n") (global-set-key [?\M-i] 'indent-and-next) ;;------------- yasnippet.el ------------------------------- (require 'yasnippet-config) (yas/setup "~/.emacs.d/plugins/yasnippet-0.6.1c") ;;------------- iswitchb.el ------------------------------- ;; バッファ切り替えを部分文字列で可能に (iswitchb-mode 1) (setq read-buffer-function 'iswitchb-read-buffer) (setq iswitchb-regexp nil) ;; 新しいバッファ作成するときは聞かない (setq iswitchb-prompt-newbuffer nil) ;; uniquify.el (require 'uniquify) ;; filename dir の形式 (setq uniquify-buffer-name-style 'post-forward-angle-brackets) ;; *で囲まれたバッファ名は対象外にする (setq uniquify-ignore-buffers-re "*[^*]+*") ;;---------------html-helper-mode------------------------------ (require 'html-helper-mode) (require 'html-mode) (require 'tempo) ;;--------------org-mode--------------------------------------- (require 'org) (defun org-insert-upheading-dwim (arg) "1レベル上の見出しを入力する" (interactive "P") (org-insert-heading arg) (cond ((org-on-heading-p) (org-do-promote)) ((org-at-item-p) (org-indent-item -1)))) (defun org-insert-heading-dwim (arg) "現在と同じレベルの見出しを入力する。" "C-u １レベル上" "C-u C-u １レベル下" (interactive "p") (case arg (4 (org-insert-subheading nil)) ;C-u (16 (org-insert-upheading nil)) ;C-u C-u (t (org-insert-heading nil)))) (define-key org-mode-map (kbd " C-return ") 'org-insert-heading-dwim) (org-remember-insinuate) ;; メモを格納するorgファイルの設定 (setq org-directory "~/Documents/memo") (setq org-default-notes-file (expand-file-name "memo.org" org-directory)) ;; テンプレートの設定 (setq org-remember-templates '(("Note" ?n "** %?\n %i\n %a\n %T" nil "Inbox") ("Todo" ?t "** TODO %?\n %i\n %a\n %T" nil "Inbox"))) ;; Select template [n]ote [t]odo (global-set-key [f1] 'org-remember) ;; TODOリストの設定 (setq org-use-fast-todo-selection t) (setq org-todo-keywords '((sequence "TODO(t)" "STARTED(s)" "WAITING(w)" "|" "DONE(x)" "CANCEL(c)") (sequence "APPT(a)" "|" "DONE(x)" "CANCEL(c)" ))) ;; ハイパーリンクの作成 (global-set-key (kbd "C-c l") 'org-store-link) ;; M-x org-rememberによるメモを集めるorgファイル (setq org-default-notes-file "~/Documents/memo/plan.org") ;; 予定表に使うorgファイルのリスト (setq org-agenda-files (list org-default-notes-file)) (global-set-key (kbd "C-c a") 'org-agenda) ;; w3m (require 'w3m-load) (setq w3m-home-page "www.google.co.jp/") ;起動時に開くページ (setq w3m-use-cookies t) ;クッキーを使う (setq w3m-bookmark- "~/.w3m/bookmark.html") ;ブックマークを保存する (setq browse-url-browser-function 'w3m-browse-url) (autoload 'w3m-browse-url "w3m" "Ask a browser to show a URL." t) (global-set-key "\C-xm" 'browse-url-at-point) (autoload 'w3m-find-file "w3m" "w3m interface function for local file." t) (autoload 'w3m-search "w3m-search" "Search QUERY using SEARCH-ENGIN." t) (setq w3m-search-default-engin "google-ja") (global-set-key "\C-cs" 'w3m-search) (autoload 'w3m-weather "w3m-weather" "Display weather report." t) (autoload 'w3m-antenna "w3m-antenna" "Report change of WEB ." t) (autoload 'w3m- "w3m-namazu" "Search files with Namazu." t) ;; 折りたたみ (require 'fold-dwim) ;; コンパイルでの*compilation*ウィンドウの文字コード調整 (add-hook 'set-language-environment-hook (lambda () (when (equal "ja_JP.UTF-8" (getenv "LANG")) (setq default-process-coding-system '(utf-8 . utf-8)) (setq default-file-name-coding-system 'utf-8)) (when (equal "Japanese" current-language-environment) (setq default-buffer-file-coding-system 'iso-2022-jp)))) (set-language-environment "Japanese")
https://w.atwiki.jp/nicoratch/pages/1548.html
概要 mini innofaderを内部に組み込みで使用可能なpt01スクラッチ用のアルミニウム製フェースプレート。厚さあ1mmで元のフェースプレートを取り外す必要はなし。また取り付けに際してトーンアームを取り外す必要も無し。カラーはブラック、レッド、ブルーの3色。 ※45アダプター用穴、スタート・ストップボタン用穴が空いてないバージョンもあり。 価格 $29 Bihari Designs https //bihari.bigcartel.com/product/pt01-metal-faceplate-for-innofader
https://w.atwiki.jp/nkym_memo/pages/205.html
;; .emacs ;; Last Updated 2014/05/14 Wed 03 27 20 (custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(column-number-mode t) '(show-paren-mode t)) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(default ((t ( inherit nil stipple nil background "gray7" foreground "white" inverse-video nil box nil strike-through nil overline nil underline nil slant normal weight normal height 98 width normal foundry "unknown" family "Takaoゴシック"))))) ;; 半角2つ = 全角１つになるheight = 88, 92, 102 (if window-system (progn ;; 文字の色を設定 (add-to-list 'default-frame-alist '(foreground-color . "white")) ;; 背景色を設定 (add-to-list 'default-frame-alist '(background-color . "gray10")) ;; カーソルの色を設定 (add-to-list 'default-frame-alist '(cursor-color . "SlateBlue2")) ;; ;; マウスポインタの色を設定 ;; (add-to-list 'default-frame-alist '(mouse-color . "SlateBlue2")) ;; ;; モードラインの文字の色を設定 ;; (set-face-foreground 'modeline "white") ;; ;; モードラインの背景色を設定 ;; (set-face-background 'modeline "MediumPurple2") ;; ;; 選択中のリージョンの色を設定 (set-face-background 'region "Dark Slate Grey") ;; ;; モードライン（アクティブでないバッファ）の文字色を設定 ;; (set-face-foreground 'mode-line-inactive "gray30") ;; ;; モードライン（アクティブでないバッファ）の背景色を設定 ;; (set-face-background 'mode-line-inactive "gray85") (set-face-foreground 'font-lock-comment-face "darkorange") ;; コメント (set-face-foreground 'font-lock-string-face "hotpink") ;; ""で囲まれた文字 (set-face-foreground 'font-lock-keyword-face "cyan") (set-face-foreground 'font-lock-function-name-face "white") (set-face-foreground 'font-lock-variable-name-face "white") (set-face-foreground 'font-lock-type-face "skyblue1") (set-face-foreground 'font-lock-warning-face "yellow") (set-face-foreground 'font-lock-builtin-face "lightsteelblue") (set-face-background 'fringe "gray7") )) ;;auto-install.elのインストール手順 ;; $mkdir -p ~/.emacs.d/auto-install ;; cd ~/.emacs.d/auto-install ;; wget http //www.emacswiki.org/emacs/download/auto-install.el ;; emacs --batch -Q -f batch-byte-compile auto-install.el ;;;Emacs Lispインストーラを利用 (add-to-list 'load-path "~/.emacs.d/auto-install") (add-to-list 'load-path "~/.emacs.d/plugins/yasnippet-0.6.1c/") ;;; install-elisp-from-emacswiki "auto-install.el" (require 'auto-install) ;;起動時にEmacswikiのページを補完候補に加える ;;(auto-install-update-emacswiki-package-name t) ;;install-elisp.el互換モード (auto-install-compatibility-setup) ;;ediff関連のバッファを一つのフレームにまとめる (setq ediff-window-setup-function 'ediff-setup-windows-plain) ;;================================================================================ ;; 基本設定 ;;================================================================================ ;; スタートアップを非表示 (setq inhibit-startup-screen -1) ;; ビープ音を消す (setq ring-bell-function 'ignore) ;; 現在行に色をつける (global-hl-line-mode 1) ;; その行の色 (set-face-background 'hl-line "black") ;; 履歴を次回Emacs起動時にも保存する (savehist-mode 1) ;; 対応する括弧を光らせる (show-paren-mode 1) ;; カーソルの位置が何文字目かを表示する (column-number-mode t) ;; バックアップファイルを作らない (setq backup-inhibited t) ;; Xでのクリップボードを共有 (setq x-select-enable-clipboard t) ;; yes-or-noをy-or-nに省略 (defalias 'yes-or-no-p 'y-or-n-p) ;; 行の先頭でC-kを一回押すだけで行全体を消去する (setq kill-whole-line t) ;; ツールバーを非表示 (tool-bar-mode -1) ;; メニューバーを非表示 (menu-bar-mode -1) ;; 圧縮されたファイルも編集できるようにする (auto-compression-mode t) ;; スクロールを一行ずつにする (setq scroll-step 1) ;; スクロールバーを削除 (setq scroll-bar-mode -1) ;;; 現在の関数名をモードラインに表示 (which-function-mode 1) ;;; emacsclient ;; ファイルを現在のemacsで開く ;(server-start) ;;------------------------ キーバインドの変更 ---------------------------------- ;; 指定の行に移る (global-set-key "\M-g" 'goto-line) ;; undo (global-set-key "\C-z" 'undo) ;; ウィンドウの移動をM-tに (global-set-key "\M-t" 'other-window) ;; C-hをBackSpaceに (global-set-key "\C-h" 'delete-backward-char) ;; M-x compile を f5 に (global-set-key [f5] 'compile) ;; C-mで改行+インデント (global-set-key "\C-m" 'newline-and-indent) ;;;------------------- 初期フレームの設定 ------------------------------------ (setq initial-frame-alist (append '((width . 80) ; フレーム幅(文字数) (height . 68)) ; フレーム高(文字数) initial-frame-alist)) ;;; 新規フレームのデフォルト設定 (setq default-frame-alist (append '((width . 80); フレーム幅(文字数) (height . 68)); フレーム高(文字数) default-frame-alist)) ;;; ファイル更新日を自動的に書き換える。 ;; ファイルの頭に "last updated "をつけくわえればよい (require 'time-stamp) ;; 日本語で日付を入れたくないのでlocaleをCにする (defun time-stamp-with-locale-c () (let ((system-time-locale "C")) (time-stamp) nil)) (if (not (memq 'time-stamp-with-locale-c write-file-hooks)) (add-hook 'write-file-hooks 'time-stamp-with-locale-c)) (setq time-stamp-active t) (setq time-stamp-start "Last Updated ") (setq time-stamp-format "%04y/%02m/%02d %3a %02H %02M %02S") (setq time-stamp-end " ") ;;;Last Updated の後に空白2つ以上いれると置換(1つにはできない) ;;; タイトルバーにファイル名を表示する (setq frame-title-format (format "%s@%s %%f" (user-login-name) (system-name))) ;;; ファイルの自動挿入 (auto-insert-mode) ;; 自動挿入するファイルのあるディレクトリ ;; 最後の/は必須 (setq auto-insert-directory "~/.emacs.d/insert/") ;; 自動挿入するファイル (define-auto-insert "\\.c" "c-template.c") (define-auto-insert "\\.tex" "tex-template.tex") ;;================================================================================ ;;; viewer.el view-modeの設定 ;; M-x install-elisp-from-emacswiki viewer.el ;; ;; C-x C-rでview-modeでファイルを開く ;; (setq view-read-only t) ;; ;; 書き込み不能な場合はview-modeを抜けないように ;; (require 'viewer) ;; (viewer-stay-in-setup) ;; ;; .log .out .datファイルをview-modeで開く ;; (setq view-mode-by-default-regexp "\\.log") ;; (setq view-mode-by-default-regexp "\\.out") ;; (setq view-mode-by-default-regexp "\\.dat") ;; ;;; view-mode時にモードラインに色をつける ;; ;; 色名を指定 ;; (setq viewer-modeline-color-unwritable "tomato") ;; (setq viewer-modeline-color-view "orange") ;; (viewer-change-modeline-color-setup) ;; ;; view-mode時のキーバインド ;; (define-key view-mode-map "h" 'backward-char) ;; (define-key view-mode-map "j" 'next-line) ;; (define-key view-mode-map "k" 'previous-line) ;; (define-key view-mode-map "l" 'forward-char) ;; (define-key view-mode-map "J" 'View-scroll-line-forward) ;; (define-key view-mode-map "K" 'View-scroll-line-backward) ;; (define-key view-mode-map "b" 'scroll-down) ;; (define-key view-mode-map " " 'scroll-up) ;; ;; ;; bm.el ;; (define-key view-mode-map "m" 'bm-toggle) ;; (define-key view-mode-map "[" 'bm-previous) ;; (define-key view-mode-map "]" 'bm-next) ;; ;; view-modeを有効・無効にする ;; ;; 0.04秒以内に jk を同時押しでview-modeに移行 ;; (require 'key-chord) ;; (setq key-chord-two-keys-delay 0.04) ;; (key-chord-mode 1) ;; (key-chord-define-global "jk" 'view-mode) ;================================================================================ ;;; redo+.el (require 'redo+) ;; M-zに設定 (global-set-key "\M-z" 'redo) (setq undo-no-redo t); 過去のundoがredoされないようにする ;; 大量のundoに耐えられるようにする (setq undo-limit 6000) (setq undo-strong-limit 9000) ;;;fullscreen.el (require 'fullscreen) (global-set-key [f11] 'fullscreen) ;;;-------------------- recentf-ext.el -------------------------- ;; install-elisp-from-emacswiki recentf-ext.el ;; 保存しておく数 (setq recentf-max-saved-items 1000) ;; 最近使ったファイルに加えないファイルを正規表現で指定する (setq recentf-exclude '("/TAGS$" "/var/tmp/")) (require 'recentf-ext) ;; f8をショートカットキーに (global-set-key [f8] 'recentf-open-files) ;;; auto-complete.el ;; install-elisp-from-emacswiki auto-complete.el ;;(require 'auto-complete) ;;(global-auto-complete-mode 1) ;;;col-highlight.el ;; auto-install-batch col-highlight.el ;(require 'col-highlight) ;(column-highlight-mode 1) ;;何もしないでいるとハイライトを始めるようにする場合 ;(toggle-highlight-column-when-idle 1) ;(col-highlight-set-interval 3) ;;;============================= hippie-expand ==================================== ;;; 略語展開の順を設定 (setq hippie-expand-try-functions-list '(try-expand-dabbrev try-expand-dabbrev-all-buffers try-expand-dabbrev-from-kill try-complete-file-name-partially try-complete-file-name try-expand-all-abbrevs try-expand-list try-expand-line try-complete-lisp-symbol-partially try-complete-lisp-symbol)) ;; キーバインドの変更 C-; (global-set-key [?\C-\;] 'hippie-expand ) ;;; ipa.el (require 'ipa) ;;; 背景色 (set-face-background 'highlight "Corn Flower Blue") ;;;---------------------- sequential-command.el--------------------------------- ;;; M-x auto-install-batch sequential-command (require 'sequential-command-config) (sequential-command-setup-keys) ;;================================================================================ ;;; smartchr.el ;; M-x install-elisp ;; https //github.com/imakado/emacs-smartchr/raw/master/smartchr.el (require 'smartchr) ;; once "", twice " (global-set-key (kbd "\"") (smartchr '("\"`!!'\"" "\""))) (add-hook 'c-mode-hook '(lambda () (local-set-key ( kbd "(") (smartchr '("( `!!' )" "()" "("))) (local-set-key ( kbd "\'") (smartchr '("\'`!!'\'" "\'"))) (local-set-key ( kbd "\,") (smartchr '("\, " "\,"))) (local-set-key (kbd "[") (smartchr '("[ `!!' ]" "[]" "["))) (local-set-key (kbd "=") (smartchr '("= " "== " "="))) )) (add-hook 'c++-mode-hook '(lambda () (local-set-key ( kbd "(") (smartchr '("( `!!' )" "()" "("))) (local-set-key ( kbd "\'") (smartchr '("\'`!!'\'" "\'"))) (local-set-key ( kbd "\,") (smartchr '("\, " "\,"))) (local-set-key (kbd "[") (smartchr '("[ `!!' ]" "[]" "["))) (local-set-key (kbd "=") (smartchr '("= " "== " "="))) (local-set-key (kbd " ") (smartchr '(" " " " ))) )) (add-hook 'org-mode-hook '(lambda () (local-set-key ( kbd "$" ) ( smartchr '("$" ""))) (local-set-key ( kbd "\{" ) ( smartchr '("\{`!!'\}" "\{" "{{"))) )) (add-hook 'python-mode-hook '(lambda () (local-set-key ( kbd "(") (smartchr '("( `!!' )" "()" "("))) (local-set-key ( kbd "\'") (smartchr '("\'`!!'\'" "\'"))) (local-set-key ( kbd "\,") (smartchr '("\, " "\,"))) (local-set-key (kbd "[") (smartchr '("[ `!!' ]" "["))) (local-set-key (kbd "=") (smartchr '("= " "== " "="))) )) ;;;----------------------- auto-save-buffers.el --------------------------------- ;; M-x install-elisp ;; http //homepage3.nifty.com/oatu/emacs/archives/auto-save-buffers.el (require 'auto-save-buffers) ;; アイドル0.5秒で保存 (run-with-idle-timer 0.5 t 'auto-save-buffers) (run-with-idle-timer 0.5 t 'auto-save-buffers "" ".ipa$") ;;; open-junk-file.el ;; M-x install-elisp-from-emacswiki open-junk-file.el ;; Usage M-x open-junk-file (require 'open-junk-file) (setq open-junk-file-format "~/junk/%Y-%m-%d-%H%M%S.") (global-set-key "\C-x\C-j" 'open-junk-file) ;;; bm.el ;; M-x install-elisp ;; http //cvs.savannah.gnu.org/viewvc/*checkout*/bm/bm/bm.el (setq-default bm-buffer-persistence nil) (setq bm-restore-repository-on-load t) (require 'bm) (add-hook 'find-file-hooks 'bm-buffer-restore) (add-hook 'kill-buffer-hook 'bm-buffer-save) (add-hook 'after-save-hook 'bm-buffer-save) (add-hook 'after-revert-hook 'bm-buffer-restore) (add-hook 'vc-before-checkin-hook 'bm-buffer-save) (global-set-key [f7] 'bm-toggle) (global-set-key "\C-xp" 'bm-previous) (global-set-key "\C-xn" 'bm-next) ;;; twittering-mode (add-to-list 'load-path "~/.emacs.d/twittering-mode-2.0.0/") (require 'twittering-mode) ;; Show icons (setq twittering-icon-mode nil) ;; Timeline format (setq twittering-status-format "%i %s %S, %@ \n %t") ;; Update your timeline each 300 seconds (5 minutes) (setq twittering-timer-interval 30) (add-hook 'twittering-mode-hook (lambda () (mapc (lambda (pair) (let ((key (car pair)) (func (cdr pair))) (define-key twittering-mode-map (read-kbd-macro key) func))) '(("F" . twittering-favorite) ("R" . twittering-replies-timeline) ("U" . twittering-user-timeline) ("W" . twittering-update-status-interactive))))) ;;;================== Latex ======================================== ;; 日本語コードをeuc-japanに (set-language-environment "Japanese") (set-default-coding-systems 'euc-japan) (set-terminal-coding-system 'euc-japan) ;;; Yatex (add-to-list 'load-path "/usr/share/emacs/site-lisp/yatex/") (setq auto-mode-alist (cons (cons "\\.tex$" 'yatex-mode) auto-mode-alist)) (autoload 'yatex-mode "yatex" "Yet Another LaTeX mode" t) (setq YaTeX-inhibit-prefix-letter nil) (setq dvi2-command "xdvi -geo +0+0 -s 7 -expert -watchfile 3") ;;;reftex (add-hook 'latex-mode-hook 'turn-on-reftex) ; with Emacs latex mode (add-hook 'LaTeX-mode-hook 'turn-on-reftex) ; with AUCTeX LaTeX mode (add-hook 'yatex-mode-hook 'turn-on-reftex) ; with YaTeX mode ;;------------------- 行番号の表示 --------------------------------- (autoload 'setnu-mode "setnu" nil t) (global-set-key [f12] 'setnu-mode) ;;========================== kmacro-save =============================== (defvar kmacro-save-file "~/.emacs" "キーボードマクロを保存するファイル") (defun kmacro-save (symbol) (interactive "name for last kbd macro ") (name-last-kbd-macro symbol) (with-current-buffer (find-file-noselect kmacro-save-file) (goto-char (point-max)) (insert-kbd-macro symbol) (basic-save-buffer))) ;; 現在行をコピー (fset 'select-this-line "\C-e\C-@\C-a\M-w") (global-set-key [?\C-\,] 'select-this-line) ;; 文末に;を入力 (fset 'insert-statement-end "\C-e;\C-a\C-i") (global-set-key [?\C-\.] 'insert-statement-end) ;; {}を改行してインデント (fset 'parentheses-and-indent "\C-e{\C-j\C-j}\C-p") (global-set-key [?\M-\[] 'parentheses-and-indent) ;; インデントして次の行へ (fset 'indent-and-next "\C-i\C-n") (global-set-key [?\M-i] 'indent-and-next) ;;------------- yasnippet.el ------------------------------- (require 'yasnippet-config) (yas/setup "~/.emacs.d/plugins/yasnippet-0.6.1c") ;;------------- iswitchb.el ------------------------------- ;; バッファ切り替えを部分文字列で可能に (iswitchb-mode 1) (setq read-buffer-function 'iswitchb-read-buffer) (setq iswitchb-regexp nil) ;; 新しいバッファ作成するときは聞かない (setq iswitchb-prompt-newbuffer nil) ;; uniquify.el (require 'uniquify) ;; filename dir の形式 (setq uniquify-buffer-name-style 'post-forward-angle-brackets) ;; *で囲まれたバッファ名は対象外にする (setq uniquify-ignore-buffers-re "*[^*]+*") ;;---------------html-helper-mode------------------------------ (require 'html-helper-mode) (require 'html-mode) (require 'tempo) ;; ;; w3m ;; (require 'w3m-load) ;; (setq w3m-home-page "www.google.co.jp/") ;起動時に開くページ ;; (setq w3m-use-cookies t) ;クッキーを使う ;; (setq w3m-bookmark- "~/.w3m/bookmark.html") ;ブックマークを保存する ;; (setq browse-url-browser-function 'w3m-browse-url) ;; (autoload 'w3m-browse-url "w3m" "Ask a browser to show a URL." t) ;; (global-set-key "\C-xm" 'browse-url-at-point) ;; (autoload 'w3m-find-file "w3m" "w3m interface function for local file." t) ;; (autoload 'w3m-search "w3m-search" "Search QUERY using SEARCH-ENGIN." t) ;; (setq w3m-search-default-engin "google-ja") ;; (global-set-key "\C-cs" 'w3m-search) ;; (autoload 'w3m-weather "w3m-weather" "Display weather report." t) ;; (autoload 'w3m-antenna "w3m-antenna" "Report change of WEB ." t) ;; (autoload 'w3m- "w3m-namazu" "Search files with Namazu." t) ;; コードブロックの折りたたみ (require 'fold-dwim) ;; コンパイルでの*compilation*ウィンドウの文字コード調整 (add-hook 'set-language-environment-hook (lambda () (when (equal "ja_JP.UTF-8" (getenv "LANG")) (setq default-process-coding-system '(utf-8 . utf-8)) (setq default-file-name-coding-system 'utf-8)) (when (equal "Japanese" current-language-environment) (setq default-buffer-file-coding-system 'iso-2022-jp)))) (set-language-environment "Japanese") ;; カーソルの点滅を止める ;;(blink-cursor-mode 0) ;; セッションの保存 ;; emacs再起動時に前回のバッファ等を復元 ;(desktop-save-mode 1) ;; 拡張子によるメジャーモードの変更 (setq auto-mode-alist (cons (cons "\\.h$" 'c++-mode) auto-mode-alist)) ;; シェルスクリプトの実行属性を自動で付加 ;; ファイル先頭が#!で始まり、ファイル名が.で始まらない場合 (defun make-file-executable () "Make the file of this buffer executable, when it is a script source." (save-restriction (widen) (if (string= "#!" (buffer-substring-no-properties 1 (min 3 (point-max)))) (let ((name (buffer-file-name))) (or (equal ?. (string-to-char (file-name-nondirectory name))) (let ((mode (file-modes name))) (set-file-modes name (logior mode (logand (/ mode 4) 73))) (message (concat "Wrote " name " (+x)")))))))) (add-hook 'after-save-hook 'make-file-executable) (require 'tramp) ;; apache-mode (autoload 'apache-mode "apache-mode" nil t) (add-to-list 'auto-mode-alist '("\\.htaccess\\'" . apache-mode)) (add-to-list 'auto-mode-alist '("httpd\\.conf\\'" . apache-mode)) (add-to-list 'auto-mode-alist '("srm\\.conf\\'" . apache-mode)) (add-to-list 'auto-mode-alist '("access\\.conf\\'" . apache-mode)) (add-to-list 'auto-mode-alist '("sites-\\(available\\|enabled\\)/" . apache-mode)) ;; php-mode (require 'php-mode) ;; スクロールバーを消す (scroll-bar-mode nil) ;; ;; kill-all-buffers (defun kill-all-buffers () (interactive) (loop for buffer being the buffers do (kill-buffer buffer))) ;;; Arduino (add-to-list 'load-path "~/.emacs.d/arduino-mode/") (load "arduino-mode") (setq auto-mode-alist (cons '("\\.pde$" . arduino-mode) auto-mode-alist)) ;;--------------org-mode--------------------------------------- (require 'org) ;; 折り返し有効 (setq org-startup-truncated nil) (defun org-insert-upheading-dwim (arg) "1レベル上の見出しを入力する" (interactive "P") (org-insert-heading arg) (cond ((org-on-heading-p) (org-do-promote)) ((org-at-item-p) (org-indent-item -1)))) (defun org-insert-heading-dwim (arg) "現在と同じレベルの見出しを入力する。" "C-u １レベル上" "C-u C-u １レベル下" (interactive "p") (case arg (4 (org-insert-subheading nil)) ;C-u (16 (org-insert-upheading nil)) ;C-u C-u (t (org-insert-heading nil)))) (define-key org-mode-map (kbd " C-return ") 'org-insert-heading-dwim) ;; ;１行の文字数 ;; (setq org-mode-hook ;; '(lambda () (auto-fill-mode 1) ;; (setq default-fill-column 100) ;; (setq defailt-tab-width 4))) ;; org-agendaを開く (global-set-key (kbd "C-c a") 'org-agenda) (org-remember-insinuate) ;; メモを格納するorgファイルの設定 (setq org-directory "~/Documents/memo") (setq org-default-notes-file (expand-file-name "memo.org" org-directory)) ;; テンプレートの設定 (setq org-remember-templates '(("Note" ?n "** %?\n %i\n %a\n %T" nil "Inbox") ("Todo" ?t "** TODO %?\n %i\n %a\n %T" nil "Inbox"))) ;; Select template [n]ote [t]odo (global-set-key (kbd "\C-c n") 'org-remember) ;; TODOリストの設定 (setq org-use-fast-todo-selection t) (setq org-todo-keywords '((sequence "TODO(t)" "STARTED(s)" "WAITING(w)" "|" "DONE(x)" "CANCEL(c)") (sequence "APPT(a)" "|" "DONE(x)" "CANCEL(c)" ))) ;; ハイパーリンクの作成 (global-set-key (kbd "C-c l") 'org-store-link) ;; M-x org-rememberによるメモを集めるorgファイル ;(setq org-default-notes-file "~/Documents/memo/plan.org") ;; 予定表に使うorgファイルのリスト (setq org-agenda-files (cons org-default-notes-file (directory-files "~/Documents/Private/2013/" t "\\.org$"))) ;; 監視するファイルを追加 (setq progress-directory-list (directory-files "~/Documents/Progress/" nil "^\\([^.]\\|\\.[^.]\\|\\.\\..\\)")) (while progress-directory-list (setq tmp-list (concatenate 'string "~/Documents/Progress/" (car progress-directory-list))) (setq org-agenda-files (append org-agenda-files (directory-files tmp-list t "\\.org$"))) (setq progress-directory-list (cdr progress-directory-list )) ) ;; txtをorg-modeで開く (setq auto-mode-alist (cons '("\\.txt$" . org-mode) auto-mode-alist)) ;;; gtags (require 'gtags) (add-hook 'c++-mode-hook 'gtags-mode) (add-hook 'c-mode-hook 'gtags-mode) (setq view-read-only t) ;; cpp-highlight-buffer (setq cpp-known-face 'default) (setq cpp-unknown-face 'highlight) (setq cpp-face-type 'light) (setq cpp-known-writable 't) (setq cpp-unknown-writable 't) (setq cpp-edit-list '(("1" nil (foreground-color . "dim gray") both nil) ("0" (foreground-color . "dim gray") nil both nil)))
https://w.atwiki.jp/opengl/pages/86.html
では、取りあえず簡単な読み込みプログラムを作ってみます。 今回はテクスチャ無しで、マテリアルも読み込んでいませんが .MQO の読み込みプログラムの時とは違って法線情報が ありますので陰影が表現されています。 box.obj # Created by Metasequoia mtllib box.mtl v -100.000000 100.000000 100.000000 v -100.000000 -100.000000 100.000000 v 100.000000 100.000000 100.000000 v 100.000000 -100.000000 100.000000 v 100.000000 100.000000 -100.000000 v 100.000000 -100.000000 -100.000000 v -100.000000 100.000000 -100.000000 v -100.000000 -100.000000 -100.000000 # 8 vertices vt 0.00000 0.00000 vt 1.00000 0.00000 vt 1.00000 1.00000 vt 0.00000 1.00000 # 4 texture vertices vn 0.00000 0.00000 1.00000 vn 1.00000 0.00000 0.00000 vn 0.00000 0.00000 -1.00000 vn -1.00000 0.00000 0.00000 vn 0.00000 1.00000 0.00000 vn 0.00000 -1.00000 0.00000 # 6 normal vertices usemtl default f 2/4/1 4/3/1 3/2/1 1/1/1 f 4/4/2 6/3/2 5/2/2 3/1/2 f 6/4/3 8/3/3 7/2/3 5/1/3 f 8/4/4 2/3/4 1/2/4 7/1/4 f 1/4/5 3/3/5 5/2/5 7/1/5 f 8/4/6 6/3/6 4/2/6 2/1/6 # 6 elements box.mtl # Created by Metasequoia newmtl default Ka 0.60000 0.60000 0.60000 Kd 0.80000 0.80000 0.80000 Ks 0.00000 0.00000 0.00000 Ns 5.00000 OBJ.h #include vector using namespace std; //3つのベクトル struct Vector3f{ float x; float y; float z; }vec3d; //4つのベクトル struct Vector4f{ float x; float y; float z; float w; }vec4d; //4つの反射 struct Reflection4{ float diffuse; float ambient; float emission; float specular; }; //4つのカラー struct Color4{ float r; float g; float b; float a; }; //UV座標 struct UV{ float u;//u値 float v;//v値 }vec2d; struct Vector4I{ int x; int y; int z; int w; }; //ポリゴンデータ struct Triangle{ Vector3f TriVer; Vector3f TriNor; UV TriUV; }Tri; //ポリゴンデータ struct Quadrangle{ Vector3f QuadVer; Vector3f QuadNor; UV QuadUV; }Quad; //マテリアル構造体 struct MATERIAL{ int MaterialID;//ID string MaterialName;//マテリアル名 Color4 Color;//カラー Reflection4 ReflectionColor;//反射 float Power;//shiness string TextureName;//テクスチャ名 }mtl; //モデルクラス class MODEL{ protected bool LoadMaterialFromFile(char* FileName);//マテリアルロード vector Triangle Tridata; vector Quadrangle Quaddata; public MODEL(); MODEL(char* FileName);//コンストラクタ bool OBJ_Load(char* FileName);//ロード void Draw(); }; MODEL MODEL(){ } MODEL MODEL(char* FileName){ OBJ_Load(FileName); } void MODEL Draw(){ glEnableClientState(GL_VERTEX_ARRAY); glEnableClientState(GL_NORMAL_ARRAY); if(Tridata.size() 1){ glVertexPointer(3, GL_FLOAT,sizeof(Tri) , Tridata[0].TriVer.x); glNormalPointer(GL_FLOAT,sizeof(Tri), Tridata[0].TriNor.x); glDrawArrays(GL_TRIANGLES,0,Tridata.size()); } if(Quaddata.size() 1){ glVertexPointer(3, GL_FLOAT,sizeof(Quad) , Quaddata[0].QuadVer.x); glNormalPointer(GL_FLOAT,sizeof(Quad), Quaddata[0].QuadNor.x); glDrawArrays(GL_QUADS,0,Quaddata.size()); } glDisableClientState(GL_VERTEX_ARRAY); glDisableClientState(GL_NORMAL_ARRAY); } //OBJファイル読み込み bool MODEL OBJ_Load(char* FileName){ Vector4I Face[3];//一時代入用 vector Vector3f Vertex;//頂点 vector Vector3f Normal;//法線 vector UV uv;//UV vector unsigned int TriVerID; vector unsigned int TriNorID; vector unsigned int TriUVID; vector unsigned int QuadVerID; vector unsigned int QuadNorID; vector unsigned int QuadUVID; char key[255]={0}; //OBJファイルを開いて内容を読み込む FILE* fp=NULL; fopen_s( fp,FileName, rt ); //読み込み fseek(fp,SEEK_SET,0); while(!feof(fp)) { //キーワード ZeroMemory(key,sizeof(key)); fscanf_s(fp, %s ,key,sizeof(key)); //マテリアル if(strcmp(key, mtllib )==0){ fscanf_s(fp, %s ,key,sizeof(key)); LoadMaterialFromFile(key); } //頂点 if(strcmp(key, v )==0){ fscanf_s(fp, %f %f %f , vec3d.x, vec3d.y, vec3d.z); Vertex.push_back(vec3d); } //法線 if(strcmp(key, vn )==0){ fscanf_s(fp, %f %f %f , vec3d.x, vec3d.y, vec3d.z); Normal.push_back(vec3d); } //テクスチャ if(strcmp(key, vt )==0){ fscanf_s(fp, %f %f , vec2d.u, vec2d.v); uv.push_back(vec2d); } //面のインデックス 0=頂点 1=UV 2=法線 if(strcmp(key, f )==0){ Face[0].w=-1; Face[1].w=-1; Face[2].w=-1; fscanf_s(fp, %d/%d/%d %d/%d/%d %d/%d/%d %d/%d/%d , Face[0].x, Face[1].x, Face[2].x, Face[0].y, Face[1].y, Face[2].y, Face[0].z, Face[1].z, Face[2].z, Face[0].w, Face[1].w, Face[2].w); if((Face[0].w == -1) (Face[1].w == -1) (Face[2].w == -1)){ //三角面 TriVerID.push_back(Face[0].x-1); TriVerID.push_back(Face[0].y-1); TriVerID.push_back(Face[0].z-1); TriUVID.push_back(Face[1].x-1); TriUVID.push_back(Face[1].y-1); TriUVID.push_back(Face[1].z-1); TriNorID.push_back(Face[2].x-1); TriNorID.push_back(Face[2].y-1); TriNorID.push_back(Face[2].z-1); }else{ //四角面 QuadVerID.push_back(Face[0].x-1); QuadVerID.push_back(Face[0].y-1); QuadVerID.push_back(Face[0].z-1); QuadVerID.push_back(Face[0].w-1); QuadUVID.push_back(Face[1].x-1); QuadUVID.push_back(Face[1].y-1); QuadUVID.push_back(Face[1].z-1); QuadUVID.push_back(Face[1].w-1); QuadNorID.push_back(Face[2].x-1); QuadNorID.push_back(Face[2].y-1); QuadNorID.push_back(Face[2].z-1); QuadNorID.push_back(Face[2].w-1); } } } for(int i=0;i (signed)TriVerID.size();i++){ Tri.TriVer=Vertex[TriVerID[i]]; Tri.TriNor=Normal[TriNorID[i]]; Tri.TriUV=uv[TriUVID[i]]; Tridata.push_back(Tri); } printf( %d ,Tridata.size()); for(int i=0;i (signed)QuadVerID.size();i++){ Quad.QuadVer=Vertex[QuadVerID[i]]; Quad.QuadNor=Normal[QuadNorID[i]]; Quad.QuadUV=uv[QuadUVID[i]]; Quaddata.push_back(Quad); } Vertex.clear(); Normal.clear(); uv.clear(); TriVerID.clear(); TriNorID.clear(); TriUVID.clear(); QuadVerID.clear(); QuadNorID.clear(); QuadUVID.clear(); return true; } bool MODEL LoadMaterialFromFile(char *FileName){ return true; } main.cpp #pragma comment(linker, /SUBSYSTEM WINDOWS /ENTRY mainCRTStartup ) #pragma comment(lib, glew32.lib ) #include gl/glew.h #include GL/freeglut/freeglut.h #include OBJ.h #define WIDTH 320 #define HEIGHT 240 float angle=0.0f; MODEL* model; void display(void) { glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); glViewport(0,0,WIDTH,HEIGHT); glMatrixMode(GL_PROJECTION); glLoadIdentity(); gluPerspective(30.0, WIDTH/HEIGHT, 0.1, 2000.0); glMatrixMode(GL_MODELVIEW); glLoadIdentity(); gluLookAt(0.0, 0.0, 1500.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0); glRotatef(angle,1.0f,0.0f,0.0f);//回転 glRotatef(angle,0.0f,1.0f,0.0f);//回転 model- Draw(); glutSwapBuffers(); } void idle(void) { angle+=2.0f; Sleep(1); glutPostRedisplay(); } void Init(){ glewInit(); glClearColor(0.0, 0.0, 0.0, 1.0); glEnable(GL_BLEND); glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); glEnable(GL_DEPTH_TEST); glEnable(GL_LIGHT0); glEnable(GL_LIGHTING); glEnable(GL_CULL_FACE); glCullFace(GL_BACK); model = new MODEL( box.obj ); } int main(int argc, char *argv[]) { glutInitWindowPosition(100, 100); glutInitWindowSize(WIDTH, HEIGHT); glutInit( argc, argv); glutInitDisplayMode(GLUT_RGBA | GLUT_DOUBLE); glutCreateWindow( OBJローダ ); glutDisplayFunc(display); glutIdleFunc(idle); Init(); glutMainLoop(); return 0; }
https://w.atwiki.jp/vsotogi/pages/218.html
戦士の世界 スタミナ：16 バトル数：5 経験値の目安：5349 クリア時の絆報酬 報酬がもらえる確率は、デッキに組まれているオトギで一番絆をもってるオトギの絆値が当たる確率として適用される（合計値ではないので注意） 報酬が当たった場合は、以下の中から絆報酬が選ばれる（100%の絆値をもったオトギがデッキに入ってると報酬は2個もらえる） 素材：火炎の花 ， 聖水の花 ， 疾風の花 オトギ ：御影石・火 中 ， 御影石・水 中 ， 御影石・風 中 ， 御影石・金 中 チケット：なし バトル1 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_30300.png ケット・シー 水 36000 3700 852 1 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5% face_30470.png 比丘尼 火 15000 3600 85 1 比丘尼 20% face_30480.png ノッカー 風 78000 4000 2900 1 疾風の花×1 15%疾風の果実×1 10%疾風の結晶×1 5% バトル2 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40340.png セブンゴート 火 32000 4800 2500 2 火炎の花×1 15%火炎の果実×1 10%火炎の結晶×1 5% face_40030.png フランケンシュタイン 火 40800 6800 910 2 ピエロ・水 10% バトル3 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40030.png フランケンシュタイン 火 40800 6800 910 2 ピエロ・水 10% face_30300.png ケット・シー 水 58000 6200 2900 3 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5% バトル4 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40260.png フェアリー 風 125000 3300 900 1 ピエロ・風 10% face_30300.png ケット・シー 水 58000 6200 2900 3 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5% face_40340.png セブンゴート 火 32000 4800 2500 2 火炎の花×1 15%火炎の果実×1 10%火炎の結晶×1 5% バトル5 パターン1(全1パターン) 出現確率 100% オトギ 属性 HP 攻撃 防御 ターン 優先ドロップ（サブドロップは同属性葉っぱとサボテン） face_40060.png ウィッチ 水 100000 6100 850 2 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5% face_30300.png ケット・シー 水 58000 6200 2900 3 聖水の花×1 15%聖水の果実×1 10%聖水の結晶×1 5% face_40260.png フェアリー 風 125000 3300 900 1 ピエロ・風 10%
https://w.atwiki.jp/angel_face/
@wikiへようこそ ウィキはみんなで気軽にホームページ編集できるツールです。 このページは自由に編集することができます。 メールで送られてきたパスワードを用いてログインすることで、各種変更（サイト名、トップページ、メンバー管理、サイドページ、デザイン、ページ管理、等）することができます まずはこちらをご覧ください。 @wikiの基本操作 用途別のオススメ機能紹介 @wikiの設定/管理 分からないことは？ @wiki ご利用ガイド よくある質問 無料で会員登録できるSNS内の@wiki助け合いコミュニティ @wiki更新情報 @wikiへのお問合せフォーム 等をご活用ください @wiki助け合いコミュニティの掲示板スレッド一覧 #atfb_bbs_list その他お勧めサービスについて 大容量１Ｇ、PHP/CGI、MySQL、FTPが使える無料ホームページは@PAGES 無料ブログ作成は@WORDをご利用ください 2ch型の無料掲示板は@chsをご利用ください フォーラム型の無料掲示板は@bbをご利用ください お絵かき掲示板は@paintをご利用ください その他の無料掲示板は@bbsをご利用ください 無料ソーシャルプロフィールサービス @flabo(アットフラボ) おすすめ機能 気になるニュースをチェック 関連するブログ一覧を表示 その他にもいろいろな機能満載！！ @wikiプラグイン @wiki便利ツール @wiki構文 @wikiプラグイン一覧 まとめサイト作成支援ツール バグ・不具合を見つけたら？ 要望がある場合は？ お手数ですが、メールでお問い合わせください。