Sourcetype value = | Num of float| Str of string| Bool of bool| List of int| Ring of ring
Sourcetype rotation = | All_around| Left_right| Dont_rotate
Sourcetype sprite = {name : string;x : float;y : float;direction : float;size : float;visible : bool;costume : int;costumes : int;rotation : rotation;radius : float;pen : bool;pen_hue : float;pen_size : float;bubble : value option;scripts : Scratch_blocks.script list;
} Sourcetype ink = | Line of float * float * float * float * float * float| Stamp of sprite
Sourcetype thread = {sprite : string;script : int;frames : frame list;result : value option;
} Sourcetype t = {sprites : sprite list;vars : (string * value) list;cells : (int * value) list;lists : (int * value list) list;next_id : int;ink : ink list;threads : thread list;now : float;timer_start : float;seed : int;broadcasts : string list;halt : bool;
} Sourceval run_script : string -> int -> t -> t