'타자게임' 태그의 글 목록

'타자게임'에 해당되는 글 1건

2007.08.07 CShell(C셸)을 이용한 삽질중-_-;(타자삽질프로그램)

CShell(C셸)을 이용한 삽질중-_-;(타자삽질프로그램)

유닉스와 리눅스 2007. 8. 7. 16:52

아이군이 만든 타자크래프트 보고 심심해서 삽질중-_-;

아이군이 만든 타자크래프트도 한번 해봅시다-_-;
자바가 깔려있어야 실행이 됩니다.
http://theeye.pe.kr/typecraft/

폴더에 word1.txt(16단어), word2.txt(32단어), word3.txt(48단어)가 있어야합니다.

word.csh (Language : text)

#!/bin/csh

set words = ( `cat word1.txt` )
set i = 0
set j = 1
set type = 0
set level = 1
set count = 0
@ ii = 4 * $level
@ allcount = $ii * 4

clear
echo -n "[start enter]"
$<
set starttime = `perl -e 'print scalar time(),"\n"'`
echo $starttime

while($level <= 3)
clear
echo "level $level"
while($i < $ii)
while($j <= 4)
@ num = $i * 4 + $j
if ($type == $words[$num]) then
set words[$num] = "-----"
@ count++
endif
echo -n "$words[$num] "
@ j++
end
echo
@ j = 1
@ i++
end
@ i = 0
@ j = 1

if ($count == $allcount) then
set type = ""
@ level++
if ($level == 4) then
clear
echo "all clear"
set endtime = `perl -e 'print scalar time(),"\n"'`
@ cleartime = $endtime - $starttime
echo "clear time $cleartime second"
break
endif
set words = ( `cat word${level}.txt` )
@ count = 0
@ ii = 4 * $level
@ allcount = $ii * 4
else
echo
echo -n "type : "
set type = $<
endif
end

word1.txt (Language : text)

apple
fire
fuck
shit
name
file
print
score
verb
buy
brain
drive
type
path
shot
great