[システム]プログラム言語など学習スレ[初心者]

科学 ◆3Zqk5DmAz2 · 04/08/22 09:52

自分でシステムを検証できるようになるように初歩から
プログラミングやExcelを学んでいこう、というスレです。

**プログラム初心者** · 2008/03/08(土) 11:34:51

まず、スレ違いならすみませんm(_ _)m

最近とあるサイトでマクロを見つけ自分でも解析や改造、自作などが
できるようになりたいと思いましたがプログラムに関する知識がほとんどありません。
そこでご指導頂きたいのですが↓のプログラムが何と言う言語で出来ていて
どこの変数をどういじると何が変わるのか、またこのマクロを使うにあたって
勉強した方が良いお勧めのサイトや書籍などを教えて下さい。

↓某サイトからのコピペ

**プログラム初心者** · 2008/03/08(土) 11:38:27

１．一定時間ごとにエサやりしているとサーバログでバレるので
　　一定範囲のランダム秒でエサやり
２．他のウインドウで作業していても自動的にウィンドウを切り替えて
　　エサやりする
３．エサやりする１０秒前に別スレッドにて予告カウントダウンが出るので
　　自動的にウインドウが切り替わるタイミングが分かる
４．エサやりするウィンドウ名を指定するので
　　ちょっと改変すれば多窓対応可能
５．どれだけエサやりしたかログが残る
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
//　●使用上の注意
//　　　１．あらかじめ以下のキー設定をしておく事
//　　　　　　　Ｆ１・・・エサをセット
//　　　　　　　Ｆ２・・・育てるペットをセット
//　　　２．ペットのＨＰは満タンにしてからマクロを実行する事
//　　　３．エサ数、待ち時間の設定はきちんと確認する事

DosCmd("DEL TEST.LOG")
OPTION LOGLINES= 100000　 // ログ出力行数を変更
OPTION LOGPATH= TEST.LOG　// ログ出力を変更

LOGPRINT (TRUE)
PRINT ("▼▼▼　マクロ開始　▼▼▼")
//育成パラメータ設定（毎回設、定確認すること）
フリフName = "廃人乙"　 //コントロールするＩＤ名
エサ数 = 14000　　　　　　　　　　//手持ちのエサの数を設定する
最小待ち時間 = 100　　　　　　　　//エサやりの間隔（最小）
最大待ち時間 = 300　　　　　　　　//エサやりの間隔（最大）

**プログラム初心者** · 2008/03/08(土) 11:39:24

//フリフウインドウ選択
フリフID =GETID(フリフName,"D3D Window")
MMV(638,10,15)
ACW(フリフID,0,0,1280,980,0)
//BTN(LEFT,CLICK,638,10,100)
Sleep(2)

Ifb MSGBOX( "ペットを出現させますか？", BTN_YES or BTN_NO,,,BTN_YES) = BTN_YES THEN
　　//Ｆ２キー押す（ペット出現）
　　BTN(LEFT,CLICK,745,954,100)
EndIf

//算出されるパラメータ
エサ消費範囲 = (最大待ち時間 - 最小待ち時間) / 2　//エサやりの変動幅
エサ消費基点 = 最小待ち時間 / 2　　　　　　　　　 //エサやりの最低個数

残りエサ数 = エサ数

While 残りエサ数 > 1
　　消費エサ = RANDOM(エサ消費範囲) + エサ消費基点
　　待ち時間 = 消費エサ * 2
　　PRINT ("消費エサ／待ち時間＝ " + 消費エサ + "／" + 待ち時間 )

　　警告カウント = 10
　　//えさやり時間を待つ（何秒か前に警告吹き出し表示）
　　Sleep(待ち時間 - 警告カウント )
　　//えさやり時間を別スレッドで表示する
　　Thread カウントダウン(警告カウント)
　　Sleep(警告カウント)