Date: 2017/01/22 16:11:16 UTC-08:00
Type: Denizen Script
#
#Rechnet 111(BIN/2) in das System(DEZ/10) um.
#- run s@dcalc "def:111|2|10"
dcalc:
type: task
speed: 0t
script:
- define input_value "<def[1]>"
- define input_system "<def[2]>"
- define output_system "<def[3]>"
############
#Error-Check
############
- if <def[1]||x> !matches number || <def[2]||x> !matches number || <def[3]||x> !matches number {
- narrate "<&4>ERROR Input not a number <&6><def[1]>[<def[2]>] <&4>to <&6><def[3]> <&4>is invalid!"
- queue clear
}
- if <def[input_value].split_by[].remove[1].filter[is[MORE].than[<def[input_system].sub_int[1]>]].size> > 0 {
- narrate "<&4>ERROR Input <&6><def[input_value]> <&4>is not a valid <&6><def[input_system]>-System <&4>number."
- queue clear
}
- if <def[input_system]> > 10 {
- narrate "<&4>ERROR Systems above 10 aren't supported yet."
- queue clear
}
##########################
#1. define Worth
##########################
#1 * 2^0 = 1
#1 * 2^1 = 2
#1 * 2^2 = 4
- define input_worth 0
- foreach <def[input_value].split_by[].remove[1].reverse> {
- define input_worth "<def[input_worth].add_int[<def[value].mul_int[<def[input_system].power[<def[loop_index].sub_int[1]>]>]>]>"
}
- narrate "<def[input_worth]>"