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


HSPTV!掲示板


未解決 解決 停止 削除要請

2010
1106
eggstrmidでエラーが出ますが解決方法わからず4解決


egg

リンク

2010/11/6(Sat) 02:27:52|NO.35685

#include "hspext.as"
#include "hsp261cmp.as"
title "dircsv ver0.1"
wx=800:wy=600
screen 0,wx,wy
cls
gsel 0,1
sdim work,1024
sdim tmp,1024
sdim tools,256
sdim opt1,1024
sdim opt2,1024
sdim sname,1024
tools=curdir
work=curdir+"\\txt\\"
htmld=curdir+"\\html\\data\\"
htmltagd=curdir+"\\html\\"
taglistd=curdir+"\\tag\\"
opt1=""
opt2=""

objmode 1,1
objsize 380,24

strlen a,work
peek a,work,a-1
chdir work
dirlist2h 1,','
dirlist2 a,"*.*", 0, '\\'
sdim ftmp,a
dirlist2r ftmp
strlen fs,ftmp
sname=tools+"\\dir.txt"
bsave sname,ftmp,fs


notesel texb
noteload sname,-1
sdim taglist,500,100000
tagc=0
XXX=noteinfo(0)
chdir htmld
repeat XXX
notesel texb
noteget tn,cnt
gosub *makehtml
loop
stop


*makehtml
fname=work+"\\"+tn
fnameb=work+tn
sdim htmltext
htmltext+="<HTML>"
notesel texc
noteload fname,-1
noteget tdai,0
noteget ttag,1
GYO=noteinfo(0)
repeat GYO-9
noteget ttext,10+cnt
htmltext+=ttext+"<BR>"
loop
htmltext+="</HTML>"
mes dir_cur

mes fnameb

strlen zzz,tn
sdim tnn
tnn=strmid(tn,0,zzz-4)
tnn+=".html"
notesel htmltext
notesave tnn
return

これを実行しようとすると
#HSP script preprocessor ver3.21 / onion software 1997-2010(c)
#Use file [hspdef.as]
#Error:no default parameter in line 72 [hs.hsp]
#Fatal error reported.
と表示されて動きません。
いったい何が悪いんでしょうか?



この記事に返信する


info

リンク

2010/11/6(Sat) 06:28:59|NO.35686

 "hsp261cmp.as" を #include した状態で、strmid が 関数形にしているため、エラーが起こるようです。
 (自分は hsp3 から始めたので、詳しいことはよくわかりませんが。)


 tnn = strmid(tn,0,zzz-4)
から

 strmid tnn,tn,0,zzz-4

に変えると、「そのエラー」はとりあえず回避できるようです。



egg

リンク

2010/11/6(Sat) 06:53:05|NO.35687

hsp261cmp.asって2.X互換のスクリプトを通す機能だったのですか
迂闊でした
ありがとうございました



damage

リンク

2010/11/6(Sat) 11:07:06|NO.35688

>hsp261cmp.asって2.X互換のスクリプトを通す機能だったのですか
違います。



DoubleQuote

リンク

2010/11/11(Thu) 18:44:19|NO.35744

>互換のスクリプトを通す機能だったのですか

この意味がよく分からないのですが、互換モードにさせるときに使うモノです。
詳しくはこちらをご覧下さい

FAQ
http://hsp.tv/make/faq.html#f8



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