HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2008
1115
(投稿者削除)4未解決


リンク

2008/11/15(Sat) 12:58:57|NO.20800

この記事は投稿者により削除されました。
2008/11/15(Sat) 13:04:15



この記事に返信する


リンク

2008/11/15(Sat) 13:00:05|NO.20801

ちょっと間違いました
sa=strlen(data)
bsave "save.txt",data,sa



SYAM

リンク

2008/11/15(Sat) 14:10:23|NO.20802


用件はいったい…??



f(浮気中)

リンク

2008/11/15(Sat) 17:29:34|NO.20807

俺のエスパーとしての能力を使った感じでは、答えはこうだな!!



#module "mDAY" dim t , 12 : sdim day , 10 , 7 #deffunc mday_init t = 0,3,2,5,0,3,5,1,4,6,2,4 day = "日" , "月" , "火" , "水" , "木" , "金" , "土" return #defcfunc leapyear int yy ret = 0 : y = yy if y \ 4 = 0 and y \ 100 != 0 : ret = 1 if y \ 400 = 0 : ret = 1 return ret #defcfunc dayofweek int yy , int mm , int dd y = yy : m = mm : d = dd : y -= m < 3 return ( y + (y / 4) - ( y / 100 ) + ( y / 400 ) + T( m - 1 ) + d ) \ 7 #defcfunc weekno int ww if ww < 0 or ww > 6 :return "" return day( ww ) #defcfunc dayofweekname int yy , int mm , int dd return weekno( dayofweek( yy , mm , dd ) ) #global mday_init data = "2008年11月15日 は " + dayofweekname(2008,11,15) + "曜日デス。" sa =strlen( data ) bsave "save.txt" , data , sa



Kpan

リンク

2008/11/15(Sat) 18:19:33|NO.20808

テキストファイルを出力したいならnote〜命令を使いましょう。


notesel buf noteadd "ちょっと間違いました\nsa=strlen(data)\nbsave \"save.txt\",data,sa" notesave "save.txt" mes "by え ("+strsize+" バイト)



ONION software Copyright 1997-2021(c) All rights reserved.