1489 Views

Report

• # キーワード置換
  ReplaceKeyword(Input : string, Keywords : [string]string, ?MinLength : int = 20) : string =
      # 文字数がMinLength未満の場合はそのまま返す
      if (Input.Length < MinLength):
          return Input
      
      var Result : string = Input
      
      # キーワードが含まれている場合、置換
      for (Keyword -> ShortForm : Keywords):
          set Result = Result.ReplaceAll(Keyword, ShortForm)
      
      return Result
  

  キーワード置換

  ReplaceKeyword(Input : string, Keywords : [string]string, ?MinLength : int = 20) : string =

  文字数がMinLength未満の場合はそのまま返す

  if (Input.Length < MinLength): return Input var Result : string = Input

  キーワードが含まれている場合、置換

  for (Keyword -> ShortForm : Keywords): set Result = Result.ReplaceAll(Keyword, ShortForm) return Result

  Expand code Copy full snippet(13 lines long)

• test():void=
      # キーワードマップを設定
      var Keywords : [string]string = map{}
      if:
          set Keywords["Shotgun"] = "SG"
          set Keywords["Assault Rifle"] = "AR"
          set Keywords["Submachine Gun"] = "SMG"