Print

[deflux]

CODE

;Fonthack renamer so you can take your xbox to a friends SETFUNC Fontstatus FILESIZE c:fontsXbox.xft SETFUNC Fontstatus1 FILESIZE c:fontsXbox.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 Swap  If %_GP_Y% == "1" GOTO Turnon Quit :Cancel BeginDraw UseCurrent MessageBox " FontHack Status: %Fontstat% " EndDraw Delay 2 Quit :Swap Rename "c:\fonts\Xbox.xft" "c:\fonts\Xbox.xtf" Rename "c:\fonts\Xbox Book.xft" "c:\fonts\Xbox Book.xtf" BeginDraw UseCurrent MessageBox " Font Hack Disabled " EndDraw Delay 2 Quit :Turnon Rename "c:\fonts\Xbox.xtf" "c:\fonts\Xbox.xft" Rename "c:\fonts\Xbox Book.xtf" "c:\fonts\Xbox Book.xft" BeginDraw UseCurrent MessageBox " Font Hack Enabled " EndDraw Delay 2 Quit