UWSC げん玉で毎日自動的におこづかいを入手する簡単な方法

げん玉に登録してください

UWSCスクリプトを実行する

毎日ログインし、以下を実行してください。
毎日おこづかいが得られます♪
[java]
try

IE = GETACTIVEOLEOBJ(“InternetExplorer.Application”)

atags = IE.document.getElementsByTagName(“a”)

for i = 0 to atags.length – 1
if “http://www.gendama.jp/forest/” = atags.item(i).href then
atags.item(i).click()
BusyWait(IE)
break
endif
next

image_list = IE.Document.Images

for i = 0 to image_list.length – 1

// 詳しく見て1ポイント(forest_bt1.gif)
if pos(“forest_bt1.gif”, image_list.item(i).src) > 0 then
image_list.item(i).click()
BusyWait(IE)
endif

// 毎日必ず1ポイント(bt_day1.gif)
if pos(“bt_day1.gif”, image_list.item(i).src) > 0 then
image_list.item(i).click()
BusyWait(IE)
endif

// 5ポイント(star.gif)
if pos(“star.gif”, image_list.item(i).src) > 0 then
image_list.item(i).click()
BusyWait(IE)
endif
next

except
msgbox(TRY_ERRLINE + “　” + TRY_ERRMSG)
ENDTRY

Procedure BusyWait(ie)

Sleep(0.5) // Wait
Const TIME_OUT = 300
tm = Gettime()
repeat
Sleep(0.3)
ifb Gettime() – tm > TIME_OUT
// MsgBox(“Time Out:BusyWait”)
ExitExit
endif
until (! ie.busy) and (ie.readyState=4)
Sleep(0.5)

Fend
[/java]