("display_bits",
[
	    (store_script_param, ":value", 1),
		(str_store_string, s1, "str_empty_string"),
		(try_for_range, ":unused", 0, 32),
		  (store_mod, reg1, ":value", 2),
		  (try_begin),
		    (lt, reg1, 0),
			(assign, reg1, 1),
		  (try_end),
		  (str_store_string, s1, "@{reg1}{s1}"),
		  (val_shr, ":value", 1),
		(try_end),
		(display_message, s1),
]),