最近、Scratchという子ども向けの言語学習環境が凄いと思うようになりました。

本格的なプログラムも書けるのではないかと思い、試してみました。

（普通に解こうとしたのですが、難しく、、解答を見ないと出来ませんでした。大雑把な性格なので、アルゴリズム結構苦手です。。）

IPAの過去問は、こちらです。
https://www.jitec.ipa.go.jp/1_04hanni_sukiru/mondai_kaitou_2019h31.html#01aki

はじめに用意するブロック定義

ブロック定義：Index、ブロック定義：論理左シフト演算、ブロック定義：論理和、ブロック定義：論理積を用意する必要があります。

ブロック定義：Index

（関数Index）

「関数Indexは、引数にアルファベット順でn番目の英大文字を設定して呼び出すと、整数n（1<= n <=26）を返す。」と、問題文に書かれています。関数Indexに該当するブロック定義を用意します。
（「alphabetList」というリストを作成して、線形探索してます。）

引数「n番目の英大文字」、返却値の整数nは、変数「n」に格納します。

ブロック定義：論理左シフト演算

第一引数「二進数」、第二引数「シフト数」として、
演算結果を変数「左シフト出力」に出力します。
（SCRATCH Japan wikiの「二進数」という記事を参考にして、作成しています。）

ブロック定義：論理和

第一引数「二進数-1」、第二引数「二進数-1」として、
演算結果を変数「論理和出力」に出力します。
（SCRATCH Japan wikiの「二進数」という記事をもとに作成しています。）

ブロック定義：論理積

第一引数「二進数-1」、第二引数「二進数-1」として
演算結果を変数「論理積出力」に出力します。
（SCRATCH Japan wikiの「二進数」という記事をもとに作成しています。）

TextListの作成

対象文字列を格納するリストを作成します。

PatListの作成

検索文字列を格納するリストを作成します。（下の写真は設問1、設問2）

MakeMaskListの作成

ビットマスクを格納するリストを作成します。

ここから、試験問題のプログラムです。

プログラム1

ブロック定義：GenerateBitMask

（整数型関数：GenerateBitMask）

第一引数「PatList」、第二引数「MaskList」

（スクラッチの仕様上、第二引数「MaskList」は使用していませんが、試験の関数に近づけるため置いています。）

返却値の検索文字列の文字数は、変数「PatLen」に格納します。

プログラム2

ブロック定義：BitapMatch

（整数型関数：BitapMatch）

第一引数「TextList」、第二引数「PatList」

返却値の代わりに、スプライト（ねこ）に、対象文字列中に検索対象文字列が見つかった場合、
一致した文字列の先頭の文字に対応する対象文字列の要素の要素番号を、
検索文字列が見つからなかった場合は、-1を言うようにしています。

プログラム3

ブロック定義：GenerateBitMaskRegex

（整数型関数：GenerateBitMaskRegex）