2020年5月10日

關(guān)于本腳本的相關(guān)最新內(nèi)容已移步更新文章中，請(qǐng)查看。
最后更新

另外如果點(diǎn)過去找不到文章落竹，多半是被鎖了。簡(jiǎn)book已經(jīng)鎖了我不少文章了货抄。那就沒辦法了述召。我已退出此評(píng)論朱转，不用發(fā)私信因?yàn)橛貌涣藖砹R我了，我看不到积暖。

寫程序累腦袋藤为，寫材料累心夺刑。今天弄了一天窿吩，累的我想睡覺。
學(xué)習(xí)##強(qiáng)國(guó)v.3版本错览，別問我v.2去哪了轧邪，我忘了我v.2寫了些啥了忌愚。目前相對(duì)前面版本，升級(jí)了自動(dòng)分享功能简十；用變量開關(guān)實(shí)現(xiàn)對(duì)自動(dòng)評(píng)論、自動(dòng)分享等子功能的分離胰默，即可以選擇快關(guān)自動(dòng)評(píng)價(jià)呵自動(dòng)分享。加了限次計(jì)數(shù)碟刺，讓評(píng)論和分享次數(shù)可控爽柒，防止刷屏。

我是更新的分割線

嘛心墅，一直寫的很隨意怎燥，想的反正也沒人看，自己當(dāng)記錄一寫就行了隐绵，結(jié)果總有人問怎么用……

我寫的腳本都沒有適配多設(shè)備，也沒有寫UI界面峭跳，腳本使用最好和我測(cè)試的平臺(tái)貼近——使用夜神模擬器、平板版本滞欠、分辨率1280*720逸绎，學(xué)習(xí)強(qiáng)國(guó)版本2.1.2,巫糙。
腳本中的參數(shù)
yosepinci是評(píng)論開關(guān)，1為開，0為關(guān)；
fengxinag是自動(dòng)分享開關(guān)卵惦，同上；
b和d分別是限制評(píng)論和分享的次數(shù)的，請(qǐng)?jiān)凇癰<5”“d<5”那里更改次數(shù)庸疾；
隨機(jī)評(píng)論內(nèi)容我反正只寫了幾個(gè)，想加內(nèi)容的同學(xué)自己加忿偷，最好使用“祖國(guó)美好”“中國(guó)前進(jìn)”等等萬金油評(píng)論金顿，在哪評(píng)論都不出問題。

以上鲤桥，更新于2019年7月4日

Delay 2000
Dim screenX,screenY,deviceID,first=25
screenX = GetScreenX()
screenY = GetScreenY()
deviceID = GetDeviceID()
TracePrint ""&screenX&"*"&screenY&chr(10)
call messagebox ("御坂腳本茶凳，啟動(dòng)嫂拴！")

Dim yisepinci,fengxiang,i,b,d,c//如果為1則執(zhí)行評(píng)價(jià)功能,b為設(shè)置評(píng)論次數(shù)//
yisepinci = 1
fengxiang = 1
b = 1
d = 1
Touch 1239,365, 100//點(diǎn)中間學(xué)習(xí)圖標(biāo)//
Delay 1000
Touch 147,375, 100//再點(diǎn)推薦//
Delay 1000
While first>0
    call messagebox ("準(zhǔn)備點(diǎn)擊文章")
    TracePrint "準(zhǔn)備點(diǎn)擊文章"
    Call dianwen()
    first = first - 1
    TouchDown 1010,350,1
    TouchMove 500,370,1,400
    TouchUp 1
    Delay 3000
Wend
//----------------//
Sub dianwen()
    

    Touch 631,345, 100//點(diǎn)擊文章，進(jìn)入文章//
    Delay 1000
    TracePrint "進(jìn)入文章"http://進(jìn)入文章內(nèi)部后慢慢下滑10S，點(diǎn)擊收藏，點(diǎn)擊評(píng)論歸零儡循，長(zhǎng)按第一個(gè)評(píng)論舶吗，復(fù)制，點(diǎn)擊择膝，粘貼腹侣，發(fā)布，點(diǎn)擊左上角返回//
    call messagebox ("進(jìn)入文章")
    Delay 1000
    call messagebox ("下滑10次")
    TracePrint "緩慢下滑10次"
    For i = 1 To 10 Step 1//緩慢下滑10次//
        TouchDown 1013,366, 1
        TouchMove 643,371, 1, 400
        TouchUp 1
    call messagebox ("滑動(dòng)一次")
        Delay 2000
    Next
    call messagebox ("點(diǎn)擊收藏")
    Touch 1244,113, 100
    Delay 1000
    If yisepinci = 1 And b < 5 Then 
        Call pingjia()
        b=b+1
    End If
    Delay 1000
    If fengxiang = 1 And d < 5 Then 
        Call fx()
        d=d+1
    End If
    call messagebox ("返回主界面")//返回主界面齿穗，完成一次文章查看//
    Touch 76,676, 100
    Delay 2000

    
End Sub

//----------------//
Sub messagebox(box)
    TracePrint box
    ShowMessage box
    Delay 1500
End Sub

//---評(píng)價(jià)子程序---//
Sub pingjia()
    

    call messagebox ("點(diǎn)擊評(píng)論傲隶，回到第一個(gè)評(píng)論位置")
    Touch 1249,207, 100
    Delay 1000
    call messagebox ("點(diǎn)擊輸入框，獲得光標(biāo)")
    Touch 1249,500, 100
    Delay 1000
    c = Int((5 - 1+1) * Rnd() + 1)//產(chǎn)生一個(gè)5至1之間的隨機(jī)數(shù)//
    Select Case c//判斷隨機(jī)數(shù)//
    Case 2
        InputText "變則通窃页，通則變跺株，改變方式，提升效益脖卖，創(chuàng)新引領(lǐng)中國(guó)發(fā)展乒省！"http://情況1
    Case 3
        InputText "根植歷史，放眼未來畦木，創(chuàng)建美麗文明中國(guó)袖扛！"http://情況2
    Case 4
        InputText "友誼天長(zhǎng)地久，加強(qiáng)交流十籍，增加合作蛆封，共同創(chuàng)新，共建未來妓雾！"http://情況2
    Case 5
        InputText "開放娶吞，包容垒迂，建設(shè)人類命運(yùn)共同體的光明前景械姻！"http://情況2
    Case Else
        InputText "祝愿祖國(guó)目前繁榮昌盛，國(guó)泰民安！"http://否則
    End Select
    Delay 1000
    call messagebox ("點(diǎn)擊發(fā)表")
    Touch 1167,53, 100
    Delay 1000
    
End Sub

//---分享子程序---//
Sub fx()
    
    messagebox ("點(diǎn)擊分享")//點(diǎn)擊分享楷拳，點(diǎn)分享到學(xué)習(xí)強(qiáng)國(guó)绣夺，點(diǎn)擊群，點(diǎn)發(fā)送//
    Touch 1244,50, 100
    Delay 1000
    messagebox ("點(diǎn)分享到學(xué)習(xí)強(qiáng)國(guó)")//點(diǎn)分享到學(xué)習(xí)強(qiáng)國(guó)//
    Touch 880,633, 100
    Delay 1000
    messagebox ("點(diǎn)擊群")//點(diǎn)擊群//
    Touch 470,355, 100
    Delay 1000
    messagebox ("點(diǎn)發(fā)送")//點(diǎn)發(fā)送欢揖，坐標(biāo)未確定//
    Touch 775,145, 100
    Delay 2000
    
End Sub