Error番号13は、「画像ファイルがありません」ですね。
とりあえず確認すべき点は、
・読み込もうとしているファイルが存在しているか?
・あるいはファイルの場所の指定が正しいか?
ですね。
こんな感じで確認してみてください。
file1 = "画像1.bmp"
file2 = "画像2.bmp"
file3 = "画像3.bmp"
exist file1 : if strsize<0 : dialog "1ファイルが存在しません。"
exist file2 : if strsize<0 : dialog "2ファイルが存在しません。"
exist file3 : if strsize<0 : dialog "3ファイルが存在しません。"
m = "カレントディレクトリ:" + dir_cur + "\n"
m += file1 + "\n" + file2 + "\n" + file3
pos 0, 100
mesbox m, ginfo_winx, 100
pos 0, 0 : picload file1, 1
pos 20, 20 : picload file2, 1
pos 40, 40 : picload file3, 1
しかし何よりもまず、バグを再現できる最小限のスクリプトを作成してみる事が重要です。
質問をするにしても、自分で解決するにしても、これをやらないことには原因の究明ができません。
今バグが出ているスクリプトからいらないところを消しながら実行を繰り返せば出来上がるのでそう難しくはないと思います。
ヒントを小出しにしていくだけではなかなか解決には… ハッ!まさかこの推理大会を楽しんでる?!