Advertisement
DieFeM

String Function GetPluginName(Int FormId)

Apr 12th, 2018
238
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 1.33 KB | None | 0 0
  1. String Function HexChar(Int x)
  2.     If x < 10
  3.         Return x As String
  4.     ElseIf x == 10
  5.         Return "A"
  6.     ElseIf x == 11
  7.         Return "B"
  8.     ElseIf x == 12
  9.         Return "C"
  10.     ElseIf x == 13
  11.         Return "D"
  12.     ElseIf x == 14
  13.         Return "E"
  14.     ElseIf x == 15
  15.         Return "F"
  16.     EndIf
  17. EndFunction
  18.  
  19. String Function DecToHex(Int x)
  20.     String[] hexInvArray = new String[0]
  21.     While x > 0
  22.         hexInvArray.Add(HexChar(x % 16))
  23.         x = x / 16
  24.     EndWhile
  25.    
  26.     String hexadecimal = "0x"
  27.     Int i = 7
  28.     While i >= 0
  29.         If(i <= hexInvArray.Length - 1)
  30.             hexadecimal += hexInvArray[i]
  31.         Else
  32.             hexadecimal += "0"
  33.         EndIf
  34.         i -= 1
  35.     EndWhile
  36.     return hexadecimal
  37. EndFunction
  38.  
  39. Int Function HexToDec(Int hexInteger)
  40.     Int Dec = 0
  41.     Int Hex = hexInteger
  42.     Int count = 0
  43.     While Hex > 0
  44.         Dec = Dec + (Hex % 10) * (Math.Pow(16, count) As Int)
  45.         Hex /= 10
  46.         count += 1
  47.     EndWhile
  48.     Return Dec
  49. EndFunction
  50.  
  51. String Function GetPluginName(Int FormId)
  52.     Int x = FormId
  53.     String[] hexInvArray = new String[0]
  54.     While x > 0
  55.         hexInvArray.add(x % 16)
  56.         x = x / 16
  57.     EndWhile
  58.    
  59.     String PluginHex = "00"
  60.     If(hexInvArray.Length == 8)
  61.         PluginHex = hexInvArray[7] As String + hexInvArray[6] As String
  62.     ElseIf(hexInvArray.Length == 7)
  63.         PluginHex = "0" + hexInvArray[6] As String
  64.     EndIf
  65.    
  66.     return "\"" + Game.GetInstalledPlugins()[HexToDec(PluginHex As Int)].name + "\""
  67. EndFunction
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement