Makri u basicu

Če kdo slučajno obvlada basic oz. zna osnove.. bi ga prosu, da mi pošlje zs oz. pošlje majl na aljazstraser@gmail.com. Namreč napisati moramo preprosti makro, ki ima sledeče funkcije:
* function izracunajHash(geslo, zacetni_hash) - v tej funkciji boste implementirali sekljalno funkcijo, ki bo iz uporabnikovega gesla izračunala začetno seme za generator psevdo naključnih števil (več o tem se nahaja v pomoči). Za sprejem naloge so postavljene naslednje dodatne zahteve:
1. Spremenljivka zacetni_hash naj ima nastavljeno vrednost 6959
2. V funkciji jemljete znake od zadnjega znaka proti prvemu
3. Sprehod preko znakov morate implementirati z zanko Do...Loop Until
* function kodiraj(niz) - izhod iz funkcije bo kodiran/dekodiran vhodni niz. Predpostavite, da je generator naključnih števil že postavljen na pravilno vrednost (več o tem se nahaja v pomoči). Kodirajte le znake, katerih ascii vrednost je večja od 31. Za sprejem naloge so postavljene naslednje dodatne zahteve:
1. V funkciji jemljete znake od prvega znaka proti zadnjemu
2. Sprehod preko znakov morate implementirati z zanko Do...Loop Until
* sub kodiraj_besedilo(seme) - ta podprogram poskrbi, da se kodirajo vsi navadni odstavki v besedilu. Prav tako se v tem podprogramu izvrši inicializacija generatorja naključnih vrednosti
* sub kodiraj_UI - ta podprogram vsebuje uporabniški vmesnik vašega makra in je v bistvu glavni program. V njem boste zahtevali geslo za kodiranje (privzeto geslo naj bo vaša vpisna številka) in poklicali prej spisane podprograme