📄 bootloader.bas
字号:
Attribute VB_Name = "BootLoader"
'AwardMod BIOS Manipulation Tool
'Copyright (C) 2001 Josef Hill
'
'This program is free software; you can redistribute it and/or
'modify it under the terms of the GNU General Public License
'as published by the Free Software Foundation; either version 2
'of the License, or any later version.
'
'This program is distributed in the hope that it will be useful,
'but WITHOUT ANY WARRANTY; without even the implied warranty of
'MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
'GNU General Public License for more details.
'
'You should have received a copy of the GNU General Public License
'along with this program; if not, write to the Free Software
'Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
Private mF As fMain
Sub Main()
Const lGNU = "AwardMod version 1.62.00, Copyright (C) 2002 Josef Hill" & vbCrLf & "AwardMod comes with ABSOLUTELY NO WARRANTY." & vbCrLf & "This is free software, and you are welcome to redistribute it under certain conditions." & vbCrLf & "For Further information, please read the GNU GPL"
If MsgBox(lGNU, vbOKCancel, "GNU License") = vbOK Then
Set mF = New fMain
mF.Visible = True
End If
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -