Palatynat Leocji

Hic habitat felicitas
https://forum.leocja.org/

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

https://forum.leocja.org/viewtopic.php?t=1117

Strona 15 z 29

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 1:25
autor: Sheldon Anszlus Robingren

Ostatnia wiadomość z poprzedniej strony wątku

Ciekawość mnie zżera, jak zamieniacie kwotę przelewu na słowną wartość?
Różne rzeczy człowiek widział, więc ciekawi mnie to. :D

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 7:07
autor: Franklin Garamond
A mnie — dlaczego kwot słownie nie ma na kwitku!?

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 9:24
autor: Helwetyk Romański
Sheldon Anszlus Lovelace pisze: ↑
18 lis 2022, 1:25
 Ciekawość mnie zżera, jak zamieniacie kwotę przelewu na słowną wartość?
Znalazłem paskudnego gotowca w Internecie, do którego dodałem swoją cegiełkę z rodzajami gramatycznymi:

Kod: Zaznacz cały

function policz($l,$t1,$t2,$t3,$rodzaj) {
  $j = array("", "jeden ", "dwa ", "trzy ", "cztery ", "pięć ", "sześć ",
    "siedem ", "osiem ", "dziewięć ", "dziesięć ", "jedenaście ",
    "dwanaście ", "trzynaście ", "czternaście ", "piętnaście ",
    "szesnaście ", "siedemnaście ", "osiemnaście ", "dziewiętnaście ");
  $j2 = array("", "jedna ", "dwie ", "trzy ", "cztery ", "pięć ", "sześć ",
    "siedem ", "osiem ", "dziewięć ", "dziesięć ", "jedenaście ",
    "dwanaście ", "trzynaście ", "czternaście ", "piętnaście ",
    "szesnaście ", "siedemnaście ", "osiemnaście ", "dziewiętnaście ");
  $j3 = array("", "jedno ", "dwa ", "trzy ", "cztery ", "pięć ", "sześć ",
    "siedem ", "osiem ", "dziewięć ", "dziesięć ", "jedenaście ",
    "dwanaście ", "trzynaście ", "czternaście ", "piętnaście ",
    "szesnaście ", "siedemnaście ", "osiemnaście ", "dziewiętnaście ");

  if($rodzaj == 2) { $j = $j2; }
  if($rodzaj == 3) { $j = $j3; }

  $d = array("", "", "dwadzieścia ", "trzydzieści ", "czterdzieści ",
    "pięćdziesiąt ", "sześćdziesiąt ", "siedemdziesiąt ",
    "osiemdziesiąt ", "dziewięćdziesiąt ");
  $s = array("","sto ", "dwieście ", "trzysta ", "czterysta ", "pięćset ",
    "sześćset ", "siedemset ", "osiemset ", "dziewięćset ");

  $txt = $s[0+substr($l,0,1)];
  if (substr($l,1,2)<20) $txt .= $j[0+substr($l,1,2)];
  else $txt .= $d[0+substr($l, 1,1)].$j[0+substr($l, 2,1)];
  if ($l==1) $txt .= "$t1 "; else {
    if ((substr($l,2,1)==2 or substr($l,2,1)==3 or substr($l,2,1)==4)
    and (substr($l,1,2)>20 or substr($l,1,2)<10))
    $txt .= "$t2 "; else $txt .= "$t3 ";
  }
  return $txt;
}

function slownie($liczba, $waluta_slownie) {
$waluta_slownie = json_decode($waluta_slownie, true);

if($waluta_slownie[6] == 2) $rodzaj_podstawy = 2; 
if($waluta_slownie[6] == 3) $rodzaj_podstawy = 3; 
if($waluta_slownie[7] == 2) $rodzaj_czesci = 2; 
if($waluta_slownie[7] == 3) $rodzaj_czesci = 3; 

  $liczba = str_replace(",", ".", $liczba);
  $liczba = number_format($liczba, 2, ",", "");
  $kwota=explode(",", $liczba);
  $kwotazl=sprintf("%012d",$kwota[0]);
  $kwotagr=sprintf("%03d",$kwota[1]);
  if ($kwotazl>999999999) $txt .= policz(substr($kwotazl, 0,3),"miliard","miliardy","miliardów",$rodzaj_podstawy);
  if ($kwotazl>999999) $txt .= policz(substr($kwotazl, 3,3),"milion","miliony","milionów",$rodzaj_podstawy);
  if ($kwotazl>999) $txt .= policz(substr($kwotazl, 6,3),"tysiąc","tysiące","tysięcy",$rodzaj_podstawy);
  if ($kwotazl>0) $txt .= policz(substr($kwotazl, 9,3),$waluta_slownie[0],$waluta_slownie[1],$waluta_slownie[2],$rodzaj_podstawy);
  if ($kwotazl==0) $txt="zero ".$waluta_slownie[2];
  $txt .= " i ";
  if($kwotagr!=='000')
  {
  $txt .= policz($kwotagr,$waluta_slownie[3],$waluta_slownie[4],$waluta_slownie[5],$rodzaj_czesci);
  }
  if ($kwotagr==0) $txt .= "zero ".$waluta_slownie[5];
  return $txt;
}
Przykładowy JSON:

Kod: Zaznacz cały

["korona","korony","koron","rubel","ruble","rubli",2,1]
["lir","liry","lirów","centesimo","centesimy","centesimów",1,3]
Korzystając z okazji, dziękuję uprzejmie. Jak się okazuje, w MBP można było otrzymać przelew wartości 0,00 ♇, trzeba się było tylko postarać. 🤣
Obrazek

Franklin Garamond pisze: ↑
18 lis 2022, 7:07
 A mnie — dlaczego kwot słownie nie ma na kwitku!?
W momencie, w którym trzeba byłoby umieścić dwa zapisy słowne, okazał się to niefortunny pomysł. 😜

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 10:34
autor: Sheldon Anszlus Robingren
Helwetyk Romański pisze: ↑
18 lis 2022, 9:24
Sheldon Anszlus Lovelace pisze: ↑
18 lis 2022, 1:25
 Ciekawość mnie zżera, jak zamieniacie kwotę przelewu na słowną wartość?
Znalazłem paskudnego gotowca w Internecie, do którego dodałem swoją cegiełkę z rodzajami gramatycznymi:

Kod: Zaznacz cały

function policz($l,$t1,$t2,$t3,$rodzaj) {
  $j = array("", "jeden ", "dwa ", "trzy ", "cztery ", "pięć ", "sześć ",
    "siedem ", "osiem ", "dziewięć ", "dziesięć ", "jedenaście ",
    "dwanaście ", "trzynaście ", "czternaście ", "piętnaście ",
    "szesnaście ", "siedemnaście ", "osiemnaście ", "dziewiętnaście ");
  $j2 = array("", "jedna ", "dwie ", "trzy ", "cztery ", "pięć ", "sześć ",
    "siedem ", "osiem ", "dziewięć ", "dziesięć ", "jedenaście ",
    "dwanaście ", "trzynaście ", "czternaście ", "piętnaście ",
    "szesnaście ", "siedemnaście ", "osiemnaście ", "dziewiętnaście ");
  $j3 = array("", "jedno ", "dwa ", "trzy ", "cztery ", "pięć ", "sześć ",
    "siedem ", "osiem ", "dziewięć ", "dziesięć ", "jedenaście ",
    "dwanaście ", "trzynaście ", "czternaście ", "piętnaście ",
    "szesnaście ", "siedemnaście ", "osiemnaście ", "dziewiętnaście ");

  if($rodzaj == 2) { $j = $j2; }
  if($rodzaj == 3) { $j = $j3; }

  $d = array("", "", "dwadzieścia ", "trzydzieści ", "czterdzieści ",
    "pięćdziesiąt ", "sześćdziesiąt ", "siedemdziesiąt ",
    "osiemdziesiąt ", "dziewięćdziesiąt ");
  $s = array("","sto ", "dwieście ", "trzysta ", "czterysta ", "pięćset ",
    "sześćset ", "siedemset ", "osiemset ", "dziewięćset ");

  $txt = $s[0+substr($l,0,1)];
  if (substr($l,1,2)<20) $txt .= $j[0+substr($l,1,2)];
  else $txt .= $d[0+substr($l, 1,1)].$j[0+substr($l, 2,1)];
  if ($l==1) $txt .= "$t1 "; else {
    if ((substr($l,2,1)==2 or substr($l,2,1)==3 or substr($l,2,1)==4)
    and (substr($l,1,2)>20 or substr($l,1,2)<10))
    $txt .= "$t2 "; else $txt .= "$t3 ";
  }
  return $txt;
}

function slownie($liczba, $waluta_slownie) {
$waluta_slownie = json_decode($waluta_slownie, true);

if($waluta_slownie[6] == 2) $rodzaj_podstawy = 2; 
if($waluta_slownie[6] == 3) $rodzaj_podstawy = 3; 
if($waluta_slownie[7] == 2) $rodzaj_czesci = 2; 
if($waluta_slownie[7] == 3) $rodzaj_czesci = 3; 

  $liczba = str_replace(",", ".", $liczba);
  $liczba = number_format($liczba, 2, ",", "");
  $kwota=explode(",", $liczba);
  $kwotazl=sprintf("%012d",$kwota[0]);
  $kwotagr=sprintf("%03d",$kwota[1]);
  if ($kwotazl>999999999) $txt .= policz(substr($kwotazl, 0,3),"miliard","miliardy","miliardów",$rodzaj_podstawy);
  if ($kwotazl>999999) $txt .= policz(substr($kwotazl, 3,3),"milion","miliony","milionów",$rodzaj_podstawy);
  if ($kwotazl>999) $txt .= policz(substr($kwotazl, 6,3),"tysiąc","tysiące","tysięcy",$rodzaj_podstawy);
  if ($kwotazl>0) $txt .= policz(substr($kwotazl, 9,3),$waluta_slownie[0],$waluta_slownie[1],$waluta_slownie[2],$rodzaj_podstawy);
  if ($kwotazl==0) $txt="zero ".$waluta_slownie[2];
  $txt .= " i ";
  if($kwotagr!=='000')
  {
  $txt .= policz($kwotagr,$waluta_slownie[3],$waluta_slownie[4],$waluta_slownie[5],$rodzaj_czesci);
  }
  if ($kwotagr==0) $txt .= "zero ".$waluta_slownie[5];
  return $txt;
}
Przykładowy JSON:

Kod: Zaznacz cały

["korona","korony","koron","rubel","ruble","rubli",2,1]
["lir","liry","lirów","centesimo","centesimy","centesimów",1,3]
Korzystając z okazji, dziękuję uprzejmie. Jak się okazuje, w MBP można było otrzymać przelew wartości 0,00 ♇, trzeba się było tylko postarać. 🤣
Obrazek

Franklin Garamond pisze: ↑
18 lis 2022, 7:07
 A mnie — dlaczego kwot słownie nie ma na kwitku!?
W momencie, w którym trzeba byłoby umieścić dwa zapisy słowne, okazał się to niefortunny pomysł. 😜
Tak naprawdę liczyłem, że może jakoś numberFormatera ogrnales, żeby odmieniał polskie na jedna/jeden

Kod: Zaznacz cały


$numberFormater = new NumberFormatter("pl", NumberFormatter::SPELLOUT);
echo $numberFormater->format(10204738571);

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 10:47
autor: Helwetyk Romański
Sheldon Anszlus Lovelace pisze: ↑
18 lis 2022, 10:34
 Tak naprawdę liczyłem, że może jakoś numberFormatera ogrnales, żeby odmieniał polskie na jedna/jeden

Kod: Zaznacz cały

$numberFormater = new NumberFormatter("pl", NumberFormatter::SPELLOUT);
echo $numberFormater->format(10204738571);
Takie eleganckie rozwiązanie byłoby dobre, gdyby nie nazwy walut. Do deklinacji mam, co prawda, osobną funkcję w innych systemach, jeszcze autorstwa Jaśnie Oświeconego diuka Kwaziego:

Kod: Zaznacz cały

function Declension($number, $one, $two_four, $five_or_more)
{
	if ($number == 1) return $one;

	$jedn = $number%10;
	$dzies = $number%100 - $jedn;

	if ($dzies != 10 && $jedn > 1 && $jedn < 5) return $two_four;
	
	return $five_or_more;
}
— ale po co sklejać, skoro można użyć brzydkiego (tak, nawet mnie te użyte funkcje bolą straszliwie), za to praktycznie gotowego rozwiązania. 😜

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 18:44
autor: Samuel Radziwiłł
Mam nadzieję, że piszę we właściwym wątku. Dyskusja o przystąpieniu RON do MBP utknęła bez podjęcia konkretnej decyzji. Z owej dyskusji wynikło, że chcemy pozostawić naszą forumową formę bankowości, ale wejść do MBP, by mieć możliwości takie jak np. wypłaty nagród za Turniej Rycerski czy inne podobne ewenty. Czy jest tak może być?

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 19:21
autor: Helwetyk Romański
Samuel Radziwiłł pisze: ↑
18 lis 2022, 18:44
 Mam nadzieję, że piszę we właściwym wątku. Dyskusja o przystąpieniu RON do MBP utknęła bez podjęcia konkretnej decyzji. Z owej dyskusji wynikło, że chcemy pozostawić naszą forumową formę bankowości, ale wejść do MBP, by mieć możliwości takie jak np. wypłaty nagród za Turniej Rycerski czy inne podobne ewenty. Czy jest tak może być?
Najzupełniej. Przy czym — państwo powinno zapewnić możliwość wymiany środków z Systemu Skarbowego/Banku Książęcego na środki w MBP oraz środków z MBP na środki w Systemie Skarbowym/Banku Książęcym.

Chodzi nam o możliwość wspólnej zabawy w jak najszerszym gronie, więc zasady i kurs wymiany powinny być tak ustalone, aby ktoś z RON, kto chce się pobawić w Edelweissie, miał taką faktyczną możliwość; i w drugą stronę, aby ktoś z Edelweissu, kto chciałby nabyć majątek w RON, mógł to uczynić.

Mam świadomość tego, że na niektórych rachunkach w RON operuje się milionami, więc — być może — jakichś ograniczeń kwotowych nie da się uniknąć. W tym już głowa Podskarbiego lub Sejmu, żeby tak określili zasady, żeby „było dobrze”. 😉

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 18 lis 2022, 21:15
autor: Samuel Radziwiłł
Podrzuciłem propozycje zrobienia "denominacji" dotychczasowych Denarów na "nowe" Czerwone Dukaty/Złote. Teraz tylko czekać na jakikolwiek odzew, bo po cichu liczę, że posiadając majątek w RON, będę mógł go wykorzystać np. w MAW lub innej mikronacji.

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 19 lis 2022, 12:39
autor: Helwetyk Romański
Samuel Radziwiłł pisze: ↑
18 lis 2022, 21:15
 Teraz tylko czekać na jakikolwiek odzew, bo po cichu liczę, że posiadając majątek w RON, będę mógł go wykorzystać np. w MAW lub innej mikronacji.
Mocno trzymam kciuki za pomyślne dołączenie RON do MBP. 🤞🏻

Jeżeli jednak chodzi o MAW, temat się zupełnie nie przyjął, więc…

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 20 lis 2022, 1:42
autor: Ignats ik Ruth
Helwetyk Romański pisze: ↑
19 lis 2022, 12:39
 Jeżeli jednak chodzi o MAW, temat się zupełnie nie przyjął, więc…
Bo to jest MAWrtwa, a co najmniej nieRMAWa (he, he) mikronacja.

Międzynarodowy Bank Pollinu: wersja demonstracyjna 🤑

: 21 lis 2022, 14:29
autor: Benjamin
Żebym dobrze zrozumiał. Tak oblicza się dzienne wynagrodzenie za wypowiedzi na forum?
x = 0,5[10(√n)]

Przy czym n to liczba wypowiedzi z danego dnia, a x to wynagrodzenie otrzymywane przez mieszkańca i państwo.
Strefa czasowa UTC+02:00
Strona 15 z 29

Technologię dostarcza phpBB® Forum Software © phpBB Limited

Polski pakiet językowy dostarcza phpBB.pl