🥇Koolipoistele 7-9 klassi lihtsa Telegrami boti mall Powershellis

Vestluskaaslasega rääkides sain üllatuseks teada, et nende koolis ei õpetata 8.–10. klassis lapsi programmeerima. Ainult Word, Excel ja see on kõik. Ei logo, ei Pascalit, isegi mitte VBA Excelis.

Olin väga üllatunud, avasin interneti ja hakkasin lugema —
Üks profikooli eesmärke on toetada uue põlvkonna kasvatamist, kes vastab informatsioonilise ühiskonna tingimustele oma arengutaseme ja eluviisiga.
See kursus annab võimaluse kinnistada õpilaste teadmisi programmeerimiskeele Pascal põhistruktuuride osas praktikas. (mõnest gümnaasiumi programmist 2017. aastast)

Lõpuks otsustasin kulutada paar tundi ja visandada näide 'kuidas luua lihtne bot — kooliõpilastele'.

Allpool räägin, kuidas kirjutada veel üks lihtne bot Powershellis ja panna see tööle ilma webhookita, avalike IP-de, eraldatud serverite, pilve virtuaalmasinate loomise ja muude sääraste asjadeta — tavalisel kodu PC-l tavalisel Windowsil.

TLDR: Veel üks igav artikkel grammatiliste ja faktivigadega, pole mida lugeda, nalja pole, pilte pole.

Artiklis pole midagi uut, peaaegu kõik, mis on kirja pandud, on juba varem olnud Habras, näiteks artiklites Juhend: Kuidas luua bote Telegramis ja Telegrami bot süsteemiadministraatorile.
Veelgi enam, artikkel on spetsiaalselt liialdatud, et mitte igal korral viidata õpikutele. Tekst ei sisalda mingeid viiteid neljandale bändile, PowerShell Deep Dives'ile või näiteks AWS Well-Architected Framework'i viiele sambale.

Eelseisvas osas võib vahele jätta

Küüniliselt jätame vahele2006. aastal tõi Microsoft välja PowerShell 1.0 tol ajal veel Windows XP, Vista ja 2003 serveri jaoks. Mingil moel asendas see asjad nagu cmd.bat skriptid, vb skriptid, Windows Script Host ja JScript.

Isegi praegu võib PowerShelli käsitleda ainult järgmise sammu eest variandi Logo järel, kuigi kusagil, tõenäoliselt, kasutatakse ikka veel Delphi't (või midagi vanemat), hoolimata asjaolust, et see sisaldab silmusid, klasse, funktsioone, MS GUI kõnesid, integreerimist Gitiga ja nii edasi.

PowerShelli kasutatakse suhteliselt harva, sellega võib kokku puutuda ainult PowerShell Core, VMware vSphere PowerCLI, Azure PowerShell, MS Exchange, Desired State Configuration kaudu, PowerShell Web Access ja veel poole tosinaga harva kasutatavaid programme ja funktsioone. Võib-olla saab tal teine tuul oma loomisega WSL2, aga see pole kindel.

PowerShell'il on ka kolm suurt plussi:

See on suhteliselt lihtne, selle kohta on tohutult kirjandust ja näiteid, isegi vene keeles, näiteks artikkel Foreach — raamatust PowerShell süvitsi — erinevuste kohta () ja {}
See tuleb koos redigerijaga ISE, koos Windowsiga. Seal on isegi mingi siluri olemas.
Seda saab hõlpsasti kutsuda komponente kasutajaliidese loomiseks.

0. Ettevalmistus.

Me vajadme:

Arvutit Windowsiga (mul on Windows 10)
Mingit internetiühendust (näiteks läbi NAT)
Neile, kellel on piiratud juurdepääs Telegramile — installitud ja seadistatud Freegate brauseris, mõnel keerulisemal juhul koos Symple DNS Cryptiga
Töötava Telegrami kliendi olemasolu telefonis
Põhiteadmised — mis on muutujad, massiivid, tsüklid.

Avatud ja läbitud artiklid — Juhend: Kuidas luua bote Telegramis ja Telegrami bot süsteemiadministraatorile

1. Loome järgmise testboti.

Kuna seda teavad kõik ja see on juba olnud, võib selle ka vahele jättaNagu eelnevas artiklis öeldud — Esiteks, Telegrami bot — on see endiselt rakendus, mis töötab teie poolel ja saadab päringud Telegram Bot API-le. Ja API on arusaadav — bot kutsub teatud URL-i parameetritega ja Telegram vastab JSON objekti.

Sellega seotud probleemid: kui mingil kummalisel viisil võtate mõne koodi JSON objektist ja saadate selle täitmiseks (ilma eriliste kavatsusteta) — kood täidetakse.

Loome boti kahe ülaltoodud artikli põhjal, kuid kordame: avame Telegramis kontaktid, otsime @botfather, ütleme talle /newbot, loome boti Botfortest12344321, nimetame selle Mynext1234bot ja saame sõnumi unikaalse võtmega 1234544311:AbcDefNNNNNNNNNNNNN

Hoia võtme turvaliselt ja ära jaga seda!

Edasi saab boti seadistada, näiteks keelata selle lisamise rühmadesse, kuid esimestel sammudel pole see vajalik.

Küsi BotFatherilt «/mybot» ja paranda seadeid, kui midagi ei meeldi.

Taaskord avame kontaktid, leiame @Botfortest12344321 sealt (otsing tuleb alustada @-st), vajutame «alusta» ja kirjutame botile «/Tere robotitele». Sümbol / on kohustuslik, jutumärgid pole vajalikud.
Bot ei vasta loomulikult midagi.

Kontrollime, kas bot on loodud — avame.

api.telegram.org/bot1234544311:AbcDefNNNNNNNNNNNNN/getMe
kus 1234544311:AbcDefNNNNNNNNNNNNN — varasemalt saadud võti,
ja saame rea nagu
{«ok»:true,«result»:{«»}}

Esimene salajane fraas (token) on meil olemas. Nüüd peame saama teada teise salajase numbri - roboti vestluse ID. Iga vestlus, grupp jne on unikaalne ja tal on oma number (mõnikord miinusmärgiga - avatud gruppide jaoks). Selle numbri leidmiseks peame brauseris (kuigi mitte tingimata brauseris, kuid parema arusaamise huvides võib alustada sellest) küsima aadressi (kus 1234544311:NNNNNNNNN on teie token)

https://api.telegram.org/bot1234544311:NNNNNNNNN/getUpdates

ja saama vastuse vormis

{"ok":true,"result":[{"update_id":…,… chat"{"id":123456789

Me vajame täpselt chat_id-d.

Kontrollime, et saame vestlusesse käsitsi kirjutada: kutsub brauserist aadressi

https://api.telegram.org/botteietoken/sendMessage?chat_id=123456789&text="Life is directed motion"

Kui saate vestlusesse sõnumi robotilt - ok, läheb edasi järgmisse etappi.

Nii et (brauseri kaudu) saate alati kontrollida, kus on probleemid - kas te genereerisite lingi valesti, või on midagi sulgemisega ja ei tööta.

Mida tuleb teada, enne kui jätkate lugemist

Telegrammis on mitu tüüpi grupivestlusi (avatud, suletud). Neid vestlusi osade funktsioonid (nt id) erinevad, mis mõnikord põhjustab mõningaid probleeme.

Oletame, et on 2019. aasta lõpp ja isegi meie aja kangelane, laialdaselt tuntud Inimorkester (administraator, jurist, infokaitse ekspert, programmeerija ja praktiliselt MVP) Jevgeni V. eristab muutujat $i massiivist, valdas tsüklid, ja vaatame ehk järgmise paari aastaga õpib ta Chocolatey-t, ja siis jõuab Parallel processing with PowerShell ja ForEach-Object Parallel kuni.

1. Mõtleme, mida meie robot tegema hakkab

Mul ei olnud mingeid ideid, pidin mõtlema. Oleme juba kirjutanud märkmete roboti. Ei tahtnud teha robotit "millel on midagi edastada kuhugi". Azure'i ühendamiseks on vaja krediitkaarti, aga kust selle saab koolipoiss? Tuleb märkida, et asi pole nii halb: suured pilved pakuvad mingit tasuta testperioodi (aga krediitkaardilt võetakse ikkagi dollarit. Ma ei mäleta, kas see tuli hiljem tagasi.)

Ilma AI-ta on ML robotite tegemine vähem huvitav.

Otsustasin teha roboti, mis meenutab mulle (või mitte mulle) inglise sõnu sõnastikust.
Sõnastik, et mitte andmebaasidega jännata, asub tekstifailis ja täiendatakse käsitsi.
Antud juhul on ülesanne näidata töö põhitõdesid, mitte teha vähemalt osaliselt valmistoode.

2. Proovime esimest korda, kuidas ja mida teha

Loome kausta C:poshtranslate
Alustuseks vaatame, mis meil PowerShellis on, ja käivitame ISE'i läbi Käivita
powershell ise
või leiame Powershell ISE installitud programmide hulgast.
Pärast käivitamist avaneb tavaline «mingi redigeerija», kui tekstivälja ei ole, siis saab alati vajutada «Fail — loo uus».

Vaatame PowerShelli versiooni — kirjutame tekstiväljale:

get-host

ja vajutame F5.

PowerShell pakub salvestada — «Skripti, mida kavatsete käivitada, salvestatakse.», nõustume ja salvestame C:poshtranslate faili PowerShellis nimega myfirstbotBT100.

Pärast käivitamist saame alumises tekstiväljas andmete tabeli:

Nimi             : Windows PowerShell ISE Host
Versioon          : 5.1.(jne)

Mul on 5.1 millegagi, seda on piisavalt. Kui sul on vana Windows 7/8, siis pole muret — tuleb ainult PowerShell uuendada versioonile 5 — näiteks, kirjutades juhendis.

Sisestame allolevas käsuviibas Get-Date, vajutame Enter, vaatame aega, ning liigume juurkausta käsuga
cd
ja puhastame ekraani käsuga cls (ei, rm-i ei ole vaja kasutada)

Nüüd kontrollime, mis ja kuidas töötab — kirjutame mitte koodi, vaid kaks rida, ning püüame aru saada, mida need teevad. Kommenteerime välja get-host reakode # sümboliga ja lisame veidi juurde.

# Пример шаблона бота 
# get-host
<# это пример многострочного комментария #>
$TimeNow = Get-Date
$TimeNow

(Huvitav. Koodiformaadipäringu langevas loendis on paar tosinat varianti — kuid PowerShell seal ei ole. Dos on olemas. Perl on olemas.)

Ja käivitame koodi, vajutades F5 või «>» GUI's.

Saame väljundi:

Laupäev, 8. detsember 2019 21:00:50 PM (või midagi sarnast)

Nüüd saame aru nende kahe rea ja mõningate huvitavate hetkede üle, et hiljem sellele tagasi ei tuleks.

Erinevalt Pascalist (ja mitte ainult) üritab PowerShell ise määrata, millist tüüpi andmed muutujatele anda, sellest kirjutatakse rohkem artiklis Algtuntus tüpiseerimisest programmeerimiskeeltes
Seega, muutuja $TimeNow loomisel ja sellele praeguse kuupäeva ja kellaaja määramisel (Get-Date), ei pea me liiga palju muretsema, millist andmetüüpi seal olema hakata.

Kuid sellest teadmatuse tõttu võib hiljem olla kahju, aga see on hiljem. Allpool tekstis on näide.
Vaatame, mida saime. Käivitame (käsuviibas)

$TimeNow | Get-member

ja saame segase teksti lehe

Segase teksti näide number 1

PS C:&gt; $TimeNow | Get-member
   TypeName: System.DateTime
Name                 MemberType     Definition                                                                                                                                       
----                 ----------     ----------                                                                                                                                       
Add                  <b>Method         </b>datetime Add(timespan value)  
..
DisplayHint          NoteProperty   DisplayHintType DisplayHint=DateTime                                                                                                             
Date                 <b>Omadus       </b>datetime Date {get;}                                                                                                                             
Year                 Property       int Year {get;}   
..                                                                                                                               
DateTime             ScriptProperty System.Object DateTime {get=if ((&amp; { Set-StrictMode -Version 1; $this.DisplayHint }) -ieq  "Date")...

Nagu näha, loodi muutuja tüübi Tüüp Nimi: System.DateTime koos hulga meetoditega (mille abil saame seda objekti muutuja kasutada) ja omadustega.

Kutsume välja $TimeNow.DayOfYear — saame aasta päeva numbri.
Kutsume välja $TimeNow.DayOfYear | Get-Member — saame TypeName: System.Int32 ja meetodite rühma.
Kutsume välja $TimeNow.ToUniversalTime() — ja saame aja UTC järgi

Silumine

Mõnikord on vajalik programmi käivitamine teatud reani ja programmi seisundi vaatamine sel hetkel. Selleks on ISE-s funktsioon Debug — toggle break point
Asetage peatamispunkt kuskil keskel, käivitage need kaks rida ja vaadake, kuidas peatamine välja näeb.

3. Teeme tutvust Telegrammi botiga

Loomulikult on botiga suhtlemise, getpush jne kohta kirjutatud veelgi rohkem kirjandust, kuid teooria küsimust saab käsitleda valikuliselt.

Meie puhul on vajalik:

Õppida saatma midagi vestlusesse
Õppida saama midagi vestlusest

3.1 Õpime saatma midagi vestlusesse ja saama sealt tagasi

Veidi koodi — osa 3

Write-output "See on osa 3"
$MyToken = "1234544311:AbcDefNNNNNNNNNNNNN"
$MyChatID = "123456789"
$MyProxy = "http://1.2.3.4:5678" 

$TimeNow = Get-Date
$TimeNow.ToUniversalTime()
$ScriptDir = Split-Path $script:MyInvocation.MyCommand.Path
$BotVersion = "BT102"

$MyText01 = "Elu on suunatud liikumine - " + $TimeNow

$URL4SEND = "https://api.telegram.org/bot$MyToken/sendMessage?chat_id=$MyChatID&text=$MyText01"

Invoke-WebRequest -Uri $URL4SEND

ja Venemaal saame selle asemel vea Unable to connect to the remote server.

Või ei saa — see sõltub sideoperaatorist ja sellest, kas proxy on seadistatud ja töötab.
Noh — peab lisama proxy. Pidage meeles, et krüpteerimata ja suvalise proxy kasutamine on teie tervisele äärmiselt ohtlik.

Töötava proxy leidmine ei ole eriti keeruline — suur osa avaldatud http proxy'dest töötab. Minu puhul töötas vist viies.

Syntax proxy kasutamiseks:

Invoke-WebRequest -Uri $URL4SEND -Proxy $MyProxy

Kui saite sõnumi oma vestlusest botiga — siis kõik on hästi, saate edasi minna. Kui ei — jätkake silumist.

Võite vaadata, milleks teie string $URL4SEND muutub ja proovida seda brauseris küsida, näiteks nii:

$URL4SEND2 = '"'+$URL4SEND+'"'
start chrome $URL4SEND2

3.2 Oleme õppinud kirjutama «midagi» vestlusse, nüüd proovime lugeda

Lisame veel 4 rida ja vaatame, mis seal sees on, kasutades | get-member

$URLGET = "https://api.telegram.org/bot$MyToken/getUpdates"
$MyMessageGet = Invoke-WebRequest -Uri $URLGET -Method Get -Proxy $MyProxy
Write-Host "Get-Member"
$MyMessageGet | Get-Member

Kõige huvitavamat teavet pakub meile

Content           Property   string Content {get;}  
ParsedHtml        Property   mshtml.IHTMLDocument2 ParsedHtml {get;}                                    
RawContent        Property   string RawContent {get;set;}

Vaadakem, mis seal on:

Write-Host "ParsedHtml"
$MyMessageGet.ParsedHtml # siin on huvitav
Write-Host "RawContent"
$MyMessageGet.RawContent # ja siin on huvitav, aga lisaks on see veel ka loetav.
Write-Host "Content"
$MyMessageGet.Content

Kui kõik töötab, saate pika rea, nagu näiteks:

{"ok":true,"result":[{"update_id":12345678,
"message":{"message_id":3,"from":{"id":

Kahjuks oli eelnevas artiklis Telegrami boti kohta see rida (jah, vastavalt $MyMessageGet.RawContent | get-member — see on System.String), juba käsitletud.

4. Töötle saadud (me oskame juba saata midagi)

Nagu juba öeldud siit, kõige olulisem on sisus. Vaatame seda lähemalt.

Esiteks kirjutame botile veel paar lauset veebiliidese või telefoni kaudu

/message1
/message2
/message3

ja vaatame brauseris aadressi, mis on moodustatud muutujas $URLGET.

Näeme midagi sellist:

{"ok":true,"result":[{"update_id":NNNNNNN,
"message":{"message_id":10, .. "text":"/message1"
"message":{"message_id":11, .. "text":"/message2 
"message":{"message_id":12, .. "text":"/message3

Mis see on? Mõni keeruline objekt, mis koosneb objektide massiividest, sisaldades sõnumi unikaalset identifikaatorit, vestluse identifikaatorit, saatmise identifikaatorit ja veel hulgaliselt teavet.

Kuid ei pea me ‘mida see objekt tähendab’ analüüsima - osa tööst on juba meie eest tehtud. Vaatame, mis seal sees on:

Lugege saadud sõnumeid või osa 4

Write-Host "See on osa 4" <# loomulikult ei ole see rida meile lõplikus tekstis vajalik, aga selle järgi on mugav otsida. #> 

$Content4Pars01 = ConvertFrom-Json $MyMessageGet.Content
$Content4Pars01 | Get-Member
$Content4Pars01.result
$Content4Pars01.result[0]
$Content4Pars01.result[0] | Get-Member
$Content4Pars01.result[0].update_id
$Content4Pars01.result[0].message
$Content4Pars01.result[0].message.text
$Content4Pars01.result[1].message.text
$Content4Pars01.result[2].message.text

5. Mis nüüd sellega teha

Salvestame saadud faili nimega myfirstbotBT105 või mis iganes teile rohkem meeldib, muudame pealkirja ja kommenteerime kogu juba kirjutatud koodi läbi

<#start comment 105 end comment 105#>

Nüüd peame otsustama, kust sõnastikku saada (noh, kus - kettal failis) ja milline see välja näeb.

Muidugi, on võimalik täita tohutu sõnastik otse skripti tekstis, aga see pole ju tervislik.
Seega vaatame, millega PowerShell vaikimisi töötada oskab.
Tegelikult ei ole tal vahet, millise failiga töötada, aga meile on see oluline.
Valikuks on meil: txt (võib, aga milleks), csv, xml.
Võime kõik vaadata. Vaatame kõiki.
Loome klassi MyVocabClassExample1 ja muutuja $MyVocabExample1
märgin, et klass kirjutatakse ilma $

veidi koodi #5

write-host "See on osa 5"
class MyVocabClassExample1 {
    [string]$Original  # sõna
    [string]$Transcript
    [string]$Translate
    [string]$Example
    [int]$VocWordID # väga huvitav punkt. int-i kasutamine koos selle piirangutega võib mõnikord viia kummaliste tagajärgedeni, näiteks - hiljutine juhtum SSD HPE-ga. Algul ei pidanud ma seda elementi lisama, kuid lõpuks ikkagi lisasin ja kommenteerisin.
    }

$MyVocabExample1 = [MyVocabClassExample1]::new()
$MyVocabExample1.Original = "Apple"
$MyVocabExample1.Transcript = "[ ˈapəl ]"
$MyVocabExample1.Translate = "Õun"
$MyVocabExample1.Example = "Õun on magus, söödav puuvili, mida toodab õunapuu (Malus domestica)"
# $MyVocabExample1.$VocWordID = 1

$MyVocabExample2 = [MyVocabClassExample1]::new()
$MyVocabExample2.Original = "Pear"
$MyVocabExample2.Transcript = "[ pe(ə)r ]"
$MyVocabExample2.Translate = "Pirn"
$MyVocabExample2.Example = "Pirni (/{ˈpɛər}/) puu ja põõsas on Pyrus'e sugu"
# $MyVocabExample1.$VocWordID = 2

Proovime seda failidesse kirjutada näidise põhjal.

Veidi koodi #5.1

Write-Host $ScriptDir # loodan, et $ScriptDir olete kommenteerinud 
$MyFilenameExample01 = $ScriptDir + "Example01.txt"
$MyFilenameExample02 = $ScriptDir + "Example02.txt"
Write-Host $MyFilenameExample01
Out-File  -FilePath $MyFilenameExample01 -InputObject $MyVocabExample1

Out-File  -FilePath $MyFilenameExample01 -InputObject -Append $MyVocabExample2
notepad $MyFilenameExample01

— ja saame vea rea kohta Out-File -FilePath $MyFilenameExample01 -InputObject -Append $MyVocabExample2.

Ei taha juurde lisada, oh ei, kui kurb.

$MyVocabExample3AsArray = @($MyVocabExample1,$MyVocabExample2)
Out-File  -FilePath $MyFilenameExample02 -InputObject $MyVocabExample3AsArray
notepad $MyFilenameExample02

Vaadakem, mis välja tuli. Imeline tekstiformaat — kuid kuidas seda tagasi eksportida? Kas kasutada mingisuguseid tekstieraldajaid, näiteks komasid?

Ja lõpuks saada "fail eraldajatega — komadega, comma-separated values (CSV)." STOP, OOTAGE.
#

$MyFilenameExample03 = $ScriptDir + "Example03.csv"
$MyFilenameExample04 = $ScriptDir + "Example04.csv"
Export-Csv  -Path $MyFilenameExample03 -InputObject $MyVocabExample1 
Export-Csv  -Path $MyFilenameExample03 -InputObject $MyVocabExample2 -Append 
Export-Csv  -Path $MyFilenameExample04 -InputObject $MyVocabExample3AsArray

Kergesti näha, et MS ei erinenud loogikast, ühes olukorras kasutatakse -FilePath-i, teises aga -Path-i.

Lisaks on kolmandas failis kadunud vene keel, neljandas failis on… noh, midagi on välja tulnud. #TYPE System.Object[] 00
# „Count“,»Length»,«LongLength»,«Rank»,«SyncRoot»,«IsReadOnly»,«IsFixedSize»,«IsSynchronized»
#
Veidi kirjutame ümber:

Export-Csv  -Path $MyFilenameExample03 -InputObject $MyVocabExample1 -Encoding Unicode
Export-Csv  -Path $MyFilenameExample03 -InputObject $MyVocabExample2 -Append -Encoding Unicode
notepad $MyFilenameExample03
notepad $MyFilenameExample04

Tundub, et aitas — aga formaat ei meeldi mulle ikkagi.

Eriti ei meeldi mulle, et ma ei saa objekti ridu faili otse panna.
Üldse, kui juba hakati faile kirjutama – äkki võiks alustada ka logi pidamist? Meil on ju aeg kui muutuv ja faili nimi oskame me määrata.

Kirjutada, tõsi küll, hetkel pole veel millegi kohta, aga võime mõelda, kuidas logide rotatsiooni paremini teha.
Proovime esialgu xml-i.

Natuke xml-i.

$MyFilenameExample05 = $ScriptDir + "Example05.xml"
$MyFilenameExample06 = $ScriptDir + "Example06.xml"
Export-Clixml  -Path $MyFilenameExample05 -InputObject $MyVocabExample1 
Export-Clixml  -Path $MyFilenameExample05 -InputObject $MyVocabExample2 -Append -Encoding Unicode
Export-Clixml  -Path $MyFilenameExample06 -InputObject $MyVocabExample3AsArray
notepad $MyFilenameExample05
notepad $MyFilenameExample06

XML-i ekspordil on puhtalt plussid – loetavus, kogu objekti eksportimine ja ei pea kasutama uppendi täitmist.

Proovime. läbi lugeda xml-fail..

Natuke lugemist xml-ist.

$MyFilenameExample06 = $ScriptDir + "Example06.xml"
$MyVocabExample4AsArray = Import-Clixml -Path $MyFilenameExample06
# $MyVocabExample4AsArray 
# $MyVocabExample4AsArray[0]
# ja natuke täiesti mitteilmsete nüansside kohta. Powershell käitub aeg-ajalt mitte nii, nagu võiks eeldada.
# näiteks on mul need kaks väljundit erinevad.
# Write-Output $MyVocabExample4AsArray 
# write-host $MyVocabExample4AsArray

Naaseme ülesande juurde. Proovifail on kirjutatud, loetud, salvestamise formaat on arusaadav, vajadusel võib kirjutada eraldi väikese faili redaktori ridade lisamiseks ja kustutamiseks.

Tuletan meelde, et ülesanne oli teha väike õpetav robot.

Töö formaat: ma saadan robotile käsu „näide”, robot saadab mulle juhuslikult valitud sõna ja transkriptsiooni ning 10 sekundi pärast saadab tõlke ja kommentaari. Me oskame lugeda käsklusi, oleks vaid vaja õppida automaatselt sobivaid proksi leidma ja sõnumite loendurid unustusse viima.

De-commentime kõik varem kommenteeritud üleliigsena, kommenteerime kommenteeritud txt ja csv näited ning salvestame faili kui versiooni B106.

Ah, jah. Saame botile midagi saata uuesti.

6. Saatmine funktsioonidest ja muust

Enne kui vastuvõttu töötlema asuda, peab olema funktsioon, mis saadab „midagi”, peale test sõnumi.

Tõesti, meie näites on vaid üks saatmine ja ainult üks töötlemine, aga kui peaks olema vaja teha sama asja mitu korda?

Lihtsam on kirjutada funktsioon. Nii et meil on objekti tüüpi muutuja $MyVocabExample4AsArray, mis loeti failist, kahe elemendina massiivi kujul.
Hakkame lugema.

Samas lahendame kellade küsimuse, see tuleb meil hiljem ära kasutada (tegelikult ei ole see näites vajalik 🙂.

Natuke koodi #6.1

Write-Output "See on osa 6"
$Timezone = (Get-TimeZone)
IF($Timezone.SupportsDaylightSavingTime -eq $True){
    $TimeAdjust =  ($Timezone.BaseUtcOffset.TotalSeconds + 3600) } # kohandatud aeg
    ELSE{$TimeAdjust = ($Timezone.BaseUtcOffset.TotalSeconds) 
    }
    
function MyFirstFunction($SomeExampleForFunction1){
$TimeNow = Get-Date
$TimeNow.ToUniversalTime()
# $MyText02 = $TimeNow + " " + $SomeExampleForFunction1 # ja siin saame vea
$MyText02 = $SomeExampleForFunction1 + " " + $TimeNow # aga siin ei saa, kes arvas, miks - see on hea.

$URL4SendFromFunction = "https://api.telegram.org/bot$MyToken/sendMessage?chat_id=$MyChatID&text=$MyText02"
Invoke-WebRequest -Uri $URL4SendFromFunction -Proxy $MyProxy
}

Kuidas lihtsalt näha, et funktsioonis kutsutakse välja $MyToken ja $MyChatID, mis on eelnevalt määratud.

Nii teha ei tohi ja kui $MyToken on iga boti jaoks sama, siis $MyChatID muutub sõltuvalt vestlusest.

Kuid kuna see on näide, ignoreerime seda seni.

Kuna $MyVocabExample4AsArray ei ole massiiv, kuigi see näeb välja nagu see, siis ei saa lihtsalt võtta ja küsida selle pikkust.

Peame taas tegema seda, mida ei tohiks - jahutama mitte reeglite järgi - võtma ja arvestama

Veidi koodi #6.2

$MaxRandomExample = 0 
foreach ($Obj in $MyVocabExample4AsArray) {
$MaxRandomExample ++
}
Write-Output $MaxRandomExample
$RandomExample = Get-Random -Minimum 0 -Maximum ($MaxRandomExample)
$TextForExample1 = $MyVocabExample4AsArray[$RandomExample].Original
# MyFirstFunction($TextForExample1)
# või ühes arvutusliinis
# MyFirstFunction($MyVocabExample4AsArray[Get-Random -Minimum 0 -Maximum ($MaxRandomExample -1)].Example)
# Arva ise, milline näide on kergem lugeda välistele inimestele.

Juhuslik huvitav funktsioon. Oletame, et soovime saada 0 või 1 (meil on kokku kaks elementi massiivis). Kas piirades 0..1 saame „1”?
ei - ei saa, meil on spetsiaalselt antud näide Example 2: Hangi juhuslik täisarv vahemikus 0 kuni 99 Get-Random -Maximum 100
Seetõttu peame vahemikus 0..1 sättima suuruse 0..2, kusjuures maksimaalne number on 1.

7. Saadetud sõnumite töötlemine ja maksimaalne järjekorra pikkus

Kus me varem peatusime? meil on saadud muutuja $MyMessageGet
ja sellest saadud $Content4Pars01, millest meid huvitavad massiivi elemendid Content4Pars01.result

$Content4Pars01.result[0].update_id
$Content4Pars01.result[0].message
$Content4Pars01.result[0].message.text

Saadame botile \/message10, \/message11, \/message12, \/word ja veel kord \/word ja \/tere.
Vaata, mida oleme saanud:

$Content4Pars01.result[0].message.text
$Content4Pars01.result[2].message.text

Käime kõik saadud läbi ja saadame vastuse, kui sõnum oli \/word
case of konstruktsioon, mida mõned kirjeldavad kui if-elseif, powershellis kutsutakse välja läbi switch. Samas on allpool kirjutatud koodis kasutatud -wildcard võtme, mis ei ole kindlasti vajalik ja võib isegi olla kahjulik.

Veidi koodi #7.1

Write-Output "See on osa 7"
Foreach ($Result in $Content4Pars01.result) # Jah, seda saab kiiremini teha 
 { 
    switch -wildcard ($Result.message.text) 
            {
            "\/word" {MyFirstFunction($TextForExample1)}
            }
}

Käivitame skripti paar korda. Saame kaks korda sama sõna iga kord, eriti kui oleme randomi rakendamisel eksinud.

Aga pidage, me ei saatnud ju \/word uuesti, miks siis sõnumit töödeldakse uuesti?

Boti sõnumite saatmise järjekorel on piiratud pikkus (näib, et 100 või 200 sõnumit), ja see tuleb käsitsi puhastada.

Dokumendis on see muidugi kirjas, aga seda tuleb lugeda!

Selles olukorras on meil vajalik parameeter ?chat_id, samas &timeout, &limit, &parse_mode=HTML ja &disable_web_page_preview=true pole veel vajalikud.

Dokumentatsioon telegram api kohta asub siin
Seal on inglise keeles selgelt kirjas:
Identifikaator esimese uuenduse jaoks, mis tagastatakse. Peab olema suurem kui eelnevalt saadud uuenduste kõrgeim identifikaator. Vaikimisi tagastatakse uuendused, mis algavad varasematest
kinnitamata uuendusest. Uuendust peetakse kinnitatuks, kui getUpdates'it kutsutakse üles offset kõrgem kui selle uuendus_id. Negatiivset offseti saab määrata, et saada uuendused -offset uuendusest uuenduste järjekorra lõpust. Kõik eelnevad uuendused unustatakse.

Vaadakem:

$Content4Pars01.result[0].update_id
$Content4Pars01.result[1].update_id 
$Content4Pars01.result | select -last 1
($Content4Pars01.result | select -last 1).update_id

Ja lasteme lahti — natuke ümber kirjutame funktsiooni. Meil on kaks võimalust — edastada funktsiooni kõik sõnum ja töödelda seda täielikult funktsioonis või anda edasi ainult sõnumi ID ja seda ka lasta. Teise näide näeb välja lihtsam.

Varem nägi meie päring "kõigi sõnumite" joon välja

$URLGET = "https:\/\/api.telegram.org\/bot$MyToken\/getUpdates"

aga see näeb välja nagu

$LastMessageId = ($Content4Pars01.result | select -last 1).update_id
$URLGET1 = "https:\/\/api.telegram.org\/bot$mytoken\/getUpdates?offset=$LastMessageId&limit=100" 
$MyMessageGet = Invoke-WebRequest -Uri $URLGET1 -Method Get -Proxy $MyProxy

Keegi ei keela kõigepealt saada kõik sõnumid, need töödelda ja alles pärast eduka töötlemise taotleda unconfirmed -> confirmed.

Miks on mõistlik kutsuda kinnitust pärast kõigi töötlemiste lõpuleviimist? Võib juhtuda tõrge töötlemise ajal ja kui näiteks tasuta juturobotis mingi üksiku sõnumi vahelejätmine pole veel midagi erilist, siis kui töötlete kellegi palka või kaarditehingut, võib tulemus olla hullem.

Veel paar rida koodi

$LastMessageId = ($Content4Pars01.result | select -last 1).update_id  # ebatak ise peak sool peab ise parandama. 
$URLGET1 = "https://api.telegram.org/bot$mytoken/getUpdates?offset=$LastMessageId&limit=100" 
Invoke-WebRequest -Uri $URLGET1 -Method Get -Proxy $MyProxy

8. Kokkuvõtte asemel

Põhifunktsioonid — sõnumite lugemine, järjekorra lähtestamine, faili lugemine ja faili kirjutamine on teostatud ja näidatud.

Jäänud on teha vaid neli asja:

õige vastuse saatmine päringule vestluses
vastuse saatmine KÕIKIDESSE vestlustesse, kuhu bot on lisatud
koodi täitmine tsüklis
boti käivitamine Windowsi ülesande planeerijast.

Kõik need ülesanded on lihtsad ja neid on lihtne teostada, lugedes dokumentatsiooni selliste parameetrite kohta nagu
Set-ExecutionPolicy Unrestricted ja -ExecutionPolicy Bypass
sellise tsükli vorm

$TimeToSleep = 3 # küsitlemine iga 3 sekundi järel
$TimeToWork = 10 # minutit
$HowManyTimes = $TimeToWork*60/$TimeToSleep # tsükli loendur
$MainCounter = 0
for ($MainCounter=0; $MainCounter -le $HowManyTimes) {
sleep $TimeToSleep
$MainCounter ++

Aitäh kõigile, kes lugesid lõpuni.

Allikas: habr.com

Lihtsaim Telegrami boti mall 7.-9. klassi õpilastele Powershellis