block.m

来自「电力系统分析计算程序」· M 代码 · 共 7 行

function [enables,prompts] = block(a,object,values,enables,prompts)

colors = {'black','blue','green','red','yellow', ...
          'cyan','orange','darkgreen','lightblue','gray'};
numc = rem(round(str2num(values{5}))-1,10)+1;
set_param(object,'BackgroundColor',colors{numc});