09/04/06 22:03:30
もしもN88-BASICをソケット通信対応させたら・・・
10 URL="URLﾘﾝｸ(quote.yahoo.co.jp)"
20 S=Socket(tcp, 0, URL, 80)
30 PRINT "GET ", URL => S
40 WHILE (S => INPUT) > 0)
50 PRINT $0
60 WEND
70 CLOSE(S)
80 END
これを分かりやすいと見るか、分かりにくいと見るか。
それが問題だ。
09/04/06 22:03:30
もしもN88-BASICをソケット通信対応させたら・・・
10 URL="URLﾘﾝｸ(quote.yahoo.co.jp)"
20 S=Socket(tcp, 0, URL, 80)
30 PRINT "GET ", URL => S
40 WHILE (S => INPUT) > 0)
50 PRINT $0
60 WEND
70 CLOSE(S)
80 END
これを分かりやすいと見るか、分かりにくいと見るか。
それが問題だ。