| QUOTE |
;Fonthack renamer so you can take your xbox to a friends SETFUNC Fontstatus FILESIZE c:\fonts\Xbox.bak ;SETFUNC Fontstatus1 FILESIZE c:\fonts\Xbox.xtf If %Fontstatus% != "0" GOTO a1 If %Fontstatus% == "0" GOTO a2 Quit :a1 SET Fontstat Enabled GOTO Start :a2 SET Fontstat Disabled GOTO Start :Start BeginDraw UseCurrent MessageBox "FontHack Status: %Fontstat% $eol$Press B to Cancel$eol$Press X To Turn OFF$eol$Press Y To Turn ON" EndDraw Input If %_GP_B% == "1" GOTO Cancel If %_GP_X% == "1" GOTO TurnOff If %_GP_Y% == "1" GOTO Turnon Quit :Cancel BeginDraw UseCurrent MessageBox " FontHack Status: %Fontstat% " EndDraw Delay 2 Quit :TurnOff Rename "c:\fonts\Xbox.bak" "c:\fonts\Xbox.xtf" Rename "c:\fonts\Xbox Book.bak" "c:\fonts\Xbox Book.xtf" Rename "c:\fonts\ernie.xtf" "c:\fonts\ernie.bak" Rename "c:\fonts\bert.xtf" "c:\fonts\bert.bak" BeginDraw UseCurrent MessageBox " Font Hack Disabled " EndDraw Delay 2 Quit :Turnon Rename "c:\fonts\Xbox.xtf" "c:\fonts\Xbox.bak" Rename "c:\fonts\Xbox Book.xtf" "c:\fonts\Xbox Book.bak" Rename "c:\fonts\ernie.bak" "c:\fonts\ernie.xtf" Rename "c:\fonts\bert.bak" "c:\fonts\bert.xtf" BeginDraw UseCurrent MessageBox " Font Hack Enabled " EndDraw Delay 2 Quit |