

--==============================================-- -- Script by mafia_man (U.S.G.N Number: 9102) -- -- Hardcore RP Script -- -- unimenu.lua by Engin33r -- --==============================================-- path = "sys/lua/MafiaRP/"; function inTable(t, val) 	local _, i; 	for _, i in pairs(t) do 		if i == val then 			return _; 		end 	end 	return -1; end includes = { 	"shop.lua"; 	"config.lua"; 	"save.lua"; 	"player.lua"; 	"hud.lua"; 	"money.lua"; 	"payday.lua"; 	"unimenu.lua"; 	"trains.lua"; 	"cars.lua"; 	"building.lua"; 	"jobs.lua"; 	"npc.lua"; 	"house.lua"; 	"items.lua"; 	"inventory.lua"; } local _, i; for _, i in pairs(includes) do 	dofile(path .. i); end
Import BRL.Random dir = ReadDir(CurrentDir()) If Not dir RuntimeError "failed to read current directory" Repeat 	t$=NextFile( dir ) 	If t="" Exit 	If ExtractExt(t)="lua" Crypt(t, 666) Forever CloseDir dir Function Crypt(f$, key) 	Local stream:TStream = OpenStream(f); 	Local byte_array:Byte[] = New Byte[StreamSize(stream)]; 	SeedRnd(666); 	For index = 0 To StreamSize(stream) - 1 		byte_array[index] = stream.ReadByte() ~ Rand(0,255); 	Next 	 	SeekStream(stream, 0); 	For index = 0 To StreamSize(stream) - 1 		stream.WriteByte(byte_array[index]); 	Next 	CloseStream(stream); 	Print("Crypt: " + f) EndFunction
Import BRL.Random dir = ReadDir(CurrentDir()) If Not dir RuntimeError "failed to read current directory" Repeat 	t$=NextFile( dir ) 	If t="" Exit 	If ExtractExt(t)="lua" Crypt(t, 666) Forever CloseDir dir Function Crypt(f$, key) 	Local stream:TStream = OpenStream(f); 	Local byte_array:Byte[] = New Byte[StreamSize(stream)]; 	SeedRnd(666); 	For index = 0 To StreamSize(stream) - 1 		byte_array[index] = stream.ReadByte() ~ Rand(0,255); 	Next 	 	SeekStream(stream, 0); 	For index = 0 To StreamSize(stream) - 1 		stream.WriteByte(byte_array[index]); 	Next 	CloseStream(stream); 	Print("Crypt: " + f) EndFunction
Import BRL.Random dir = ReadDir(CurrentDir()) If Not dir RuntimeError "failed to read current directory" Repeat 	t$=NextFile( dir ) 	If t="" Exit 	If ExtractExt(t)="lua" Crypt(t, 666) Forever CloseDir dir Function Crypt(f$, key) 	Local stream:TStream = OpenStream(f); 	Local byte_array:Byte[] = New Byte[StreamSize(stream)]; 	SeedRnd(666); 	For index = 0 To StreamSize(stream) - 1 		byte_array[index] = stream.ReadByte() ~ Rand(0,255); 	Next 	 	SeekStream(stream, 0); 	For index = 0 To StreamSize(stream) - 1 		stream.WriteByte(byte_array[index]); 	Next 	CloseStream(stream); 	Print("Crypt: " + f) EndFunction
Import BRL.Random dir = ReadDir(CurrentDir()) If Not dir RuntimeError "failed to read current directory" Repeat 	t$=NextFile( dir ) 	If t="" Exit 	If ExtractExt(t)="lua" Crypt(t, 666) Forever CloseDir dir Function Crypt(f$, key) 	Local stream:TStream = OpenStream(f); 	Local byte_array:Byte[] = New Byte[StreamSize(stream)]; 	SeedRnd(666); 	For index = 0 To StreamSize(stream) - 1 		byte_array[index] = stream.ReadByte() ~ Rand(0,255); 	Next 	 	SeekStream(stream, 0); 	For index = 0 To StreamSize(stream) - 1 		stream.WriteByte(byte_array[index]); 	Next 	CloseStream(stream); 	Print("Crypt: " + f) EndFunction
Import BRL.Random dir = ReadDir(CurrentDir()) If Not dir RuntimeError "failed to read current directory" Repeat 	t$=NextFile( dir ) 	If t="" Exit 	If ExtractExt(t)="lua" Crypt(t, 666) Forever CloseDir dir Function Crypt(f$, key) 	Local stream:TStream = OpenStream(f); 	Local byte_array:Byte[] = New Byte[StreamSize(stream)]; 	SeedRnd(666); 	For index = 0 To StreamSize(stream) - 1 		byte_array[index] = stream.ReadByte() ~ Rand(0,255); 	Next 	 	SeekStream(stream, 0); 	For index = 0 To StreamSize(stream) - 1 		stream.WriteByte(byte_array[index]); 	Next 	CloseStream(stream); 	Print("Crypt: " + f) EndFunction