ab.com コミュニティ

ActiveBasicを通したコミュニケーション
現在時刻 - 2024年3月29日(金) 01:20

全ての表示時間は UTC+09:00 です




新しいトピックを投稿する  トピックへ返信する  [ 4 件の記事 ] 
作成者 メッセージ
 記事の件名: ファイル捏造君
投稿記事Posted: 2006年5月03日(水) 23:50 
暇人13世氏のソースを変更。

サイズも変更できるようにしました。

#N88BASIC
Dim A As Long
Dim B As String
Dim C As Long
Dim I As Long
Dim File As String
Dim Kakutyosi As String
Dim File2 As String
Dim Size As DWord
Dim Dummy As String

Print "ダミーデータ作成ソフト1.0"
Print "このソフトはGPLライセンスに基づいて配布されています。"
Print ""

Input "ファイルの拡張子を入力してください。(三文字程度で。)",Kakutyosi
Input "ファイル名を入力してください。",File
Input "ファイルの出力数を入力してください。",A
Input "作成サイズをバイト単位で入力してください。",Size

Print "出力開始します。場合によっては数分かかるかもしれません。"
For I=0 To A-1
File2=File+Str$(I)+"."+Kakutyosi
Open File2 As #1
Field #1,1
Put #1,Size,Dummy
Close #1
Next I

Print "操作が完了しました。"
Sleep(1000)
ExitProcess(0)

プロンプトだと日本語のファイル名が使えないのでN88BASICのほうがよいと思います。


通報する
ページトップ
   
 記事の件名:
投稿記事Posted: 2006年5月04日(木) 00:19 
オフライン

登録日時: 2005年5月31日(火) 17:59
記事: 899
お住まい: 東京都
ちなみにプロンプトでもAlt+全角/半角でIMEがONになります。
MS-DOSのしがらみで未だにほかとのインターフェイスの統一ができていないわけです。


通報する
ページトップ
 記事の件名:
投稿記事Posted: 2006年5月04日(木) 13:55 
知りませんでした。
でもなんか不便ですね。。。


通報する
ページトップ
   
 記事の件名:
投稿記事Posted: 2006年5月15日(月) 14:21 
オフライン

登録日時: 2005年7月25日(月) 13:27
記事: 893
お住まい: 埼玉県東松山市
それはそうとnkenkouさん、この掲示板では「暇人13世」ではなく「konisi」と呼んで頂きたい。

_________________
Website→http://web1.nazca.co.jp/himajinn13sei/top.html
ここ以外の場所では「暇人13世」というHNを主として使用。

に署名を書き換えて欲しいと言われたので暇だしやってみるテスト。


通報する
ページトップ
期間内表示:  ソート  
新しいトピックを投稿する  トピックへ返信する  [ 4 件の記事 ] 

全ての表示時間は UTC+09:00 です


オンラインデータ

このフォーラムを閲覧中のユーザー: なし & ゲスト[10人]


トピック投稿:  可
返信投稿:  可
記事編集: 不可
記事削除: 不可
ファイル添付: 不可

検索:
ページ移動:  
cron
Powered by phpBB® Forum Software © phpBB Limited
Japanese translation principally by ocean