{VERSION 6 0 "IBM INTEL NT" "6.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Text \+ Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 2 6 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 2 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "retstart:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "with(Maplets):\nwith(Maplets[Elemen ts]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "isExit:=false:\nis Men:=true:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 217 "gr:=\n GridR ow(\n GridCell(Button(\"1\",width=40,onclick=A_Empty)),\n GridCell(B utton(\"2\",width=40,onclick=A_Empty)),\n GridCell(Button(\"3\",width =40,onclick=A_Empty)),\n GridCell(Button(\"4\",width=40,onclick=A_Emp ty))\n ):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 89 "Exit:=proc()\n global isExit:\n Maplets:-Tools:-Set(A_E(run)=true):\n isExit:=true\n end proc:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 283 "Men:=proc()\n global k,gr,isMen:\n if (k=2) then\n return\n end if:\n Maplets:-Too ls:-Set(A_E(run)=true):\n if (k=4) then\n isMen:=false\n end if:\n k: =k-2:\n gr:=GridRow(\n seq(\n GridCell(\n Button(cat (\"\",i),width=50,onclick=A_Empty)\n ),\n i=1..k)\n )\n end proc:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 225 "Bol:=proc()\n global k,gr,isMen:\n Maplets:-Tools:-Set(A_E(run)=true):\n isMen:=tru e:\n k:=k+2:\n gr:=GridRow(\n seq(\n GridCell(\n But ton(cat(\"\",i),width=50,onclick=A_Empty)\n ),\n i=1..k)\n \+ )\nend proc:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "k:=4:" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 889 "do\n M:=Maplet[Main](abno rmalshutdown=\"Exit\",\n Window(title=\"Sizer\",\n menubar=MB_Exit, \n toolbar=ToolBar(\n ToolBarButton(\"\",onclick=Evaluate(functio n=Exit),\n image=I_Exit,tooltip=\"Exit\")\n ),\n layout=GridLa yout(inset=5,halign=center,\n gr,\n GridRow(\n GridCell(widt h=k/2,\n Button[B_Men](\"\314\345\355\374\370\345\",onclick=Evalu ate(function=Men),\n enabled=isMen,font=F_helveticabold14)\n \+ ),\n GridCell(width=k/2,\n Button[B_Bol](\"\301\356\353\374 \370\345\",onclick=Evaluate(function=Bol),\n font=F_helveticabol d14)\n )\n )\n )\n ),\n Action[A_Empty](),\n Action[A_E](S hutdown()),\n Font[F_helveticabold14](\"helvetica\",bold,14),\n Imag e[I_Exit](\"D:/ASN/2005/Day_7/ChangeSize/house.gif\"),\n MenuBar[MB_E xit](\n Menu(\"&File\",\n MenuItem(\"&Exit\",image=I_Exit,\n \+ onclick=Evaluate(function=Exit))\n )\n )\n ):\n Display(M):\n if (i sExit or %=\"Exit\" ) then break end if\nend do:" }}{PARA 6 "" 1 "" {TEXT -1 38 "Initializing Java runtime environment." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "9 0 0" 0 }{VIEWOPTS 1 1 1 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }