تويت
السلام عليكم ورحمة الله وبركاته
سؤال سبق و طرح و كانت الاجابة كالتالي :
-------------
حميل .........الكود شغال تمام التمام
حاولت ان اجد حلا اخر
باستعمال string.mid و بعد محاولات لم اجد الا الحل التقليدي اي الشرط
----------------
احولت ان اوظف الدالة repeat لكن لم اعرف
فهل من نعديل للكود
افكار اخرى
سؤال سبق و طرح و كانت الاجابة كالتالي :
كود PHP:
C = Input.GetText("Input1");
x = string.format("%.2f", C)
function ALGERIA(C)
K = x
while true do
K, C = string.gsub(K, "^(-?%d+)(%d%d%d)", '%1,%2')
if (C==0) then
break
end
end
return K
end
Dialog.Message("Notice",ALGERIA(x));
حميل .........الكود شغال تمام التمام
حاولت ان اجد حلا اخر
باستعمال string.mid و بعد محاولات لم اجد الا الحل التقليدي اي الشرط
كود PHP:
C = Input.GetText("Input1");
if #C > 3 and #C < 7 then
igli = String.Mid(C,#C-2,3);
ala = String.Mid(C,1,#C-3)..","..igli;
elseif #C > 6 and #C < 10 then
igli = String.Mid(C,#C-2,3);
igl = String.Mid(C,#C-5,3);
ala = String.Mid(C,1,#C-6)..","..igl..","..igli;
elseif #C > 9 and #C < 13 then
igli = String.Mid(C,#C-2,3);
igl = String.Mid(C,#C-5,3);
ig = String.Mid(C,#C-8,#C-9);
ala = String.Mid(C,1,#C-6)..","..ig..","..igl..","..igli;
else
ala = C;
end
Dialog.Message("",ala..".00");
----------------
احولت ان اوظف الدالة repeat لكن لم اعرف
فهل من نعديل للكود
افكار اخرى
.. لك مني أجمل تحية .
تعليق