counter=0 Thread Aの処理() print "メイン" cnt = "1, 2, 3, 4, 5, 6, 7, 8, 9, 10" for i = 1 to 10 print Token(", ", cnt, True) Sleep(1) next procedure Aの処理() fend Thread Aの処理() for i = 1 to 10 Fukidasi("スレッド " + i) Sleep(1) next procedure Aの処理() fend While TRUE Sleep(1) counter= counter+1 If counter MOD 60 =0 Then Thread Aの処理 If counter MOD 120 =0 Then Thread Aの処理 If counter MOD 120 =0 Then counter= 0 Wend
