ippatsu (M4) でまず、基本技の探索を search_process_choice (M4) で行う。基本技だけで決まる、Beginner, Very Easy, Easy のレベルの問題はここで終了する。
次に、 > search_type_choice ( M4) において、技の種類別に次の macro に分かれる。
① search_macro (M41) VQGP・・・・などの単独技
② combine_macro ( M41) v w q g ・・・などの組み合わせ技
③ playback_macro
④ A_birdy_search ( M4) "?"
⑤ A_eargle_search ( M4) "#"
⑥ Deform_candidate_search "e"
⑦ destroy_macro "d"
⑧ extra_input_from_database ( M4) X
①の search_macro はそれぞれの記号別に次に示す具体的な search macro にうつる。
'
Sub search_macro()
Range("AW1") = "search"
Select Case md(si5)
Case "V": V_search ' M23
Case "W": W_search ' M15
Case "Λ": Λ_search ' M26
Case "Q": Q_search ' M17
Case "G": G_search ' M16
Case "P": P_search ' M18
Case "Φ": Φ_search ' M18
Case "K": K_search ' M40
Case "S": S_search ' M21
Case "Ξ": Ξ_search ' M18
Case "Δ": Δ_search ' M33
Case "H": H_search ' M22
Case "Ω": Ω_search ' M22
Case "Y": Y_search ' M25
Case "Π": Π_search ' M26
Case "Θ": Θ_search ' M26
Case "L": L_search ' M47
Case "T": T_search ' M47
Case "U": U_search ' M45
Case "N": N_search ' M47
Case "O": O_search ' M47
Case "J": J_search ' M45
Case "F": F_seach ' M47
Case "Z": Z_search ' M47
Case "I": I_search ' M45
Case "Γ": Γ_search ' M33
'Case "?": Bcf ' M41
Case Else
MsgBox ("No search name appear ! ")
End Select
End Sub
'
0 件のコメント:
コメントを投稿