Skip to content

GitLab

A
appinventor-sources
Commit 7f02aeb0 authored by Jeffrey I. Schiller's avatar Jeffrey I. Schiller
Browse files
Options

Update MIT AICompanaion App to version 2.04 (versionCode 204). The App 

will now tell the user that they don't have a Bar Code Scanning App if
they don't (instead of giving a generic error).

Change-Id: I5788d648c4d84c7d77c7020b3e6e5956bec84ded
parent 6127450d
Hide whitespace changes
Inline Side-by-side
Showing with 659 additions and 572 deletions
appinventor/aiplayapp/src/edu/mit/appinventor/aicompanion2/Screen1.blk
View file @ 7f02aeb0
<!DOCTYPE YACodeBlocks SYSTEM "support/save_format.dtd"> <!DOCTYPE YACodeBlocks SYSTEM "support/save_format.dtd">
<YACodeBlocks ya-version="68" lang-version="17"> <YACodeBlocks ya-version="69" lang-version="17">
<Pages><Page page-name=" " page-color="237 245 211" page-width="2220" page-height="1600" page-drawer="My Definitions" > <Pages><Page page-name=" " page-color="237 245 211" page-width="2220" page-height="1600" page-drawer="My Definitions" >
<PageBlocks> <PageBlocks>
<BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2476" genus-name="componentSetter" has-focus="yes" > <Block id="2460" genus-name="Screen-ErrorOccurred" >
<Location><X>684</X><Y>1302</Y></Location> <Location><X>42</X><Y>1220</Y></Location>
<Label>RetryButton.Visible</Label> <Label>Screen1.ErrorOccurred</Label>
<BeforeBlockId>2441</BeforeBlockId> <Sockets num-sockets="5" >
<Sockets num-sockets="1" > <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="component" position-type="single" con-block-id="2464" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2478" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="functionName" position-type="single" con-block-id="2466" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="errorNumber" position-type="single" con-block-id="2468" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="message" position-type="single" con-block-id="2470" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2480" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> <BlockStub><StubParentName>Label8.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2480" genus-name="componentSetter" >
<Block id="2478" genus-name="false" > <Location><X>137</X><Y>1340</Y></Location>
<Location><X>888</X><Y>1305</Y></Location> <Label>Label8.Visible</Label>
<Label>false</Label> <BeforeBlockId>2460</BeforeBlockId>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2476" ></BlockConnector></Plug> <AfterBlockId>2473</AfterBlockId>
</Block>
<BlockStub><StubParentName>Setup</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="2481" genus-name="caller-command" >
<Location><X>192</X><Y>1334</Y></Location>
<Label>Setup</Label>
<BeforeBlockId>2480</BeforeBlockId>
</Block>
</BlockStub>
<Block id="2509" genus-name="Screen-Initialize" >
<Location><X>538</X><Y>491</Y></Location>
<Label>Screen1.Initialize</Label>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2600" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2482" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>Setup</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="2600" genus-name="caller-command" >
<Location><X>568</X><Y>524</Y></Location>
<Label>Setup</Label>
<BeforeBlockId>2509</BeforeBlockId>
</Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>Button1.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2647" genus-name="componentSetter" > <Block id="2473" genus-name="ifelse" >
<Location><X>170</X><Y>831</Y></Location> <Location><X>137</X><Y>1378</Y></Location>
<Label>Button1.Enabled</Label> <Label>ifelse</Label>
<BeforeBlockId>1356</BeforeBlockId> <BeforeBlockId>2480</BeforeBlockId>
<AfterBlockId>2653</AfterBlockId> <AfterBlockId>2481</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="3" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2649" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="2485" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="2493" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="else-do" is-indented="yes" position-type="single" con-block-id="2497" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> <BlockStub><StubParentName>Setup</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="2481" genus-name="caller-command" >
<BlockStub><StubParentName>ScanButton.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2653" genus-name="componentSetter" > <Location><X>137</X><Y>1522</Y></Location>
<Location><X>170</X><Y>869</Y></Location> <Label>Setup</Label>
<Label>ScanButton.Enabled</Label> <BeforeBlockId>2473</BeforeBlockId>
<BeforeBlockId>2647</BeforeBlockId>
<AfterBlockId>2744</AfterBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2655" ></BlockConnector>
</Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2744" genus-name="componentSetter" > <BlockStub><StubParentName>Label8.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2497" genus-name="componentSetter" >
<Location><X>170</X><Y>907</Y></Location> <Location><X>196</X><Y>1471</Y></Location>
<Label>RetryButton.Visible</Label> <Label>Label8.Text</Label>
<BeforeBlockId>2653</BeforeBlockId> <BeforeBlockId>2473</BeforeBlockId>
<AfterBlockId>2400</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2746" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2491" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>HorizontalArrangement5.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2400" genus-name="componentSetter" > <Block id="2491" genus-name="text" >
<Location><X>170</X><Y>945</Y></Location> <Location><X>344</X><Y>1474</Y></Location>
<Label>HorizontalArrangement5.Visible</Label> <Label>An Error Occurred. Please try pressing \"Connect to App Inventor\" again.</Label>
<BeforeBlockId>2744</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2497" ></BlockConnector></Plug>
<AfterBlockId>2456</AfterBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2404" ></BlockConnector>
</Sockets>
</Block> </Block>
</BlockStub> <BlockStub><StubParentName>Label8.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2493" genus-name="componentSetter" >
<BlockStub><StubParentName>Label8.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2456" genus-name="componentSetter" > <Location><X>197</X><Y>1422</Y></Location>
<Location><X>170</X><Y>983</Y></Location> <Label>Label8.Text</Label>
<Label>Label8.Visible</Label> <BeforeBlockId>2473</BeforeBlockId>
<BeforeBlockId>2400</BeforeBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2458" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2489" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="2458" genus-name="false" > <Block id="2489" genus-name="text" >
<Location><X>334</X><Y>986</Y></Location> <Location><X>345</X><Y>1425</Y></Location>
<Label>false</Label> <Label>Your phone does not appear to have a Bar Code Scanning Application Installed.</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2456" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2493" ></BlockConnector></Plug>
</Block>
<Block id="2404" genus-name="false" >
<Location><X>462</X><Y>948</Y></Location>
<Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2400" ></BlockConnector></Plug>
</Block>
<Block id="2746" genus-name="true" >
<Location><X>374</X><Y>910</Y></Location>
<Label>true</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2744" ></BlockConnector></Plug>
</Block>
<Block id="2655" genus-name="false" >
<Location><X>380</X><Y>872</Y></Location>
<Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2653" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2649" genus-name="false" > <Block id="2485" genus-name="yail-equal" >
<Location><X>354</X><Y>834</Y></Location> <Location><X>259</X><Y>1381</Y></Location>
<Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2647" ></BlockConnector></Plug>
</Block>
<Block id="2410" genus-name="yail-equal" >
<Location><X>224</X><Y>758</Y></Location>
<Label>=</Label> <Label>=</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2396" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2473" ></BlockConnector></Plug>
<Sockets num-sockets="2" > <Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2408" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2483" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2412" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2487" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="2412" genus-name="number" > <Block id="2487" genus-name="number" has-focus="yes" >
<Location><X>508</X><Y>765</Y></Location> <Location><X>477</X><Y>1388</Y></Location>
<Label>6</Label> <Label>1501</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2410" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2485" ></BlockConnector></Plug>
</Block>
<Block id="2408" genus-name="string-length" >
<Location><X>234</X><Y>765</Y></Location>
<Label>length</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2410" ></BlockConnector></Plug>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="text" position-type="single" con-block-id="2406" ></BlockConnector>
</Sockets>
</Block> </Block>
<BlockStub><StubParentName>code.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2406" genus-name="componentGetter" > <BlockStub><StubParentName>errorNumber</StubParentName><StubParentGenus>argument</StubParentGenus><Block id="2483" genus-name="getter" >
<Location><X>364</X><Y>765</Y></Location> <Location><X>269</X><Y>1388</Y></Location>
<Label>code.Text</Label> <Label>errorNumber</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2408" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2485" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="2402" genus-name="true" > <Block id="2482" genus-name="true" >
<Location><X>461</X><Y>1035</Y></Location> <Location><X>301</X><Y>1343</Y></Location>
<Label>true</Label> <Label>true</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2398" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2480" ></BlockConnector></Plug>
</Block> </Block>
<BlockStub><StubParentName>HorizontalArrangement5.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2398" genus-name="componentSetter" > <Block id="2470" genus-name="argument" >
<Location><X>169</X><Y>1032</Y></Location> <Location><X>346</X><Y>1307</Y></Location>
<Label>HorizontalArrangement5.Visible</Label> <Label>message</Label>
<BeforeBlockId>2396</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug>
<Sockets num-sockets="1" > </Block>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2402" ></BlockConnector> <Block id="2468" genus-name="argument" >
</Sockets> <Location><X>346</X><Y>1279</Y></Location>
<Label>errorNumber</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug>
</Block>
<Block id="2466" genus-name="argument" >
<Location><X>346</X><Y>1251</Y></Location>
<Label>functionName</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug>
</Block>
<Block id="2464" genus-name="argument" >
<Location><X>346</X><Y>1223</Y></Location>
<Label>component</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub>
<Block id="1723" genus-name="define-void" > <Block id="1723" genus-name="define-void" >
<Location><X>649</X><Y>1197</Y></Location> <Location><X>664</X><Y>1237</Y></Location>
<Label>badversion</Label> <Label>badversion</Label>
<Sockets num-sockets="2" > <Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="arg" is-expandable="yes" position-type="single" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="arg" is-expandable="yes" position-type="single" ></BlockConnector>
...@@ -160,7 +122,7 @@ ...@@ -160,7 +122,7 @@
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1729" genus-name="setterGlobal" > <BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1729" genus-name="setterGlobal" >
<Location><X>684</X><Y>1226</Y></Location> <Location><X>699</X><Y>1266</Y></Location>
<Label>expired</Label> <Label>expired</Label>
<BeforeBlockId>1723</BeforeBlockId> <BeforeBlockId>1723</BeforeBlockId>
<AfterBlockId>2441</AfterBlockId> <AfterBlockId>2441</AfterBlockId>
...@@ -170,7 +132,7 @@ ...@@ -170,7 +132,7 @@
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>Expireblock.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2441" genus-name="componentSetter" > <BlockStub><StubParentName>Expireblock.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2441" genus-name="componentSetter" >
<Location><X>684</X><Y>1264</Y></Location> <Location><X>699</X><Y>1304</Y></Location>
<Label>Expireblock.Visible</Label> <Label>Expireblock.Visible</Label>
<BeforeBlockId>1729</BeforeBlockId> <BeforeBlockId>1729</BeforeBlockId>
<AfterBlockId>2476</AfterBlockId> <AfterBlockId>2476</AfterBlockId>
...@@ -179,242 +141,320 @@ ...@@ -179,242 +141,320 @@
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2476" genus-name="componentSetter" >
<Location><X>699</X><Y>1342</Y></Location>
<Label>RetryButton.Visible</Label>
<BeforeBlockId>2441</BeforeBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2478" ></BlockConnector>
</Sockets>
</Block>
</BlockStub>
<Block id="2478" genus-name="false" >
<Location><X>903</X><Y>1345</Y></Location>
<Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2476" ></BlockConnector></Plug>
</Block>
<Block id="2443" genus-name="true" > <Block id="2443" genus-name="true" >
<Location><X>882</X><Y>1267</Y></Location> <Location><X>897</X><Y>1307</Y></Location>
<Label>true</Label> <Label>true</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2441" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2441" ></BlockConnector></Plug>
</Block> </Block>
<Block id="1733" genus-name="true" > <Block id="1733" genus-name="true" >
<Location><X>834</X><Y>1229</Y></Location> <Location><X>849</X><Y>1269</Y></Location>
<Label>true</Label> <Label>true</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1729" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1729" ></BlockConnector></Plug>
</Block> </Block>
<Block id="1505" genus-name="Button-Click" > <BlockStub><StubParentName>Label8.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2495" genus-name="componentSetter" >
<Location><X>655</X><Y>1109</Y></Location>
<Label>ScanButton.Click</Label>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="1527" ></BlockConnector>
</Sockets>
</Block>
<Block id="1527" genus-name="BarcodeScanner-DoScan" >
<Location><X>685</X><Y>1142</Y></Location> <Location><X>685</X><Y>1142</Y></Location>
<Label>BarcodeScanner1.DoScan</Label> <Label>Label8.Visible</Label>
<BeforeBlockId>1505</BeforeBlockId> <BeforeBlockId>1505</BeforeBlockId>
</Block> <AfterBlockId>1527</AfterBlockId>
<Block id="1728" genus-name="Button-Click" >
<Location><X>641</X><Y>1010</Y></Location>
<Label>RestartButton.Click</Label>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="1732" ></BlockConnector>
</Sockets>
</Block>
<BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1732" genus-name="setterGlobal" >
<Location><X>671</X><Y>1043</Y></Location>
<Label>expired</Label>
<BeforeBlockId>1728</BeforeBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="1734" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2499" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="1734" genus-name="true" > <Block id="2499" genus-name="false" >
<Location><X>821</X><Y>1046</Y></Location> <Location><X>849</X><Y>1145</Y></Location>
<Label>true</Label> <Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1732" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2495" ></BlockConnector></Plug>
</Block>
<Block id="2594" genus-name="define-void" >
<Location><X>638</X><Y>621</Y></Location>
<Label>Setup</Label>
<Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="arg" is-expandable="yes" position-type="single" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2525" ></BlockConnector>
</Sockets>
</Block>
<BlockStub><StubParentName>ipaddress</StubParentName><StubParentGenus>def</StubParentGenus><Block id="2525" genus-name="setterGlobal" >
<Location><X>673</X><Y>650</Y></Location>
<Label>ipaddress</Label>
<BeforeBlockId>2594</BeforeBlockId>
<AfterBlockId>2513</AfterBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2505" ></BlockConnector>
</Sockets>
</Block> </Block>
</BlockStub> <BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2472" genus-name="componentSetter" >
<BlockStub><StubParentName>iplabel.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2513" genus-name="componentSetter" > <Location><X>1157</X><Y>162</Y></Location>
<Location><X>673</X><Y>688</Y></Location> <Label>RetryButton.Visible</Label>
<Label>iplabel.Text</Label> <BeforeBlockId>1541</BeforeBlockId>
<BeforeBlockId>2525</BeforeBlockId> <AfterBlockId>2469</AfterBlockId>
<AfterBlockId>2635</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2529" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2479" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>Button1.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2635" genus-name="componentSetter" > <BlockStub><StubParentName>Button1.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2469" genus-name="componentSetter" >
<Location><X>673</X><Y>726</Y></Location> <Location><X>1157</X><Y>200</Y></Location>
<Label>Button1.Enabled</Label> <Label>Button1.Enabled</Label>
<BeforeBlockId>2513</BeforeBlockId> <BeforeBlockId>2472</BeforeBlockId>
<AfterBlockId>2639</AfterBlockId> <AfterBlockId>2471</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2637" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2477" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>ScanButton.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2639" genus-name="componentSetter" > <BlockStub><StubParentName>ScanButton.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2471" genus-name="componentSetter" >
<Location><X>673</X><Y>764</Y></Location> <Location><X>1157</X><Y>238</Y></Location>
<Label>ScanButton.Enabled</Label> <Label>ScanButton.Enabled</Label>
<BeforeBlockId>2635</BeforeBlockId> <BeforeBlockId>2469</BeforeBlockId>
<AfterBlockId>2740</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2643" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2475" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2740" genus-name="componentSetter" > <Block id="2475" genus-name="false" >
<Location><X>673</X><Y>802</Y></Location> <Location><X>1367</X><Y>241</Y></Location>
<Label>RetryButton.Visible</Label> <Label>false</Label>
<BeforeBlockId>2639</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2471" ></BlockConnector></Plug>
<AfterBlockId>2604</AfterBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2748" ></BlockConnector>
</Sockets>
</Block> </Block>
</BlockStub> <Block id="2477" genus-name="false" >
<Block id="2604" genus-name="ifelse" > <Location><X>1341</X><Y>203</Y></Location>
<Location><X>673</X><Y>840</Y></Location> <Label>false</Label>
<Label>ifelse</Label> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2469" ></BlockConnector></Plug>
<BeforeBlockId>2740</BeforeBlockId> </Block>
<Sockets num-sockets="3" > <Block id="2479" genus-name="true" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="2602" ></BlockConnector> <Location><X>1361</X><Y>165</Y></Location>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="2590" ></BlockConnector> <Label>true</Label>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="else-do" is-indented="yes" position-type="single" con-block-id="2606" ></BlockConnector> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2472" ></BlockConnector></Plug>
</Block>
<Block id="2178" genus-name="string-append" >
<Location><X>185</X><Y>52</Y></Location>
<Label>join</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2211" ></BlockConnector></Plug>
<Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2180" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2182" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>ConnectFailLabel.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2606" genus-name="componentSetter" > <Block id="2182" genus-name="string-append" >
<Location><X>732</X><Y>929</Y></Location> <Location><X>361</X><Y>59</Y></Location>
<Label>ConnectFailLabel.Visible</Label> <Label>join</Label>
<BeforeBlockId>2604</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2178" ></BlockConnector></Plug>
<Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2160" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2186" ></BlockConnector>
</Sockets>
</Block>
<Block id="2186" genus-name="text" >
<Location><X>727</X><Y>66</Y></Location>
<Label>\/rendezvous\/</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2182" ></BlockConnector></Plug>
</Block>
<Block id="2160" genus-name="text" >
<Location><X>371</X><Y>66</Y></Location>
<Label>rendezvous.appinventor.mit.edu</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2182" ></BlockConnector></Plug>
</Block>
<Block id="2180" genus-name="text" >
<Location><X>195</X><Y>67</Y></Location>
<Label>http:\/\/</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2178" ></BlockConnector></Plug>
</Block>
<Block id="2445" genus-name="Button-Click" >
<Location><X>748</X><Y>364</Y></Location>
<Label>MarketButton.Click</Label>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2608" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2583" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> <Block id="2583" genus-name="ActivityStarter-StartActivity" >
<Block id="2608" genus-name="false" > <Location><X>778</X><Y>397</Y></Location>
<Location><X>972</X><Y>932</Y></Location> <Label>ActivityStarter1.StartActivity</Label>
<Label>false</Label> <BeforeBlockId>2445</BeforeBlockId>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2606" ></BlockConnector></Plug>
</Block> </Block>
<BlockStub><StubParentName>ConnectFailLabel.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2590" genus-name="componentSetter" > <Block id="1063" genus-name="Web-PostText" >
<Location><X>733</X><Y>880</Y></Location> <Location><X>55</X><Y>103</Y></Location>
<Label>ConnectFailLabel.Visible</Label> <Label>Web1.PostText</Label>
<BeforeBlockId>2604</BeforeBlockId> <BeforeBlockId>2211</BeforeBlockId>
<AfterBlockId>1066</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2592" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="text" position-type="single" con-block-id="1059" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> <Block id="1066" genus-name="TextBox-HideKeyboard" >
<Block id="2592" genus-name="true" > <Location><X>55</X><Y>497</Y></Location>
<Location><X>973</X><Y>883</Y></Location> <Label>code.HideKeyboard</Label>
<Label>true</Label> <BeforeBlockId>1063</BeforeBlockId>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2590" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2602" genus-name="logical-not" > <Block id="1059" genus-name="Web-BuildPostData" >
<Location><X>787</X><Y>843</Y></Location> <Location><X>239</X><Y>106</Y></Location>
<Label>not</Label> <Label>Web1.BuildPostData</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2604" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1063" ></BlockConnector></Plug>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2501" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="list" position-type="single" con-block-id="1061" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="2501" genus-name="PhoneStatus-isConnected" > <Block id="1061" genus-name="make-list" >
<Location><X>839</X><Y>843</Y></Location> <Location><X>461</X><Y>106</Y></Location>
<Label>PhoneStatus1.isConnected</Label> <Label>make a list</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2602" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1059" ></BlockConnector></Plug>
<Sockets num-sockets="4" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1065" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1071" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1077" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector>
</Sockets>
</Block> </Block>
<Block id="2748" genus-name="false" > <Block id="1077" genus-name="make-list" >
<Location><X>877</X><Y>805</Y></Location> <Location><X>514</X><Y>349</Y></Location>
<Label>false</Label> <Label>make a list</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2740" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1061" ></BlockConnector></Plug>
<Sockets num-sockets="3" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1079" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1081" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector>
</Sockets>
</Block> </Block>
<Block id="2643" genus-name="true" > <Block id="1081" genus-name="text" >
<Location><X>883</X><Y>767</Y></Location> <Location><X>567</X><Y>402</Y></Location>
<Label>true</Label> <Label>9997</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2639" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1077" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2637" genus-name="true" > <Block id="1079" genus-name="text" >
<Location><X>857</X><Y>729</Y></Location> <Location><X>567</X><Y>374</Y></Location>
<Label>true</Label> <Label>port</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2635" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1077" ></BlockConnector></Plug>
</Block> </Block>
<BlockStub><StubParentName>ipaddress</StubParentName><StubParentGenus>def</StubParentGenus><Block id="2529" genus-name="getterGlobal" > <Block id="1071" genus-name="make-list" >
<Location><X>821</X><Y>691</Y></Location> <Location><X>514</X><Y>240</Y></Location>
<Label>make a list</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1061" ></BlockConnector></Plug>
<Sockets num-sockets="3" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1073" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="2527" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector>
</Sockets>
</Block>
<BlockStub><StubParentName>ipaddress</StubParentName><StubParentGenus>def</StubParentGenus><Block id="2527" genus-name="getterGlobal" >
<Location><X>567</X><Y>293</Y></Location>
<Label>ipaddress</Label> <Label>ipaddress</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2513" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1071" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="2505" genus-name="PhoneStatus-GetWifiIpAddress" > <Block id="1073" genus-name="text" >
<Location><X>841</X><Y>653</Y></Location> <Location><X>567</X><Y>265</Y></Location>
<Label>PhoneStatus1.GetWifiIpAddress</Label> <Label>ipaddr</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2525" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1071" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2396" genus-name="ifelse" > <Block id="1065" genus-name="make-list" >
<Location><X>110</X><Y>755</Y></Location> <Location><X>514</X><Y>131</Y></Location>
<Label>ifelse</Label> <Label>make a list</Label>
<BeforeBlockId>1314</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1061" ></BlockConnector></Plug>
<Sockets num-sockets="3" > <Sockets num-sockets="3" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="2410" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1067" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="1356" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1069" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="else-do" is-indented="yes" position-type="single" con-block-id="2398" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>PostData</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="1356" genus-name="caller-command" > <BlockStub><StubParentName>code.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="1069" genus-name="componentGetter" >
<Location><X>170</X><Y>803</Y></Location> <Location><X>567</X><Y>184</Y></Location>
<Label>PostData</Label> <Label>code.Text</Label>
<BeforeBlockId>2396</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1065" ></BlockConnector></Plug>
<AfterBlockId>2647</AfterBlockId>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>Setup</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="2724" genus-name="caller-command" > <Block id="1067" genus-name="text" >
<Location><X>306</X><Y>549</Y></Location> <Location><X>567</X><Y>156</Y></Location>
<Label>Setup</Label> <Label>key</Label>
<BeforeBlockId>2718</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1065" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub> <Block id="2515" genus-name="def" >
<Block id="2718" genus-name="Button-Click" > <Location><X>20</X><Y>630</Y></Location>
<Location><X>276</X><Y>516</Y></Location> <Label>ipaddress</Label>
<Label>RetryButton.Click</Label>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2724" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="as" position-type="single" con-block-id="2523" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="949" genus-name="Button-Click" > <Block id="2523" genus-name="text" >
<Location><X>20</X><Y>682</Y></Location> <Location><X>168</X><Y>630</Y></Location>
<Label>Button1.Click</Label> <Label>IPADDRESS</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2515" ></BlockConnector></Plug>
</Block>
<BlockStub><StubParentName>Web1.Url</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2211" genus-name="componentSetter" >
<Location><X>55</X><Y>49</Y></Location>
<Label>Web1.Url</Label>
<BeforeBlockId>1308</BeforeBlockId>
<AfterBlockId>1063</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="1314" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2178" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1314" genus-name="if" > </BlockStub>
<Location><X>50</X><Y>715</Y></Location> <Block id="1529" genus-name="BarcodeScanner-AfterScan" >
<Label>if</Label> <Location><X>1048</X><Y>20</Y></Location>
<BeforeBlockId>949</BeforeBlockId> <Label>BarcodeScanner1.AfterScan</Label>
<Sockets num-sockets="2" > <Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="1352" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="result" position-type="single" con-block-id="1533" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="2396" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="1720" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1352" genus-name="logical-not" > <Block id="1533" genus-name="argument" >
<Location><X>134</X><Y>718</Y></Location> <Location><X>1344</X><Y>23</Y></Location>
<Label>not</Label> <Label>result</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1314" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1529" ></BlockConnector></Plug>
</Block>
<Block id="1308" genus-name="define-void" >
<Location><X>20</X><Y>20</Y></Location>
<Label>PostData</Label>
<Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="arg" is-expandable="yes" position-type="single" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2211" ></BlockConnector>
</Sockets>
</Block>
<Block id="1326" genus-name="false" >
<Location><X>150</X><Y>578</Y></Location>
<Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1318" ></BlockConnector></Plug>
</Block>
<Block id="1318" genus-name="def" >
<Location><X>20</X><Y>578</Y></Location>
<Label>expired</Label>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1354" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="as" position-type="single" con-block-id="1326" ></BlockConnector>
</Sockets>
</Block>
<BlockStub><StubParentName>result</StubParentName><StubParentGenus>argument</StubParentGenus><Block id="1539" genus-name="getter" >
<Location><X>1291</X><Y>99</Y></Location>
<Label>result</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1537" ></BlockConnector></Plug>
</Block>
</BlockStub>
<BlockStub><StubParentName>PostData</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="1541" genus-name="caller-command" >
<Location><X>1157</X><Y>134</Y></Location>
<Label>PostData</Label>
<BeforeBlockId>1537</BeforeBlockId>
<AfterBlockId>2472</AfterBlockId>
</Block>
</BlockStub>
<BlockStub><StubParentName>code.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="1537" genus-name="componentSetter" >
<Location><X>1157</X><Y>96</Y></Location>
<Label>code.Text</Label>
<BeforeBlockId>1720</BeforeBlockId>
<AfterBlockId>1541</AfterBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="1539" ></BlockConnector>
</Sockets>
</Block>
</BlockStub>
<Block id="1720" genus-name="if" >
<Location><X>1097</X><Y>56</Y></Location>
<Label>if</Label>
<BeforeBlockId>1529</BeforeBlockId>
<Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="1726" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="1537" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1354" genus-name="getterGlobal" > <BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1724" genus-name="getterGlobal" >
<Location><X>186</X><Y>718</Y></Location> <Location><X>1233</X><Y>59</Y></Location>
<Label>expired</Label> <Label>expired</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1352" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1726" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="1726" genus-name="logical-not" > <Block id="1726" genus-name="logical-not" >
...@@ -425,329 +465,363 @@ ...@@ -425,329 +465,363 @@
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1724" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1724" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1724" genus-name="getterGlobal" > <BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1354" genus-name="getterGlobal" >
<Location><X>1233</X><Y>59</Y></Location> <Location><X>186</X><Y>718</Y></Location>
<Label>expired</Label> <Label>expired</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1726" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1352" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="1720" genus-name="if" > <Block id="1352" genus-name="logical-not" >
<Location><X>1097</X><Y>56</Y></Location> <Location><X>134</X><Y>718</Y></Location>
<Label>not</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1314" ></BlockConnector></Plug>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1354" ></BlockConnector>
</Sockets>
</Block>
<Block id="1314" genus-name="if" >
<Location><X>50</X><Y>715</Y></Location>
<Label>if</Label> <Label>if</Label>
<BeforeBlockId>1529</BeforeBlockId> <BeforeBlockId>949</BeforeBlockId>
<Sockets num-sockets="2" > <Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="1726" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="1352" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="1537" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="2396" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>code.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="1537" genus-name="componentSetter" > <Block id="949" genus-name="Button-Click" >
<Location><X>1157</X><Y>96</Y></Location> <Location><X>20</X><Y>682</Y></Location>
<Label>code.Text</Label> <Label>Button1.Click</Label>
<BeforeBlockId>1720</BeforeBlockId>
<AfterBlockId>1541</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="1539" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="1314" ></BlockConnector>
</Sockets>
</Block>
<Block id="2718" genus-name="Button-Click" >
<Location><X>276</X><Y>516</Y></Location>
<Label>RetryButton.Click</Label>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2724" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>Setup</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="2724" genus-name="caller-command" >
<Location><X>306</X><Y>549</Y></Location>
<Label>Setup</Label>
<BeforeBlockId>2718</BeforeBlockId>
</Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>PostData</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="1541" genus-name="caller-command" > <BlockStub><StubParentName>PostData</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="1356" genus-name="caller-command" >
<Location><X>1157</X><Y>134</Y></Location> <Location><X>170</X><Y>803</Y></Location>
<Label>PostData</Label> <Label>PostData</Label>
<BeforeBlockId>1537</BeforeBlockId> <BeforeBlockId>2396</BeforeBlockId>
<AfterBlockId>2472</AfterBlockId> <AfterBlockId>2647</AfterBlockId>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>result</StubParentName><StubParentGenus>argument</StubParentGenus><Block id="1539" genus-name="getter" > <Block id="2396" genus-name="ifelse" >
<Location><X>1291</X><Y>99</Y></Location> <Location><X>110</X><Y>755</Y></Location>
<Label>result</Label> <Label>ifelse</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1537" ></BlockConnector></Plug> <BeforeBlockId>1314</BeforeBlockId>
<Sockets num-sockets="3" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="2410" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="1356" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="else-do" is-indented="yes" position-type="single" con-block-id="2398" ></BlockConnector>
</Sockets>
</Block>
<Block id="2505" genus-name="PhoneStatus-GetWifiIpAddress" >
<Location><X>841</X><Y>653</Y></Location>
<Label>PhoneStatus1.GetWifiIpAddress</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2525" ></BlockConnector></Plug>
</Block>
<BlockStub><StubParentName>ipaddress</StubParentName><StubParentGenus>def</StubParentGenus><Block id="2529" genus-name="getterGlobal" >
<Location><X>821</X><Y>691</Y></Location>
<Label>ipaddress</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2513" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="1318" genus-name="def" > <Block id="2637" genus-name="true" >
<Location><X>20</X><Y>578</Y></Location> <Location><X>857</X><Y>729</Y></Location>
<Label>expired</Label> <Label>true</Label>
<Sockets num-sockets="1" > <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2635" ></BlockConnector></Plug>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="as" position-type="single" con-block-id="1326" ></BlockConnector>
</Sockets>
</Block> </Block>
<Block id="1326" genus-name="false" > <Block id="2643" genus-name="true" >
<Location><X>150</X><Y>578</Y></Location> <Location><X>883</X><Y>767</Y></Location>
<Label>false</Label> <Label>true</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1318" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2639" ></BlockConnector></Plug>
</Block> </Block>
<Block id="1308" genus-name="define-void" > <Block id="2748" genus-name="false" >
<Location><X>20</X><Y>20</Y></Location> <Location><X>877</X><Y>805</Y></Location>
<Label>PostData</Label> <Label>false</Label>
<Sockets num-sockets="2" > <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2740" ></BlockConnector></Plug>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="arg" is-expandable="yes" position-type="single" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2211" ></BlockConnector>
</Sockets>
</Block> </Block>
<Block id="1533" genus-name="argument" > <Block id="2501" genus-name="PhoneStatus-isConnected" >
<Location><X>1344</X><Y>23</Y></Location> <Location><X>839</X><Y>843</Y></Location>
<Label>result</Label> <Label>PhoneStatus1.isConnected</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1529" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2602" ></BlockConnector></Plug>
</Block> </Block>
<Block id="1529" genus-name="BarcodeScanner-AfterScan" > <Block id="2602" genus-name="logical-not" >
<Location><X>1048</X><Y>20</Y></Location> <Location><X>787</X><Y>843</Y></Location>
<Label>BarcodeScanner1.AfterScan</Label> <Label>not</Label>
<Sockets num-sockets="2" > <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2604" ></BlockConnector></Plug>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="result" position-type="single" con-block-id="1533" ></BlockConnector> <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="1720" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2501" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<BlockStub><StubParentName>Web1.Url</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2211" genus-name="componentSetter" > <Block id="2592" genus-name="true" >
<Location><X>55</X><Y>49</Y></Location> <Location><X>973</X><Y>883</Y></Location>
<Label>Web1.Url</Label> <Label>true</Label>
<BeforeBlockId>1308</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2590" ></BlockConnector></Plug>
<AfterBlockId>1063</AfterBlockId> </Block>
<BlockStub><StubParentName>ConnectFailLabel.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2590" genus-name="componentSetter" >
<Location><X>733</X><Y>880</Y></Location>
<Label>ConnectFailLabel.Visible</Label>
<BeforeBlockId>2604</BeforeBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2178" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2592" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="2523" genus-name="text" > <Block id="2608" genus-name="false" >
<Location><X>168</X><Y>630</Y></Location> <Location><X>972</X><Y>932</Y></Location>
<Label>IPADDRESS</Label> <Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2515" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2606" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2515" genus-name="def" > <BlockStub><StubParentName>ConnectFailLabel.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2606" genus-name="componentSetter" >
<Location><X>20</X><Y>630</Y></Location> <Location><X>732</X><Y>929</Y></Location>
<Label>ipaddress</Label> <Label>ConnectFailLabel.Visible</Label>
<BeforeBlockId>2604</BeforeBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="as" position-type="single" con-block-id="2523" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2608" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1067" genus-name="text" >
<Location><X>567</X><Y>156</Y></Location>
<Label>key</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1065" ></BlockConnector></Plug>
</Block>
<BlockStub><StubParentName>code.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="1069" genus-name="componentGetter" >
<Location><X>567</X><Y>184</Y></Location>
<Label>code.Text</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1065" ></BlockConnector></Plug>
</Block>
</BlockStub> </BlockStub>
<Block id="1065" genus-name="make-list" > <Block id="2604" genus-name="ifelse" >
<Location><X>514</X><Y>131</Y></Location> <Location><X>673</X><Y>840</Y></Location>
<Label>make a list</Label> <Label>ifelse</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1061" ></BlockConnector></Plug> <BeforeBlockId>2740</BeforeBlockId>
<Sockets num-sockets="3" > <Sockets num-sockets="3" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1067" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="test" position-type="single" con-block-id="2602" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1069" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="then-do" is-indented="yes" position-type="single" con-block-id="2590" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="else-do" is-indented="yes" position-type="single" con-block-id="2606" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1073" genus-name="text" > <BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2740" genus-name="componentSetter" >
<Location><X>567</X><Y>265</Y></Location> <Location><X>673</X><Y>802</Y></Location>
<Label>ipaddr</Label> <Label>RetryButton.Visible</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1071" ></BlockConnector></Plug> <BeforeBlockId>2639</BeforeBlockId>
</Block> <AfterBlockId>2604</AfterBlockId>
<BlockStub><StubParentName>ipaddress</StubParentName><StubParentGenus>def</StubParentGenus><Block id="2527" genus-name="getterGlobal" > <Sockets num-sockets="1" >
<Location><X>567</X><Y>293</Y></Location> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2748" ></BlockConnector>
<Label>ipaddress</Label> </Sockets>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1071" ></BlockConnector></Plug>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="1071" genus-name="make-list" > <BlockStub><StubParentName>ScanButton.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2639" genus-name="componentSetter" >
<Location><X>514</X><Y>240</Y></Location> <Location><X>673</X><Y>764</Y></Location>
<Label>make a list</Label> <Label>ScanButton.Enabled</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1061" ></BlockConnector></Plug> <BeforeBlockId>2635</BeforeBlockId>
<Sockets num-sockets="3" > <AfterBlockId>2740</AfterBlockId>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1073" ></BlockConnector> <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="2527" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2643" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1079" genus-name="text" > </BlockStub>
<Location><X>567</X><Y>374</Y></Location> <BlockStub><StubParentName>Button1.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2635" genus-name="componentSetter" >
<Label>port</Label> <Location><X>673</X><Y>726</Y></Location>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1077" ></BlockConnector></Plug> <Label>Button1.Enabled</Label>
</Block> <BeforeBlockId>2513</BeforeBlockId>
<Block id="1081" genus-name="text" > <AfterBlockId>2639</AfterBlockId>
<Location><X>567</X><Y>402</Y></Location> <Sockets num-sockets="1" >
<Label>9997</Label> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2637" ></BlockConnector>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1077" ></BlockConnector></Plug> </Sockets>
</Block> </Block>
<Block id="1077" genus-name="make-list" > </BlockStub>
<Location><X>514</X><Y>349</Y></Location> <BlockStub><StubParentName>iplabel.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2513" genus-name="componentSetter" >
<Label>make a list</Label> <Location><X>673</X><Y>688</Y></Location>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1061" ></BlockConnector></Plug> <Label>iplabel.Text</Label>
<Sockets num-sockets="3" > <BeforeBlockId>2525</BeforeBlockId>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1079" ></BlockConnector> <AfterBlockId>2635</AfterBlockId>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1081" ></BlockConnector> <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2529" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1061" genus-name="make-list" > </BlockStub>
<Location><X>461</X><Y>106</Y></Location> <BlockStub><StubParentName>ipaddress</StubParentName><StubParentGenus>def</StubParentGenus><Block id="2525" genus-name="setterGlobal" >
<Label>make a list</Label> <Location><X>673</X><Y>650</Y></Location>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1059" ></BlockConnector></Plug> <Label>ipaddress</Label>
<Sockets num-sockets="4" > <BeforeBlockId>2594</BeforeBlockId>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1065" ></BlockConnector> <AfterBlockId>2513</AfterBlockId>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1071" ></BlockConnector> <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" con-block-id="1077" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2505" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="item" is-expandable="yes" is-indented="yes" position-type="single" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1059" genus-name="Web-BuildPostData" > </BlockStub>
<Location><X>239</X><Y>106</Y></Location> <Block id="2594" genus-name="define-void" >
<Label>Web1.BuildPostData</Label> <Location><X>638</X><Y>621</Y></Location>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1063" ></BlockConnector></Plug> <Label>Setup</Label>
<Sockets num-sockets="1" > <Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="list" position-type="single" con-block-id="1061" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="arg" is-expandable="yes" position-type="single" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2525" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="1066" genus-name="TextBox-HideKeyboard" > <Block id="1734" genus-name="true" >
<Location><X>55</X><Y>497</Y></Location> <Location><X>821</X><Y>1046</Y></Location>
<Label>code.HideKeyboard</Label> <Label>true</Label>
<BeforeBlockId>1063</BeforeBlockId> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="1732" ></BlockConnector></Plug>
</Block> </Block>
<Block id="1063" genus-name="Web-PostText" > <BlockStub><StubParentName>expired</StubParentName><StubParentGenus>def</StubParentGenus><Block id="1732" genus-name="setterGlobal" >
<Location><X>55</X><Y>103</Y></Location> <Location><X>671</X><Y>1043</Y></Location>
<Label>Web1.PostText</Label> <Label>expired</Label>
<BeforeBlockId>2211</BeforeBlockId> <BeforeBlockId>1728</BeforeBlockId>
<AfterBlockId>1066</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="text" position-type="single" con-block-id="1059" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="1734" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="2583" genus-name="ActivityStarter-StartActivity" > </BlockStub>
<Location><X>778</X><Y>397</Y></Location> <Block id="1728" genus-name="Button-Click" >
<Label>ActivityStarter1.StartActivity</Label> <Location><X>641</X><Y>1010</Y></Location>
<BeforeBlockId>2445</BeforeBlockId> <Label>RestartButton.Click</Label>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="1732" ></BlockConnector>
</Sockets>
</Block> </Block>
<Block id="2445" genus-name="Button-Click" > <Block id="1527" genus-name="BarcodeScanner-DoScan" >
<Location><X>748</X><Y>364</Y></Location> <Location><X>685</X><Y>1180</Y></Location>
<Label>MarketButton.Click</Label> <Label>BarcodeScanner1.DoScan</Label>
<BeforeBlockId>2495</BeforeBlockId>
</Block>
<Block id="1505" genus-name="Button-Click" >
<Location><X>655</X><Y>1109</Y></Location>
<Label>ScanButton.Click</Label>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2583" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2495" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="2180" genus-name="text" > <BlockStub><StubParentName>HorizontalArrangement5.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2398" genus-name="componentSetter" >
<Location><X>195</X><Y>67</Y></Location> <Location><X>169</X><Y>1032</Y></Location>
<Label>http:\/\/</Label> <Label>HorizontalArrangement5.Visible</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2178" ></BlockConnector></Plug> <BeforeBlockId>2396</BeforeBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2402" ></BlockConnector>
</Sockets>
</Block> </Block>
<Block id="2160" genus-name="text" > </BlockStub>
<Location><X>371</X><Y>66</Y></Location> <Block id="2402" genus-name="true" >
<Label>rendezvous.appinventor.mit.edu</Label> <Location><X>461</X><Y>1035</Y></Location>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2182" ></BlockConnector></Plug> <Label>true</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2398" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2186" genus-name="text" > <BlockStub><StubParentName>code.Text</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2406" genus-name="componentGetter" >
<Location><X>727</X><Y>66</Y></Location> <Location><X>364</X><Y>765</Y></Location>
<Label>\/rendezvous\/</Label> <Label>code.Text</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2182" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2408" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2182" genus-name="string-append" > </BlockStub>
<Location><X>361</X><Y>59</Y></Location> <Block id="2408" genus-name="string-length" >
<Label>join</Label> <Location><X>234</X><Y>765</Y></Location>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2178" ></BlockConnector></Plug> <Label>length</Label>
<Sockets num-sockets="2" > <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2410" ></BlockConnector></Plug>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2160" ></BlockConnector> <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2186" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="text" position-type="single" con-block-id="2406" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="2178" genus-name="string-append" > <Block id="2412" genus-name="number" >
<Location><X>185</X><Y>52</Y></Location> <Location><X>508</X><Y>765</Y></Location>
<Label>join</Label> <Label>6</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2211" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2410" ></BlockConnector></Plug>
</Block>
<Block id="2410" genus-name="yail-equal" >
<Location><X>224</X><Y>758</Y></Location>
<Label>=</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2396" ></BlockConnector></Plug>
<Sockets num-sockets="2" > <Sockets num-sockets="2" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2180" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2408" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2182" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="" position-type="bottom" con-block-id="2412" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
<Block id="2460" genus-name="Screen-ErrorOccurred" > <Block id="2649" genus-name="false" >
<Location><X>97</X><Y>1176</Y></Location> <Location><X>354</X><Y>834</Y></Location>
<Label>Screen1.ErrorOccurred</Label> <Label>false</Label>
<Sockets num-sockets="5" > <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2647" ></BlockConnector></Plug>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="component" position-type="single" con-block-id="2464" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="functionName" position-type="single" con-block-id="2466" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="errorNumber" position-type="single" con-block-id="2468" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="message" position-type="single" con-block-id="2470" ></BlockConnector>
<BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2480" ></BlockConnector>
</Sockets>
</Block> </Block>
<Block id="2464" genus-name="argument" > <Block id="2655" genus-name="false" >
<Location><X>401</X><Y>1179</Y></Location> <Location><X>380</X><Y>872</Y></Location>
<Label>component</Label> <Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2653" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2466" genus-name="argument" > <Block id="2746" genus-name="true" >
<Location><X>401</X><Y>1207</Y></Location> <Location><X>374</X><Y>910</Y></Location>
<Label>functionName</Label> <Label>true</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2744" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2468" genus-name="argument" > <Block id="2404" genus-name="false" >
<Location><X>401</X><Y>1235</Y></Location> <Location><X>462</X><Y>948</Y></Location>
<Label>errorNumber</Label> <Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2400" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2470" genus-name="argument" > <Block id="2458" genus-name="false" >
<Location><X>401</X><Y>1263</Y></Location> <Location><X>334</X><Y>986</Y></Location>
<Label>message</Label> <Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2460" ></BlockConnector></Plug> <Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2456" ></BlockConnector></Plug>
</Block> </Block>
<BlockStub><StubParentName>Label8.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2480" genus-name="componentSetter" > <BlockStub><StubParentName>Label8.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2456" genus-name="componentSetter" >
<Location><X>192</X><Y>1296</Y></Location> <Location><X>170</X><Y>983</Y></Location>
<Label>Label8.Visible</Label> <Label>Label8.Visible</Label>
<BeforeBlockId>2460</BeforeBlockId> <BeforeBlockId>2400</BeforeBlockId>
<AfterBlockId>2481</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2482" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2458" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<Block id="2482" genus-name="true" > <BlockStub><StubParentName>HorizontalArrangement5.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2400" genus-name="componentSetter" >
<Location><X>356</X><Y>1299</Y></Location> <Location><X>170</X><Y>945</Y></Location>
<Label>true</Label> <Label>HorizontalArrangement5.Visible</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2480" ></BlockConnector></Plug> <BeforeBlockId>2744</BeforeBlockId>
</Block> <AfterBlockId>2456</AfterBlockId>
<Block id="2479" genus-name="true" > <Sockets num-sockets="1" >
<Location><X>1361</X><Y>165</Y></Location> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2404" ></BlockConnector>
<Label>true</Label> </Sockets>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2472" ></BlockConnector></Plug>
</Block>
<Block id="2477" genus-name="false" >
<Location><X>1341</X><Y>203</Y></Location>
<Label>false</Label>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2469" ></BlockConnector></Plug>
</Block> </Block>
<Block id="2475" genus-name="false" > </BlockStub>
<Location><X>1367</X><Y>241</Y></Location> <BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2744" genus-name="componentSetter" >
<Label>false</Label> <Location><X>170</X><Y>907</Y></Location>
<Plug><BlockConnector connector-kind="plug" connector-type="poly" init-type="poly" label="" position-type="single" con-block-id="2471" ></BlockConnector></Plug> <Label>RetryButton.Visible</Label>
<BeforeBlockId>2653</BeforeBlockId>
<AfterBlockId>2400</AfterBlockId>
<Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2746" ></BlockConnector>
</Sockets>
</Block> </Block>
<BlockStub><StubParentName>ScanButton.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2471" genus-name="componentSetter" > </BlockStub>
<Location><X>1157</X><Y>238</Y></Location> <BlockStub><StubParentName>ScanButton.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2653" genus-name="componentSetter" >
<Location><X>170</X><Y>869</Y></Location>
<Label>ScanButton.Enabled</Label> <Label>ScanButton.Enabled</Label>
<BeforeBlockId>2469</BeforeBlockId> <BeforeBlockId>2647</BeforeBlockId>
<AfterBlockId>2744</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2475" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2655" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>Button1.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2469" genus-name="componentSetter" > <BlockStub><StubParentName>Button1.Enabled</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2647" genus-name="componentSetter" >
<Location><X>1157</X><Y>200</Y></Location> <Location><X>170</X><Y>831</Y></Location>
<Label>Button1.Enabled</Label> <Label>Button1.Enabled</Label>
<BeforeBlockId>2472</BeforeBlockId> <BeforeBlockId>1356</BeforeBlockId>
<AfterBlockId>2471</AfterBlockId> <AfterBlockId>2653</AfterBlockId>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2477" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2649" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub> </BlockStub>
<BlockStub><StubParentName>RetryButton.Visible</StubParentName><StubParentGenus>read-write-property</StubParentGenus><Block id="2472" genus-name="componentSetter" > <BlockStub><StubParentName>Setup</StubParentName><StubParentGenus>define-void</StubParentGenus><Block id="2600" genus-name="caller-command" >
<Location><X>1157</X><Y>162</Y></Location> <Location><X>568</X><Y>524</Y></Location>
<Label>RetryButton.Visible</Label> <Label>Setup</Label>
<BeforeBlockId>1541</BeforeBlockId> <BeforeBlockId>2509</BeforeBlockId>
<AfterBlockId>2469</AfterBlockId> </Block>
</BlockStub>
<Block id="2509" genus-name="Screen-Initialize" >
<Location><X>538</X><Y>491</Y></Location>
<Label>Screen1.Initialize</Label>
<Sockets num-sockets="1" > <Sockets num-sockets="1" >
<BlockConnector connector-kind="socket" connector-type="poly" init-type="poly" label="to" position-type="single" con-block-id="2479" ></BlockConnector> <BlockConnector connector-kind="socket" connector-type="cmd" init-type="cmd" label="do" is-indented="yes" position-type="single" con-block-id="2600" ></BlockConnector>
</Sockets> </Sockets>
</Block> </Block>
</BlockStub>
</PageBlocks> </PageBlocks>
</Page> </Page>
...@@ -755,9 +829,9 @@ ...@@ -755,9 +829,9 @@
<YoungAndroidUuidEntry uuid="-333340163" component-id="Label1" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="-333340163" component-id="Label1" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1902677450" component-id="Web1" component-genus="Web" component-version="2" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="-1902677450" component-id="Web1" component-genus="Web" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="1374735927" component-id="HorizontalArrangement5" component-genus="HorizontalArrangement" component-version="2" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="1374735927" component-id="HorizontalArrangement5" component-genus="HorizontalArrangement" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="2091318480" component-id="code" component-genus="TextBox" component-version="4" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1616116264" component-id="Expireblock" component-genus="VerticalArrangement" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1656721742" component-id="Label8" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="-1656721742" component-id="Label8" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1616116264" component-id="Expireblock" component-genus="VerticalArrangement" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="2091318480" component-id="code" component-genus="TextBox" component-version="4" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="566867955" component-id="MarketButton" component-genus="Button" component-version="4" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="566867955" component-id="MarketButton" component-genus="Button" component-version="4" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1681239855" component-id="Label4" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="-1681239855" component-id="Label4" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="240579661" component-id="BarcodeScanner1" component-genus="BarcodeScanner" component-version="1" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="240579661" component-id="BarcodeScanner1" component-genus="BarcodeScanner" component-version="1" ></YoungAndroidUuidEntry>
...@@ -779,8 +853,8 @@ ...@@ -779,8 +853,8 @@
<YoungAndroidUuidEntry uuid="933636264" component-id="Button1" component-genus="Button" component-version="4" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="933636264" component-id="Button1" component-genus="Button" component-version="4" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-315198317" component-id="PhoneStatus1" component-genus="PhoneStatus" component-version="1" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="-315198317" component-id="PhoneStatus1" component-genus="PhoneStatus" component-version="1" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1890222609" component-id="HorizontalArrangement2" component-genus="HorizontalArrangement" component-version="2" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="-1890222609" component-id="HorizontalArrangement2" component-genus="HorizontalArrangement" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1412894374" component-id="Label3" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="1331553180" component-id="ConnectFailLabel" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="1331553180" component-id="ConnectFailLabel" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="-1412894374" component-id="Label3" component-genus="Label" component-version="2" ></YoungAndroidUuidEntry>
<YoungAndroidUuidEntry uuid="796723612" component-id="RetryButton" component-genus="Button" component-version="4" ></YoungAndroidUuidEntry> <YoungAndroidUuidEntry uuid="796723612" component-id="RetryButton" component-genus="Button" component-version="4" ></YoungAndroidUuidEntry>
</YoungAndroidUuidMap> </YoungAndroidUuidMap>
</YoungAndroidMaps> </YoungAndroidMaps>
......
appinventor/aiplayapp/src/edu/mit/appinventor/aicompanion2/Screen1.scm
View file @ 7f02aeb0
#| #|
$JSON $JSON
{"YaVersion":"68","Source":"Form","Properties":{"$Name":"Screen1","$Type":"Form","$Version":"10","Uuid":"0","ScreenOrientation":"portrait","Scrollable":"False","Title":"MIT AICompanion","VersionCode":"203","VersionName":"2.03","$Components":[{"$Name":"HorizontalArrangement2","$Type":"HorizontalArrangement","$Version":"2","Uuid":"-1890222609","Width":"-2","$Components":[{"$Name":"Label1","$Type":"Label","$Version":"2","Uuid":"-333340163","Text":"Your IP Address: "},{"$Name":"iplabel","$Type":"Label","$Version":"2","Uuid":"1435778230","Text":"IP ADDRESS","Width":"-2"}]},{"$Name":"Label5","$Type":"Label","$Version":"2","Uuid":"1468302777","Text":" ","Width":"-2"},{"$Name":"Label2","$Type":"Label","$Version":"2","Uuid":"-28249960","Text":"Directions: \\n1) On the Blocks Editor, press \"Connect to Device\" and select WiFi.\\n2) Type the 6-letter code or scan the QR code displayed on the Blocks Editor.\\n3) Click the 'Connect to App Inventor' button below.\\n4) If not connected in 30 seconds, click reset and repeat steps 1-4.","Width":"-2"},{"$Name":"Label6","$Type":"Label","$Version":"2","Uuid":"1263643189","Text":" ","Width":"-2"},{"$Name":"ScanButton","$Type":"Button","$Version":"4","Uuid":"-928166843","Text":"Scan the QR Code","Width":"-2"},{"$Name":"HorizontalArrangement1","$Type":"HorizontalArrangement","$Version":"2","Uuid":"-1363356191","Width":"-2","$Components":[{"$Name":"code","$Type":"TextBox","$Version":"4","Uuid":"2091318480","Hint":"Or type the 6-letter code here.","Width":"-2"}]},{"$Name":"Button1","$Type":"Button","$Version":"4","Uuid":"933636264","Text":"Connect to App Inventor","Width":"-2"},{"$Name":"Label8","$Type":"Label","$Version":"2","Uuid":"-1656721742","Text":"An Error Occurred. Please try pressing \"Connect to App Inventor\" again.","TextColor":"&HFFFF0000","Visible":"False"},{"$Name":"HorizontalArrangement5","$Type":"HorizontalArrangement","$Version":"2","Uuid":"1374735927","Visible":"False","$Components":[{"$Name":"Label7","$Type":"Label","$Version":"2","Uuid":"677206225","Text":"You did not enter 6 characters, please try again.","TextColor":"&HFFFF0000"}]},{"$Name":"RetryButton","$Type":"Button","$Version":"4","Uuid":"796723612","Text":"Reset","Visible":"False","Width":"-2"},{"$Name":"HorizontalArrangement3","$Type":"HorizontalArrangement","$Version":"2","Uuid":"-1743769894","Visible":"False","$Components":[{"$Name":"Label3","$Type":"Label","$Version":"2","Uuid":"-1412894374","Text":"Or you Can Scan a Bar Code","Visible":"False"}]},{"$Name":"HorizontalArrangement4","$Type":"HorizontalArrangement","$Version":"2","Uuid":"1722789622","Visible":"False","$Components":[{"$Name":"Label4","$Type":"Label","$Version":"2","Uuid":"-1681239855","Text":"If the Blocks Editor is already running"},{"$Name":"RestartButton","$Type":"Button","$Version":"4","Uuid":"1759990306","Text":"Restart"}]},{"$Name":"ConnectFailLabel","$Type":"Label","$Version":"2","Uuid":"1331553180","Text":"Your phone does not appear to be connected to a Wireless (WiFi) network.","TextColor":"&HFFFF0000","Visible":"False"},{"$Name":"Expireblock","$Type":"VerticalArrangement","$Version":"2","Uuid":"-1616116264","AlignHorizontal":"3","Visible":"False","$Components":[{"$Name":"expirewarning","$Type":"Label","$Version":"2","Uuid":"-243410660","Text":"This version of the App Inventor Companion is not compatible with your blocks editor. You can download a new version from the Play Store","TextColor":"&HFFFF0000"},{"$Name":"MarketButton","$Type":"Button","$Version":"4","Uuid":"566867955","Text":"Go to the Play Store"}]},{"$Name":"Web1","$Type":"Web","$Version":"2","Uuid":"-1902677450","Url":"http:\/\/osiris.mit.edu\/rendezvous\/"},{"$Name":"Clock1","$Type":"Clock","$Version":"1","Uuid":"1668438698"},{"$Name":"BarcodeScanner1","$Type":"BarcodeScanner","$Version":"1","Uuid":"240579661"},{"$Name":"TinyDB1","$Type":"TinyDB","$Version":"1","Uuid":"-587391114"},{"$Name":"ActivityStarter1","$Type":"ActivityStarter","$Version":"4","Uuid":"506337611","Action":"android.intent.action.VIEW","DataUri":"market:\/\/details?id=edu.mit.appinventor.aicompanion2"},{"$Name":"PhoneStatus1","$Type":"PhoneStatus","$Version":"1","Uuid":"-315198317"}]}} {"YaVersion":"69","Source":"Form","Properties":{"$Name":"Screen1","$Type":"Form","$Version":"10","Uuid":"0","ScreenOrientation":"portrait","Scrollable":"False","Title":"MIT AICompanion","VersionCode":"204","VersionName":"2.04","$Components":[{"$Name":"HorizontalArrangement2","$Type":"HorizontalArrangement","$Version":"2","Uuid":"-1890222609","Width":"-2","$Components":[{"$Name":"Label1","$Type":"Label","$Version":"2","Uuid":"-333340163","Text":"Your IP Address: "},{"$Name":"iplabel","$Type":"Label","$Version":"2","Uuid":"1435778230","Text":"IP ADDRESS","Width":"-2"}]},{"$Name":"Label5","$Type":"Label","$Version":"2","Uuid":"1468302777","Text":" ","Width":"-2"},{"$Name":"Label2","$Type":"Label","$Version":"2","Uuid":"-28249960","Text":"Directions: \\n1) On the Blocks Editor, press \"Connect to Device\" and select WiFi.\\n2) Type the 6-letter code or scan the QR code displayed on the Blocks Editor.\\n3) Click the 'Connect to App Inventor' button below.\\n4) If not connected in 30 seconds, click reset and repeat steps 1-4.","Width":"-2"},{"$Name":"Label6","$Type":"Label","$Version":"2","Uuid":"1263643189","Text":" ","Width":"-2"},{"$Name":"ScanButton","$Type":"Button","$Version":"4","Uuid":"-928166843","Text":"Scan the QR Code","Width":"-2"},{"$Name":"HorizontalArrangement1","$Type":"HorizontalArrangement","$Version":"2","Uuid":"-1363356191","Width":"-2","$Components":[{"$Name":"code","$Type":"TextBox","$Version":"4","Uuid":"2091318480","Hint":"Or type the 6-letter code here.","Width":"-2"}]},{"$Name":"Button1","$Type":"Button","$Version":"4","Uuid":"933636264","Text":"Connect to App Inventor","Width":"-2"},{"$Name":"Label8","$Type":"Label","$Version":"2","Uuid":"-1656721742","TextColor":"&HFFFF0000","Visible":"False"},{"$Name":"HorizontalArrangement5","$Type":"HorizontalArrangement","$Version":"2","Uuid":"1374735927","Visible":"False","$Components":[{"$Name":"Label7","$Type":"Label","$Version":"2","Uuid":"677206225","Text":"You did not enter 6 characters, please try again.","TextColor":"&HFFFF0000"}]},{"$Name":"RetryButton","$Type":"Button","$Version":"4","Uuid":"796723612","Text":"Reset","Visible":"False","Width":"-2"},{"$Name":"HorizontalArrangement3","$Type":"HorizontalArrangement","$Version":"2","Uuid":"-1743769894","Visible":"False","$Components":[{"$Name":"Label3","$Type":"Label","$Version":"2","Uuid":"-1412894374","Text":"Or you Can Scan a Bar Code","Visible":"False"}]},{"$Name":"HorizontalArrangement4","$Type":"HorizontalArrangement","$Version":"2","Uuid":"1722789622","Visible":"False","$Components":[{"$Name":"Label4","$Type":"Label","$Version":"2","Uuid":"-1681239855","Text":"If the Blocks Editor is already running"},{"$Name":"RestartButton","$Type":"Button","$Version":"4","Uuid":"1759990306","Text":"Restart"}]},{"$Name":"ConnectFailLabel","$Type":"Label","$Version":"2","Uuid":"1331553180","Text":"Your phone does not appear to be connected to a Wireless (WiFi) network.","TextColor":"&HFFFF0000","Visible":"False"},{"$Name":"Expireblock","$Type":"VerticalArrangement","$Version":"2","Uuid":"-1616116264","AlignHorizontal":"3","Visible":"False","$Components":[{"$Name":"expirewarning","$Type":"Label","$Version":"2","Uuid":"-243410660","Text":"This version of the App Inventor Companion is not compatible with your blocks editor. You can download a new version from the Play Store","TextColor":"&HFFFF0000"},{"$Name":"MarketButton","$Type":"Button","$Version":"4","Uuid":"566867955","Text":"Go to the Play Store"}]},{"$Name":"Web1","$Type":"Web","$Version":"2","Uuid":"-1902677450","Url":"http:\/\/osiris.mit.edu\/rendezvous\/"},{"$Name":"Clock1","$Type":"Clock","$Version":"1","Uuid":"1668438698"},{"$Name":"BarcodeScanner1","$Type":"BarcodeScanner","$Version":"1","Uuid":"240579661"},{"$Name":"TinyDB1","$Type":"TinyDB","$Version":"1","Uuid":"-587391114"},{"$Name":"ActivityStarter1","$Type":"ActivityStarter","$Version":"4","Uuid":"506337611","Action":"android.intent.action.VIEW","DataUri":"market:\/\/details?id=edu.mit.appinventor.aicompanion2"},{"$Name":"PhoneStatus1","$Type":"PhoneStatus","$Version":"1","Uuid":"-315198317"}]}}
|# |#
\ No newline at end of file
appinventor/aiplayapp/src/edu/mit/appinventor/aicompanion2/Screen1.yail
View file @ 7f02aeb0
...@@ -12,35 +12,7 @@ $Source $Yail ...@@ -12,35 +12,7 @@ $Source $Yail
(set-and-coerce-property! 'RetryButton 'Visible #f 'boolean) (set-and-coerce-property! 'RetryButton 'Visible #f 'boolean)
) )
(def (Setup) (def ipaddress "IPADDRESS")
(set-var! ipaddress (call-component-method 'PhoneStatus1 'GetWifiIpAddress (*list-for-runtime*)
'())
)
(set-and-coerce-property! 'iplabel 'Text (get-var ipaddress)
'text)
(set-and-coerce-property! 'Button1 'Enabled #t 'boolean)
(set-and-coerce-property! 'ScanButton 'Enabled #t 'boolean)
(set-and-coerce-property! 'RetryButton 'Visible #f 'boolean)
(if (call-yail-primitive yail-not (*list-for-runtime* (call-component-method 'PhoneStatus1 'isConnected (*list-for-runtime*)
'())
)
'( boolean)
"not")
(begin (set-and-coerce-property! 'ConnectFailLabel 'Visible #t 'boolean)
)
(begin (set-and-coerce-property! 'ConnectFailLabel 'Visible #f 'boolean)
)
)
)
(def expired #f)
(def (PostData) (def (PostData)
(set-and-coerce-property! 'Web1 'Url (call-yail-primitive string-append (*list-for-runtime* "http://" (call-yail-primitive string-append (*list-for-runtime* "rendezvous.appinventor.mit.edu" "/rendezvous/") (set-and-coerce-property! 'Web1 'Url (call-yail-primitive string-append (*list-for-runtime* "http://" (call-yail-primitive string-append (*list-for-runtime* "rendezvous.appinventor.mit.edu" "/rendezvous/")
...@@ -76,26 +48,66 @@ $Source $Yail ...@@ -76,26 +48,66 @@ $Source $Yail
'()) '())
) )
(def ipaddress "IPADDRESS") (def expired #f)
(def (Setup)
(set-var! ipaddress (call-component-method 'PhoneStatus1 'GetWifiIpAddress (*list-for-runtime*)
'())
)
(set-and-coerce-property! 'iplabel 'Text (get-var ipaddress)
'text)
(set-and-coerce-property! 'Button1 'Enabled #t 'boolean)
(set-and-coerce-property! 'ScanButton 'Enabled #t 'boolean)
(set-and-coerce-property! 'RetryButton 'Visible #f 'boolean)
(if (call-yail-primitive yail-not (*list-for-runtime* (call-component-method 'PhoneStatus1 'isConnected (*list-for-runtime*)
'())
)
'( boolean)
"not")
(begin (set-and-coerce-property! 'ConnectFailLabel 'Visible #t 'boolean)
)
(begin (set-and-coerce-property! 'ConnectFailLabel 'Visible #f 'boolean)
)
)
)
;;; Screen1 ;;; Screen1
(do-after-form-creation (set-and-coerce-property! 'Screen1 'ScreenOrientation "portrait" 'text) (do-after-form-creation (set-and-coerce-property! 'Screen1 'ScreenOrientation "portrait" 'text)
(set-and-coerce-property! 'Screen1 'Scrollable #f 'boolean) (set-and-coerce-property! 'Screen1 'Scrollable #f 'boolean)
(set-and-coerce-property! 'Screen1 'Title "MIT AICompanion" 'text) (set-and-coerce-property! 'Screen1 'Title "MIT AICompanion" 'text)
(set-and-coerce-property! 'Screen1 'VersionCode 203 'number) (set-and-coerce-property! 'Screen1 'VersionCode 204 'number)
(set-and-coerce-property! 'Screen1 'VersionName "2.03" 'text) (set-and-coerce-property! 'Screen1 'VersionName "2.04" 'text)
)
(define-event Screen1 Initialize()
(set-this-form)
((get-var Setup))
) )
(define-event Screen1 ErrorOccurred( component functionName errorNumber message ) (define-event Screen1 ErrorOccurred( component functionName errorNumber message )
(set-this-form) (set-this-form)
(set-and-coerce-property! 'Label8 'Visible #t 'boolean) (set-and-coerce-property! 'Label8 'Visible #t 'boolean)
(if (call-yail-primitive yail-equal? (*list-for-runtime* (lexical-value errorNumber)
1501)
'( any any)
"=")
(begin (set-and-coerce-property! 'Label8 'Text "Your phone does not appear to have a Bar Code Scanning Application Installed." 'text)
)
(begin (set-and-coerce-property! 'Label8 'Text "An Error Occurred. Please try pressing \"Connect to App Inventor\" again." 'text)
)
)
((get-var Setup)) ((get-var Setup))
)
(define-event Screen1 Initialize()
(set-this-form)
((get-var Setup))
) )
;;; HorizontalArrangement2 ;;; HorizontalArrangement2
(add-component Screen1 HorizontalArrangement HorizontalArrangement2 (set-and-coerce-property! 'HorizontalArrangement2 'Width -2 'number) (add-component Screen1 HorizontalArrangement HorizontalArrangement2 (set-and-coerce-property! 'HorizontalArrangement2 'Width -2 'number)
...@@ -125,7 +137,9 @@ $Source $Yail ...@@ -125,7 +137,9 @@ $Source $Yail
) )
(define-event ScanButton Click() (define-event ScanButton Click()
(set-this-form) (set-this-form)
(call-component-method 'BarcodeScanner1 'DoScan (*list-for-runtime*) (set-and-coerce-property! 'Label8 'Visible #f 'boolean)
(call-component-method 'BarcodeScanner1 'DoScan (*list-for-runtime*)
'()) '())
) )
...@@ -177,8 +191,7 @@ $Source $Yail ...@@ -177,8 +191,7 @@ $Source $Yail
) )
;;; Label8 ;;; Label8
(add-component Screen1 Label Label8 (set-and-coerce-property! 'Label8 'Text "An Error Occurred. Please try pressing \"Connect to App Inventor\" again." 'text) (add-component Screen1 Label Label8 (set-and-coerce-property! 'Label8 'TextColor #xFFFF0000 'number)
(set-and-coerce-property! 'Label8 'TextColor #xFFFF0000 'number)
(set-and-coerce-property! 'Label8 'Visible #f 'boolean) (set-and-coerce-property! 'Label8 'Visible #f 'boolean)
) )
;;; HorizontalArrangement5 ;;; HorizontalArrangement5
......
appinventor/aiplayapp/youngandroidproject/project.properties
View file @ 7f02aeb0
...@@ -4,5 +4,5 @@ assets=../assets ...@@ -4,5 +4,5 @@ assets=../assets
source=../src source=../src
build=../build build=../build
icon=AICompanion.png icon=AICompanion.png
versioncode=203 versioncode=204
versionname=2.03 versionname=2.04
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment