短縮版は… LOCATE 21,16 PRINT MID$("にちげつ　かすいもくきん　ど",D*2,D),"ようび"