FixPersianString - Revision history

RubyCommunity: Update and fix several bugs reported by the community

2025-09-17T14:03:31Z

Update and fix several bugs reported by the community

← Older revision		Revision as of 14:03, 17 September 2025
Line 3:		Line 3:
	__NOTOC__		__NOTOC__
	This function returns a fixed sorted bilingual RTL for strings consisting of Persian/Arabic and English.		This function returns a fixed sorted bilingual RTL for strings consisting of Persian/Arabic and English.
	just copy & paste and see the magic ;D		just copy & paste and see the magic ;D
			[[File:FixPersianString.jpg\|700x350px\|thumb\|right\|alt=An example of how fixPersianString function works\|Example Screenshot]]

	==Syntax==		==Syntax==
Line 14:		Line 15:
	Returns a fixed string.		Returns a fixed string.
	==New features==		==New features==
	* Added new functionality to support hex color codes		* Added new functionality to support hex color codes.
	* ~~Improve~~ Performance		* Performance improvements.
	* Support Multiline Strings		* Support Multiline Strings
			* Bug fixes: The problem of using multiple English sentences in the text and reversing the position of words has been resolved. The problem of using numbers and reversing numbers has been resolved.

	==Code==		==Code==
	{{RequiredFunctions\|Check}}		{{RequiredFunctions\|Check}}
Line 23:		Line 26:
	function fixPersianString(str)		function fixPersianString(str)
	assert(type(str) == 'string', "Expected a string, got " .. type(str))		assert(type(str) == 'string', "Expected a string, got " .. type(str))
	local unicode = '‮'		local unicode = '‮'
	~~local function reverseEN~~(w) return w:~~reverse~~() ~~end~~		if not str:match("[\216-\219][\128-\191]") then
	~~local function sortHexcolor~~(s)		return str
	local lines~~, words~~ = ~~{},~~ {}		end
	for line in (s .. "\n"):gmatch("(.-)\n") do		str = str:gsub("\r\n", "\r\n" .. unicode)
			str = str:gsub("\n", "\n" .. unicode)
			if str:find("#%x%x%x%x%x%x") then
			local lines = {}
			for line in (str .. "\n"):gmatch("(.-)\n") do
			local words = {}
	for word in line:gmatch("%S+") do		for word in line:gmatch("%S+") do
			word = word:gsub("%d+", function(d) return d:reverse() end)
	table.insert(words, 1, word)		table.insert(words, 1, word)
	end		end
	table.insert(lines, table.concat(words, " "))		table.insert(lines, table.concat(words, " "))
	~~words = {}~~
	end		end
	~~return~~ table.concat(lines, "\n#FFFFFF")		str = table.concat(lines, "\n#FFFFFF")
	~~end~~		else
	if str:~~match~~("[~~\216-\219~~][~~\128-\191~~]") ~~then~~		str = unicode .. str:gsub("%f[%w]%w+%f[%W]", function(w)
	~~str~~ = ~~str~~:gsub("\n",~~"\n"..unicode)~~		w = w:gsub("%d+", function(d) return d:reverse() end)
	~~str = str:gsub~~(~~"\r\n","\r\n"..unicode~~)		return w:reverse()
	return ~~str~~:~~find~~(~~"#%x%x%x%x%x%x"~~) ~~and sortHexcolor(str~~) ~~or (unicode.. str~~:~~gsub~~(~~"%f[%a]%w+%f[%A]", reverseEN~~))		end)
	end		end
			str = str:gsub("%f[%a]([%a%s]+)%f[%A]", function(block)
			local tokens = {}
			local wordIndices = {}

			for token in block:gmatch("%S+") do
			table.insert(tokens, token)
			if not token:match("^#%x%x%x%x%x%x$") then
			table.insert(wordIndices, #tokens)
			tokens[#tokens] = token:gsub("%d+", function(d) return d:reverse() end)
			end
			end

			for i = 1, math.floor(#wordIndices/2) do
			local j = #wordIndices - i + 1
			local idx1, idx2 = wordIndices[i], wordIndices[j]
			tokens[idx1], tokens[idx2] = tokens[idx2], tokens[idx1]
			end

			return table.concat(tokens, " ")
			end)
			str = str:gsub("(%d+)", function(num)
			return num:reverse()
			end)
	return str		return str
	end		end
Line 50:		Line 81:
	This example print a message with persian and english words without any problem		This example print a message with persian and english words without any problem
	<syntaxhighlight lang="lua">		<syntaxhighlight lang="lua">
	local PersianSTR = fixPersianString("خب اینطوری به نظرم behtar شد و دیگه ~~کلمات~~ باهمدیگه قاطی نمیشن goodluck وقت بخیر ")		local PersianSTR = fixPersianString("خب اینطوری به نظرم behtar az ghabl شد و دیگه کلماتabc1234 باهمدیگه قاطی 09120001209 نمیشن goodluck وقت بخیر ")
	local PersianSTR2 = fixPersianString([[درود #FF0000 بر #~~0000FF player2~~ #aaFFaa چخبرا؟		local PersianSTR2 = fixPersianString([[درود #FF0000 بر #0000FFplayer2 #aaFFaa چخبرا؟
	خوبم #FF0000 چطوری تو #~~0000FF~~ ؟player1 #aaFFaa ]])		خوبم #FF0000 چطوری تو #ff8523 ؟player1 #aaFFaa ]])
	outputChatBox(PersianSTR2,255,255,255,true)		outputChatBox(PersianSTR2,255,255,255,true)
	local screenWidth, screenHeight = guiGetScreenSize ( )		local screenWidth, screenHeight = guiGetScreenSize ( )
	addEventHandler ( "onClientRender", root, function ()		addEventHandler ( "onClientRender", root, function ()
	dxDrawText ( PersianSTR, 200, screenHeight - ~~200~~, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 3, "default-bold" )		dxDrawText ( PersianSTR, 200, screenHeight - 300, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 2, "default-bold" )
	dxDrawText(PersianSTR2, 200, screenHeight - 500, screenWidth2, screenHeight2, tocolor(255, 255, 255, 255), 4, "default-bold", "left", "top", false, false, false, true)		dxDrawText(PersianSTR2, 200, screenHeight - 500, screenWidth2, screenHeight2, tocolor(255, 255, 255, 255), 3, "default-bold", "left", "top", false, false, false, true)
	end)		end)
	print(PersianSTR)		print(PersianSTR)
Line 63:		Line 94:
	</syntaxhighlight>		</syntaxhighlight>
	</section>		</section>

	Author: RubyCommunity		Author: RubyCommunity

	==See Also==		==See Also==
	{{Useful_Functions}}		{{Useful_Functions}}

RubyCommunity at 05:30, 18 April 2024

2024-04-18T05:30:24Z

← Older revision		Revision as of 05:30, 18 April 2024
Line 57:		Line 57:
	addEventHandler ( "onClientRender", root, function ()		addEventHandler ( "onClientRender", root, function ()
	dxDrawText ( PersianSTR, 200, screenHeight - 200, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 3, "default-bold" )		dxDrawText ( PersianSTR, 200, screenHeight - 200, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 3, "default-bold" )
	dxDrawText(PersianSTR2, 200, screenHeight - 500, screenWidth2, screenHeight2, tocolor(255, 255, 255, 255), 4, "default-bold", "left", "top", false, false, false, true)		dxDrawText(PersianSTR2, 200, screenHeight - 500, screenWidth2, screenHeight2, tocolor(255, 255, 255, 255), 4, "default-bold", "left", "top", false, false, false, true)
	end)		end)
	print(PersianSTR)		print(PersianSTR)

RubyCommunity at 05:29, 18 April 2024

2024-04-18T05:29:04Z

← Older revision		Revision as of 05:29, 18 April 2024
Line 2:		Line 2:
	<lowercasetitle></lowercasetitle>		<lowercasetitle></lowercasetitle>
	__NOTOC__		__NOTOC__
	This function returns a fixed sorted bilingual RTL for strings consisting of Persian/Arabic and English.		This function returns a fixed sorted bilingual RTL for strings consisting of Persian/Arabic and English.

	just copy & paste and see the magic ;D		just copy & paste and see the magic ;D

Line 13:		Line 12:

	===Returns===		===Returns===
	Returns a fixed string .		Returns a fixed string.
			==New features==
			* Added new functionality to support hex color codes
			* Improve Performance
			* Support Multiline Strings
	==Code==		==Code==
	{{RequiredFunctions\|Check}}		{{RequiredFunctions\|Check}}
Line 20:		Line 22:
	<syntaxhighlight lang="lua">		<syntaxhighlight lang="lua">
	function fixPersianString(str)		function fixPersianString(str)
	if type(str) ~= 'string' ~~then~~		assert(type(str) == 'string', "Expected a string, got " .. type(str))
	~~error(~~"~~bad argument #1 (~~string ~~expected~~, got "..type(str)..")")		local unicode = '‮'
			local function reverseEN(w) return w:reverse() end
			local function sortHexcolor(s)
			local lines, words = {}, {}
			for line in (s .. "\n"):gmatch("(.-)\n") do
			for word in line:gmatch("%S+") do
			table.insert(words, 1, word)
			end
			table.insert(lines, table.concat(words, " "))
			words = {}
			end
			return table.concat(lines, "\n#FFFFFF")
	end		end
	if str:match("[\216-\219][\128-\191]") then		if str:match("[\216-\219][\128-\191]") then
	~~local function reverseEN~~(~~word~~)		str = str:gsub("\n","\n"..unicode)
	~~return word~~:gsub("~~(%w+)~~", ~~function(w~~) return w:~~reverse~~() ~~end~~)		str = str:gsub("\r\n","\r\n"..unicode)
	~~end~~		return str:find("#%x%x%x%x%x%x") and sortHexcolor(str) or (unicode.. str:gsub("%f[%a]%w+%f[%A]", reverseEN))
	~~return~~ (~~'‮'~~..str:gsub("%f[%a]%w+%f[%A]", reverseEN))
	~~else~~
	~~return str~~
	end		end
			return str
	end		end
	</syntaxhighlight>		</syntaxhighlight>
Line 40:		Line 51:
	<syntaxhighlight lang="lua">		<syntaxhighlight lang="lua">
	local PersianSTR = fixPersianString("خب اینطوری به نظرم behtar شد و دیگه کلمات باهمدیگه قاطی نمیشن goodluck وقت بخیر ")		local PersianSTR = fixPersianString("خب اینطوری به نظرم behtar شد و دیگه کلمات باهمدیگه قاطی نمیشن goodluck وقت بخیر ")
			local PersianSTR2 = fixPersianString([[درود #FF0000 بر #0000FF player2 #aaFFaa چخبرا؟
			خوبم #FF0000 چطوری تو #0000FF ؟player1 #aaFFaa ]])
			outputChatBox(PersianSTR2,255,255,255,true)
	local screenWidth, screenHeight = guiGetScreenSize ( )		local screenWidth, screenHeight = guiGetScreenSize ( )
	addEventHandler ( "onClientRender", root, function ()		addEventHandler ( "onClientRender", root, function ()
	dxDrawText ( PersianSTR, 200, screenHeight - 500, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 3, "default-bold" )		dxDrawText ( PersianSTR, 200, screenHeight - 200, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 3, "default-bold" )
			dxDrawText(PersianSTR2, 200, screenHeight - 500, screenWidth2, screenHeight2, tocolor(255, 255, 255, 255), 4, "default-bold", "left", "top", false, false, false, true)
	end)		end)
	print(PersianSTR)		print(PersianSTR)

RubyCommunity at 20:52, 13 March 2024

2024-03-13T20:52:15Z

← Older revision		Revision as of 20:52, 13 March 2024
Line 21:		Line 21:
	function fixPersianString(str)		function fixPersianString(str)
	if type(str) ~= 'string' then		if type(str) ~= 'string' then
	error("bad argument ~~at argument~~ 1 got "..type(str).."~~, use string or call tostring~~")		error("bad argument #1 (string expected, got "..type(str)..")")
	end		end
			if str:match("[\216-\219][\128-\191]") then
	local function reverseEN(word)		local function reverseEN(word)
	return word:gsub("(%w+)", function(w) return w:reverse() end)		return word:gsub("(%w+)", function(w) return w:reverse() end)
	end		end
	return ('‮'..str:gsub("%f[%a]%w+%f[%A]", reverseEN))		return ('‮'..str:gsub("%f[%a]%w+%f[%A]", reverseEN))
			else
			return str
			end
	end		end

	</syntaxhighlight>		</syntaxhighlight>
	</section>		</section>

RubyCommunity: /* fixPersianString */

2024-03-13T18:40:39Z

fixPersianString

← Older revision		Revision as of 18:40, 13 March 2024
Line 7:		Line 7:

	==Syntax==		==Syntax==
	<syntaxhighlight lang="lua">~~str~~ fixPersianString ( string text )</syntaxhighlight>		<syntaxhighlight lang="lua">string fixPersianString ( string text )</syntaxhighlight>

	===Required Arguments===		===Required Arguments===

RubyCommunity: Created page with "{{Useful Function}} NOTOC This function returns a fixed sorted bilingual RTL for strings consisting of Persian/Arabic and English. just copy & paste and see the magic ;D ==Syntax== str fixPersianString ( string text ) ===Required Arguments=== * '''text''': The bilingual string. ===Returns=== Returns a fixed string . ==Code== {{RequiredFunctions|Check}}

2024-03-13T18:25:12Z

Created page with "{{Useful Function}} <lowercasetitle></lowercasetitle> NOTOC This function returns a fixed sorted bilingual RTL for strings consisting of Persian/Arabic and English. just copy & paste and see the magic ;D ==Syntax== <syntaxhighlight lang="lua">str fixPersianString ( string text )</syntaxhighlight> ===Required Arguments=== * '''text''': The bilingual string. ===Returns=== Returns a fixed string . ==Code== {{RequiredFunctions|Check}} <section name="Server/Client si..."

New page
{{Useful Function}}
<lowercasetitle></lowercasetitle>
NOTOC
This function returns a fixed sorted bilingual RTL for strings consisting of Persian/Arabic and English.

just copy & paste and see the magic ;D

==Syntax==
<syntaxhighlight lang="lua">str fixPersianString ( string text )</syntaxhighlight>

===Required Arguments===
* '''text''': The bilingual string.

===Returns===
Returns a fixed string .

==Code==
{{RequiredFunctions|Check}}
<section name="Server/Client side Script" class="both" show="true">
<syntaxhighlight lang="lua">
function fixPersianString(str)
if type(str) ~= 'string' then
error("bad argument at argument 1 got "..type(str)..", use string or call tostring")
end
local function reverseEN(word)
return word:gsub("(%w+)", function(w) return w:reverse() end)
end
return ('‮'..str:gsub("%f[%a]%w+%f[%A]", reverseEN))
end

</syntaxhighlight>
</section>

==Example==
<section name="client" class="client" show="true">
This example print a message with persian and english words without any problem
<syntaxhighlight lang="lua">
local PersianSTR = fixPersianString("خب اینطوری به نظرم behtar شد و دیگه کلمات باهمدیگه قاطی نمیشن goodluck وقت بخیر ")
local screenWidth, screenHeight = guiGetScreenSize ( )
addEventHandler ( "onClientRender", root, function ()
dxDrawText ( PersianSTR, 200, screenHeight - 500, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 3, "default-bold" )
end)
print(PersianSTR)
outputChatBox (PersianSTR)
</syntaxhighlight>
</section>

Author: RubyCommunity

==See Also==
{{Useful_Functions}}