code.skript.pl - kod RVLFXXHS

options:
    conv.score: "%nl% &fLiczba (10) &8%arg 1% %nl% &fLiczba (2) &8%{_bin}% %nl% &fBity (0)&8 %{_slots}%"
    conv.usage: &fPoprawne uzycie /bindec <17b bin>
    conv.usage2: &fPoprawne uzycie&8 /decbin <0-65536>
    conv.reload: "sk reload konwersja"
    conv.scoredec: "%nl% &fLiczba (2) &8%arg 1% %nl% &fLiczba (10) &8%{_dec}%"
    conv.max.dec: "&fMaksymalna liczba to 65536"
    conv.max.bin: "&fMaksymalna liczba to 17b"
    
command /convr:
    trigger:
        console command {@conv.reload}
    
command /decbin [<number>]:
    usage: {@conv.usage2}
    trigger:
    
        set {_dec} to arg 1
        
        if {_dec} > 65536:
            send {@conv.max.dec}
            stop
            
        loop {_dec} times:
            set {_mod} to mod({_dec}, 2)
            set {_binb} to {_mod}*10^{_times}
            set {_bin} to {_bin}+{_binb}
            set {_dec} to rounded down {_dec}/2
            add 1 to {_times}
            
            if {_dec} = 0:
                set {_bin} to {_bin}/10
                set {_slots} to {_times}-1
                send {@conv.score}
                stop
                
command /bindec [<number>]:
    usage: {@conv.usage}
    trigger:
    
        set {_bin} to arg 1
        
        if {_bin} > 10^17:
            send {@conv.max.bin}
            stop
            
        loop 17 times:
            set {_mod} to mod({_bin}, 2)
            add {_mod}*2^{_times} to {_dec}
            set {_bin} to {_bin}-mod({_bin}, 2)
            set {_bin} to {_bin}/10
            add 1 to {_times}
            
        set {_dec} to {_dec}/2
        send {@conv.scoredec}