Scratch/Ultra Fast Cloud Engine

Пример проекта Ultra Fast Cloud Engine

• https://scratch.mit.edu/projects/68788730/
  • работает быстро, но слишком уж много там исходных переменных - сильно затрудняет понимание и не позволяет использовать проект в качестве учебного

когда я получу [Load v]
Load (☁ Cloud) To [Cloud List v] :: custom

задать [☁ Connection? v] значение [0]
сменить фон на [Thumbnail v]
скрыть список [Cloud List v]
удалить (все v) из [Cloud List v]
удалить (все v) из [Tmp v]

задать [Chars v] значение [ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\\]^_`abcdefghijklmnopqrstuvwxyz{|}~�]
задать [Var v] значение [1]
повторить (длина (Chars)) 
  если <(длина (Var)) = [1]> , то 
    задать (буква (Var) в (Chars)) значение (слить [0] и (Var))
  иначе 
    задать (буква (Var) в (Chars)) значение (Var)
  конец
  изменить [Var v] на (1)
 конец

задать [☁ Connection? v] значение [1]

определить Load (Variable) To (List)
удалить (все v) из (List)
если <(остаток от деления (длина (Variable)) на (2)) = [0]> , то 
  удалить (все v) из [Tmp v]
  задать [Var v] значение [1]
  повторить ((длина (Variable)) / (2)) 
    задать [Var2 v] значение (слить (буква (Var) в (Variable)) и (буква ((Var) + (1)) в (Variable)))
    если <(Var2) = [00]> , то 
      добавить (Tmp :: list) к (List)
      удалить (все v) из [Tmp v]
    иначе 
      добавить (буква (Var2) в (Chars)) к [Tmp v]
    конец
    изменить [Var v] на (2)
  конец
end

определить Save (List) To (Variable)
удалить (все v) из [Tmp v]
задать [Var v] значение [1]
повторить (длина списка (List) :: list) 
  задать [Var2 v] значение [1]
  повторить (длина (элемент (Var) из (List) :: list)) 
    задать [Var3 v] значение ((буква (Var2) в (элемент (Var) из (List) :: list)) от [C_Engine v])
    если <(Var3) = [0]> , то 
      добавить [9] к [Tmp v]
      добавить [6] к [Tmp v]
    иначе 
      добавить (буква (1) в (Var3)) к [Tmp v]
      добавить (буква (2) в (Var3)) к [Tmp v]
    end
    изменить [Var2 v] на (1)
  end
  добавить [0] к [Tmp v]
  добавить [0] к [Tmp v]
  изменить [Var v] на (1)
end
задать (Variable) значение (Tmp :: list)
удалить (все v) из [Tmp v]

когда я получу [Save v]
Save [Cloud List v] To [☁ Cloud v] :: custom