W$[0]="日" W$[1]="月" W$[2]="火" W$[3]="水" W$[4]="木" W$[5]="金" W$[6]="土" DTREAD OUT Y,M,D,W PRINT "今日は"+W$[W]+"曜日です。" というような感じで。