<?xml version="1.0"?><program><procedure pos="16:1"><name text="ShowProgress" pos="16:23"/><parameters pos="16:23"><var pos="16:25"><ident text="xProgress" pos="16:34"/><type text="integer" pos="16:43"/></var></parameters><compoundstmt pos="17:1"><ifstmt pos="18:3"><expr pos="18:6" pos1="18:26"><op text="(" pos="18:7"/><expr pos="18:7" pos1="18:25"><dsgn pos="18:7"><node text="ProgressBar" pos="18:18"/></dsgn><op text="&#60;&#62;" pos="18:21"/><dsgn pos="18:22"><node text="nil" pos="18:25"/></dsgn></expr><op text=")" pos="18:26"/></expr><thenstmt pos="19:10"><assignstmt pos="19:10"><dsgn pos="19:10"><node text="ProgressBar" pos="19:21"/><node text="Position" pos="19:30"/></dsgn><expr pos="19:34" pos1="19:43"><dsgn pos="19:34"><node text="xProgress" pos="19:43"/></dsgn></expr></assignstmt></thenstmt></ifstmt></compoundstmt></procedure><procedure pos="22:1"><name text="SetProgress" pos="22:22"/><parameters pos="22:22"><var pos="22:24"><ident text="xMin" pos="22:28"/><ident text="xMax" pos="22:34"/><type text="integer" pos="22:43"/></var></parameters><compoundstmt pos="23:1"><ifstmt pos="24:3"><expr pos="24:6" pos1="24:26"><op text="(" pos="24:7"/><expr pos="24:7" pos1="24:25"><dsgn pos="24:7"><node text="ProgressBar" pos="24:18"/></dsgn><op text="&#60;&#62;" pos="24:21"/><dsgn pos="24:22"><node text="nil" pos="24:25"/></dsgn></expr><op text=")" pos="24:26"/></expr><thenstmt pos="24:32"><compoundstmt pos="24:32"><assignstmt pos="25:5"><dsgn pos="25:5"><node text="ProgressBar" pos="25:16"/><node text="Min" pos="25:20"/></dsgn><expr pos="25:24" pos1="25:28"><dsgn pos="25:24"><node text="xMin" pos="25:28"/></dsgn></expr></assignstmt><assignstmt pos="26:5"><dsgn pos="26:5"><node text="ProgressBar" pos="26:16"/><node text="Max" pos="26:20"/></dsgn><expr pos="26:24" pos1="26:28"><dsgn pos="26:24"><node text="xMax" pos="26:28"/></dsgn></expr></assignstmt></compoundstmt></thenstmt></ifstmt></compoundstmt></procedure><procedure pos="30:1"><name text="SetProgressBarMax" pos="30:28"/><parameters pos="30:28"><var pos="30:30"><ident text="xMax" pos="30:34"/><type text="integer" pos="30:43"/></var></parameters><compoundstmt pos="31:1"><ifstmt pos="32:3"><expr pos="32:6" pos1="32:26"><op text="(" pos="32:7"/><expr pos="32:7" pos1="32:25"><dsgn pos="32:7"><node text="ProgressBar" pos="32:18"/></dsgn><op text="&#60;&#62;" pos="32:21"/><dsgn pos="32:22"><node text="nil" pos="32:25"/></dsgn></expr><op text=")" pos="32:26"/></expr><thenstmt pos="33:10"><assignstmt pos="33:10"><dsgn pos="33:10"><node text="ProgressBar" pos="33:21"/><node text="Max" pos="33:25"/></dsgn><expr pos="33:29" pos1="33:33"><dsgn pos="33:29"><node text="xMax" pos="33:33"/></dsgn></expr></assignstmt></thenstmt></ifstmt></compoundstmt></procedure><procedure pos="36:1"><name text="ShowProgressNext" pos="36:27"/><compoundstmt pos="37:1"><ifstmt pos="38:3"><expr pos="38:6" pos1="38:26"><op text="(" pos="38:7"/><expr pos="38:7" pos1="38:25"><dsgn pos="38:7"><node text="ProgressBar" pos="38:18"/></dsgn><op text="&#60;&#62;" pos="38:21"/><dsgn pos="38:22"><node text="nil" pos="38:25"/></dsgn></expr><op text=")" pos="38:26"/></expr><thenstmt pos="39:10"><assignstmt pos="39:10"><dsgn pos="39:10"><node text="ProgressBar" pos="39:21"/><node text="Position" pos="39:30"/></dsgn><expr pos="39:34" pos1="39:58"><dsgn pos="39:34"><node text="ProgressBar" pos="39:45"/><node text="Position" pos="39:54"/></dsgn><op text="+" pos="39:56"/><number text="1" pos="39:58"/></expr></assignstmt></thenstmt></ifstmt></compoundstmt></procedure><procedure pos="42:1"><name text="SetProgressBar" pos="42:25"/><parameters pos="42:25"><var pos="42:27"><ident text="xMin" pos="42:31"/><ident text="xMax" pos="42:37"/><type text="integer" pos="42:46"/></var></parameters><compoundstmt pos="43:1"><callstmt pos="44:3"><dsgn pos="44:3"><node text="SetProgress" pos="44:14"/><expr pos="44:16" pos1="44:20"><dsgn pos="44:16"><node text="xMin" pos="44:20"/></dsgn></expr><expr pos="44:22" pos1="44:26"><dsgn pos="44:22"><node text="xMax" pos="44:26"/></dsgn></expr></dsgn></callstmt></compoundstmt></procedure><procedure pos="47:1"><name text="StatusBarSimpleText" pos="47:30"/><parameters pos="47:30"><var pos="47:32"><ident text="xText" pos="47:37"/><type text="string" pos="47:45"/></var></parameters><compoundstmt pos="48:1"><ifstmt pos="49:3"><expr pos="49:6" pos1="49:24"><op text="(" pos="49:7"/><expr pos="49:7" pos1="49:23"><dsgn pos="49:7"><node text="StatusBar" pos="49:16"/></dsgn><op text="&#60;&#62;" pos="49:19"/><dsgn pos="49:20"><node text="nil" pos="49:23"/></dsgn></expr><op text=")" pos="49:24"/></expr><thenstmt pos="50:10"><assignstmt pos="50:10"><dsgn pos="50:10"><node text="StatusBar" pos="50:19"/><node text="SimpleText" pos="50:30"/></dsgn><expr pos="50:34" pos1="50:39"><dsgn pos="50:34"><node text="xText" pos="50:39"/></dsgn></expr></assignstmt></thenstmt></ifstmt></compoundstmt></procedure><compoundstmt pos="53:1"/><types/></program>