PaintString Info(ユニット, LIndex(現在のページ, 2), 特殊能力, i) Local 検索文字 = 1 For i = 1 To Len(Args(1)) Switch Mid(Args(1), i, 1) Case ; PaintString Mid(Args(1), 検索文字, (i - 1)) 検索文字 = (i + 1) Case : PaintString Mid(Args(1), 検索文字, (i - 1)) Wait Click Case Else If V = Len(Args(1)) Then PaintString Mid(Args(1), 検索文字, i) EndIf EndSw Next #Args(1) = Info(ユニット, なんか適当な機体, 特殊能力解説, i)
For i = 1 To カウント数 アイテム名 = Item(未装備,i) Set 配列A[i] アイテム名 Next For i = 1 To カウント数 RemoveItem 配列A[i] Next #アイテム番号1番からn番までのアイテム名を格納 #アイテム名を格納したらそのアイテムを一時的に削除
Return
Item再入手: For i = 1 To カウント数 Item 配列A[i] Next #配列Aに格納されたアイテムを全て再入手 Return
@インクル ランダムBGM再生: Local 曲番号 = Random(5) Switch 曲番号 Case 1 PlayMIDI (1曲目ファイル名) Case 2 PlayMIDI (2曲目ファイル名) Case 3 PlayMIDI (3曲目ファイル名) Case 4 PlayMIDI (4曲目ファイル名) Case 5 PlayMIDI (5曲目ファイル名) EndSw return