Meloong-Git/PCL

Largest clones in the code

• 10 lines in 4 placesvbnet145 tokens
  Plain Craft Launcher 2/Controls/MyMsg/MyMsgInput.xaml.vb:40–49·Plain Craft Launcher 2/Controls/MyMsg/MyMsgSelect.xaml.vb:47–56·Plain Craft Launcher 2/Controls/MyMsg/MyMsgText.xaml.vb:38–47·Plain Craft Launcher 2/Pages/PageLaunch/MyMsgLogin.xaml.vb:29–38

  40'动画
  41Opacity = 0
  42AniStart(AaColor(FrmMain.PanMsg, Grid.BackgroundProperty, If(MyConverter.IsWarn, New MyColor(140, 80, 0, 0), New MyColor(90, 0, 0, 0)) - FrmMain.PanMsg.Backgro…
  43AniStart({
  44    AaOpacity(Me, 1, 120, 60),
  45    AaDouble(Sub(i) TransformPos.Y += i, -TransformPos.Y, 300, 60, New AniEaseOutBack(AniEasePower.Weak)),
  46    AaDouble(Sub(i) TransformRotate.Angle += i, -TransformRotate.Angle, 300, 60, New AniEaseOutFluent(AniEasePower.Weak))
  47}, "MyMsgBox " & Uuid)
  48'记录日志
  49Logger.Info($"输入弹窗：{LabTitle.Text}")
  

  47'动画
  48Opacity = 0
  49AniStart(AaColor(FrmMain.PanMsg, Grid.BackgroundProperty, If(MyConverter.IsWarn, New MyColor(140, 80, 0, 0), New MyColor(90, 0, 0, 0)) - FrmMain.PanMsg.Backgro…
  50AniStart({
  51    AaOpacity(Me, 1, 120, 60),
  52    AaDouble(Sub(i) TransformPos.Y += i, -TransformPos.Y, 300, 60, New AniEaseOutBack(AniEasePower.Weak)),
  53    AaDouble(Sub(i) TransformRotate.Angle += i, -TransformRotate.Angle, 300, 60, New AniEaseOutFluent(AniEasePower.Weak))
  54}, "MyMsgBox " & Uuid)
  55'记录日志
  56Logger.Info($"选择弹窗：{LabTitle.Text}")
  

• 28 lines in 2 placesvbnet398 tokens
  Plain Craft Launcher 2/Pages/PageInstance/PageInstanceSetup.xaml.vb:116–143·Plain Craft Launcher 2/Pages/PageSetup/PageSetupLaunch.xaml.vb:147–174

  116Dim RamGame As Double = Math.Round(GetRam(PageInstanceLeft.Instance), 5)
  117Dim RamTotal As Double = Math.Round(My.Computer.Info.TotalPhysicalMemory / 1024 / 1024 / 1024, 1)
  118Dim RamAvailable As Double = Math.Round(My.Computer.Info.AvailablePhysicalMemory / 1024 / 1024 / 1024, 1)
  119Dim RamGameActual As Double = Math.Round(Math.Min(RamGame, RamAvailable), 5)
  120Dim RamUsed As Double = Math.Round(RamTotal - RamAvailable, 5)
  121Dim RamEmpty As Double = Math.Round((RamTotal - RamUsed - RamGame).Clamp(0, 1000), 1)
  122'设置最大可用内存
  123If RamTotal <= 1.5 Then
  124    SliderRamCustom.MaxValue = Math.Max(Math.Floor((RamTotal - 0.3) / 0.1), 1)
  125ElseIf RamTotal <= 8 Then
  

  First 10 of 28 lines.

• 49 lines in 2 placesvbnet294 tokens
  Plain Craft Launcher 2/Pages/PageInstance/PageInstanceSetup.xaml.vb:260–308·Plain Craft Launcher 2/Pages/PageSetup/PageSetupLaunch.xaml.vb:288–336

  260If Instance IsNot Nothing AndAlso Not Instance.IsLoaded Then Instance.Load()
  261If Instance IsNot Nothing AndAlso Instance.Modable Then
  262    '可安装 Mod 的版本
  263    Dim ModDir = DirectoryUtils.GetInfo(Instance.PathIndie & "mods\")
  264    Dim ModCount As Integer = If(ModDir.Exists, ModDir.GetFiles.Count(Function(f) {".jar", ".zip", ".litemod"}.Contains(f.Extension.Lower)), 0)
  265    RamMininum = 0.5 + ModCount / 150
  266    RamTarget1 = 1.5 + ModCount / 90
  267    RamTarget2 = 2.7 + ModCount / 50
  268    RamTarget3 = 4.5 + ModCount / 25
  269ElseIf Instance IsNot Nothing AndAlso Instance.Version.HasOptiFine Then
  

  First 10 of 49 lines.