KLogS

Key Logging System (KLogS)

1197240
These programs are all free. You may use them without any permission. When you want to cite these programs, you may cite them as follows:

Sugiura, M. (2014) KLogS [Computer software]. Retrieved from http://sugiura-ken.org/wiki/wiki.cgi/exp?page=KLogS

Sugiura, M., Abe, D. and Eguchi, A. (2014) How to extract multi-word expressions as production units: a comparative study of pause threshold formulae for SLA research. Conceptual Structure, Discourse, and Language 12. Santa Barbara, CA, U.S.A.
(https://www.researchgate.net/publication/279456533_How_to_Extract_Multi-Word_Expressions_as_Production_Units_A_Comparative_Study_of_Pause_Threshold_Formulae_for_SLA_Research)

 キーボード入力の記録システム

KLogS 008（指示は別紙で示す版）

• 指示を別紙に書いて（もしくは口頭で）説明し、ライティングを行ってもらうようにプログラムを修正。(008) (2014-09-09)
  • プログラムを開始し、タイピング速度を測った後で、英文エッセイのテーマと制限時間を伝える。

klogs008.hsp(565)
klogs008.exe(593)

e-KLogS（KLogS 008 English version） (2014-10-28)

klogs008e.hsp(501)
e-KLogS008.exe(606)

KLogS 007 （指示および制限時間をプログラム中に書き込む版）

• 以下はプログラムの中に、英文エッセイのテーマと、制限時間を書き込むバージョン(007)（2014-08-08 ver.7公開）

klogs007.hsp(532)
klogs007b.exe(605)

 参考情報

• HSP命令講座 <onkey命令>
  • http://lhsp.s206.xrea.com/command/onkey.html
• HSPのTips:HSPキーコード表
  • http://quasiquote.org/hspwiki/HSP%25A4%25CETips:HSP%25A5%25AD%25A1%25BC%25A5%25B3%25A1%25BC%25A5%25C9%25C9%25BD
• 文字列の置換モジュール sreplace.hsp
  • http://hspdev-wiki.net/?String%2F%C3%D6%B4%B9
  • これをスクリプトの先頭で #include "sreplace.hsp" しておく

 プロトタイプ版

klogs001a.hsp(840)

; Key Logging System (KLogS) 001a
; copyleft 2011-05-15 sugiura@nagoya-u.jp

instruction = "Write what you want in 60 minutes without looking up dictionaries."


*prep

	notesel rogu

	kakikomi = ""

	pos 30, 50
	mes instruction

	pos 30, 100
	mesbox kakikomi, 540, 250, 1, 0

	button goto "Finish", *owari

*main

	repeat
		onkey gosub *kiroku
		await
	loop
	
	stop


*owari
	noteadd "---------------"
	noteadd kakikomi
	notesave "writinglog.txt"
	end
	
*kiroku
	jikan = str(gettime(4)*3600000 + gettime(5)*60000 + gettime(6)*1000 + gettime(7))
	moji =  "\t" + strf("%c", iparam)
	noteadd jikan + moji
	return