yu-tang

Option Explicit

Public Sub Initialize(args() As Variant)
'
End Sub

yu-tang

なんかファイルがダブって表示されて消せないため（バグ？）、下記に移動しました。

https://gist.github.com/2068750

yu-tang

Scriptish / Greasemonkey User Script for moug

機能

• コード ブロックをシンタックス ハイライト
• twitter ユーザーはアバターを表示
• レス番号を表示 (v0.3-)
• キーボード ショートカット (v0.4-)

yu-tang

#/**************************************************************************
# OmegaT - Computer Assisted Translation (CAT) tool
#          with fuzzy matching, translation memory, keyword search,
#          glossaries, and translation leveraging into updated projects.
#
# Copyright (C) 2000-2006 Keith Godfrey, Maxym Mykhalchuk, and Henry Pijffers
#               2007 Didier Briel, Zoltan Bartko, Martin Fleurke
#               2008 Andrzej Sawula, Alex Buloichik, Didier Briel, Martin Fleurke
#               2009 Didier Briel, Alex Buloichik, Martin Fleurke
#               2010 Didier Briel, Wildrich Fourie, Martin Fleurke,

yu-tang

/*
 *  OmegaT scripting:
 *  Demonstrate to display first glossary entry to custom pane
 *
 * @author  Yu Tang
 * @date    2013-07-07
 * @version 0.2
 */

import java.awt.Component

yu-tang

以下のコードに示す Main プロシージャの実行結果（イミディエイト出力）を答えよ。

''' Class Module: MyService.cls
Option Explicit

Private Sub Class_Initialize()
    Debug.Print "「いらっしゃいませ」（Initialize）"
    Debug.Print "「ご利用を開始します。終了時に所定の手数料を引き落とします」"
End Sub

yu-tang

// demonstrate how to get matches for each entry
// original concept from
// https://libretraduko.wordpress.com/2013/09/10/export-relavant-tus-from-legacy-tmx-files-in-omegat/
// by Kos Ivantsov 2013-09-10
// +
// Some hacks and refactoring
// https://gist.github.com/yu-tang/6526991
// by Yu-Tang
// +
// GUI independence and many improvments taken from

yu-tang

Option Explicit

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _
    Destination As Any, _
    Source As Any, _
    ByVal Length As Long _
)

Private Const ERR_INVALID_PROCEDURE_CALL_OR_ARGUMENT As Long = 5  ' プロシージャの呼び出し、または引数が不正です。
Private Const ERR_SUBSCRIPT_OUT_OF_RANGE             As Long = 9  ' インデックスが有効範囲にありません。

yu-tang

/*
 *  Open segmentation customizer with large font
 *
 * @author  Yu Tang
 * @date    2013-01-31
 * @version 0.2
 */

import java.awt.Component;
import java.awt.event.WindowAdapter;

yu-tang

Option Explicit

Sub JRA_Test01()
Dim req     As WSHttpRequest
Dim proc    As WSProcessReExecute
Dim ret     As Collection
Dim token   As String

' 騎手データ > リーディングの HTML から
' 「浜中 俊」のリンク先トークンを取得（週ごとに変動する模様）