list [concat "2.10"] [concat "2.20"] [concat "2.30"] [concat "2.40"]| get 0|show-alert

// Example 1. returns how many times a 81 is divisible by 3
loop [val count 0] [val n 81] {
    if [mod $n 3 | eq 0] {
        recur [$count | plus 1] [$n | div 3]
    } -else {
        log [format "The answer is %d" $count] //prints 'The answer is 4'
    }
}

global [val j 8] 
log $j

global [val j [plus  1 $j]] -override
log $j

repeat -index [val x] -times 100 -command {
    emit $x
} | to-list

proc "count-checked" {
	with [get-view "vew" | get-table "table"] {
		let [val item -input] [val count [int 0]] {
			get-items | foreach {
		    		let [val item -input] {
			    		if [$item | get-property checked -raw | equals true] {
			      			$count | plus 1
			      		}
		    		}
			}
			$count | equals 2 |verify-true
	        }
	}
}

loop [val count 1] [val n 5] {

    if [$count | lt $n] {

        show-alert $count

        recur [$count | plus 1] [$n]

    } -else {

      show-alert "completed"

    }
}

global [val perspective "Initialized"]

global [ val perspective [get-table | get-property[concat [concat "getItems().TableItem[" $count ] "].getText()" ] -raw]  ] -override

global [val count 0] 

proc "count-checked" {
	with [get-view view | get-table  table]] {
		get-items | foreach {
	    	let [val item -input] {
	    		format "project %s" [$item | get-property checked -raw] | log
	      		if [$item | get-property checked -raw | equals true] {
	      			global [val count [plus 1 $count]] -override
	      			format "project %s" [$count] | log
	      		}
	    	}
	   }
	   $count | equals 2 |verify-true
	}
}