pardon hamitcim anlayamadım

bişi demedim zaten :P

up !..

While ile daha düzenlisi yapılabilirdi aslında. Çok saçma ve mantıksız bazı hatalarla karşılaştığım için for ile hazırladım. Sonuçta en iyi kod kısa olan kod değildir, çalışan ve algoritması en düzgün olan koddur. En büyük sayıyı bulmak için f_buyuk, sıralamak için f_sirala fonksiyonlarını kullanabilirsin. Ayrıca bu tarz sıralama işlemleri her ne kadar MySQL ile daha hızlı ve seri yapılıyor olsa da, sphere üzerinde yapacağınız işlemler bazen MySQL bağlantısından daha seri gerçekleşebiliyor. Gereksiz yere MySQL'i yormaya gerek duymamak gerekiyor.

Umarım işini görür.

[FUNCTION f_buyuk]

LOCAL.sayi1 = 5

LOCAL.sayi2 = 2

LOCAL.sayi3 = 8

LOCAL.sayi4 = 1

LOCAL.sayi5 = 4

FOR 1 5

IF <dLOCAL.sayi<dLOCAL._FOR>> > <dLOCAL.max>

  LOCAL.max = <dLOCAL.sayi<dLOCAL._FOR>>

ENDIF

ENDFOR

sysmessage <dLOCAL.max>



[FUNCTION f_sirala]

LOCAL.sayi1 = 5

LOCAL.sayi2 = 2

LOCAL.sayi3 = 8

LOCAL.sayi4 = 1

LOCAL.sayi5 = 4

FOR x 1 5

  FOR y 1 5

    IF <dLOCAL.sayi<dLOCAL.x>> > <dLOCAL.sayi<dLOCAL.y>>

      LOCAL.gecici = <dLOCAL.sayi<dLOCAL.y>>

      LOCAL.sayi<dLOCAL.y> = <dLOCAL.sayi<dLOCAL.x>>

      LOCAL.sayi<dLOCAL.x> = <dLOCAL.Gecici>

    ENDIF

  ENDFOR

ENDFOR

FOR 1 5

SYSMESSAGE <dLOCAL.sayi<dLOCAL._FOR>>

ENDFOR

oo ustam çalıştı çok makbule geçti saolasın

işte ya benim algoritmama benziyor

Saolasın Gökberk hemen halledip koymuşsun =))

basic bana yazdım dedi bende bakmıyordum. şöle bir başlangıç atmışım kalmış

[function sirala]

for x <dargv>

   while <argv[<dlocal.x>]> > <argv[<eval <dlocal.x>+1>]>

herkeze zaman ayırdığı için teşekkürler