Make(PHP)
Pos(3,0)
Add(EntryPoint,2089437,18,105)
{
 link(onStart,10003952:doCompare,[])
}
Add(HTM_FrameSet,8688470,263,259)
{
 Rows="65,*,60"
 link(onPrint,15915850:doPrint,[])
}
Add(HTM_Frame,15915850,312,259)
{
 Source="frames.php?page=top"
 link(onPrint,4295423:doPrint,[])
}
Add(If_else,10003952,88,105)
{
 Op1=String(top)
 link(onTrue,6673925:doEcho,[])
 link(onFalse,9071927:doCompare,[(132,118)(132,160)])
 link(Op2,4725152:Var2,[])
}
Add(Vars,7018914,88,49)
{
 Name="page"
 Point(Get)
}
Add(If_else,9071927,144,154)
{
 Op1=String(body)
 link(onTrue,5578557:doPrint,[])
 link(onFalse,10587032:doCompare,[(184,167)(184,209)])
 link(Op2,8481161:Var2,[])
}
Add(GetDataEx,4725152,88,84)
{
 link(Data,7018914:Get,[])
}
Add(HTM_Frame,2597467,417,259)
{
 Source="frames.php?page=bottom"
}
Add(HTM_Frame,4295423,368,259)
{
 Source="frames.php?page=body"
 link(onPrint,2597467:doPrint,[])
}
Add(If_else,10587032,193,203)
{
 Op1=String(bottom)
 link(onTrue,5404228:doPrint,[])
 link(onFalse,8688470:doPrint,[(233,216)(233,265)])
 link(Op2,8481161:Var3,[(206,128)])
}
Add(GetDataEx,8481161,144,119)
{
 link(Data,4725152:Var3,[(157,93)])
}
Add(Echo,6673925,263,105)
{
 Message="<center><b>Пример построения WEB чата в HiAsm</b><br><font size=-2>(обновление происходит каждые 10 секунд)</font></center>"
}
Add(File,812471,368,154)
{
 FileName="chat.txt"
 Mode="r"
 link(onOpen,16511376:doEvent,[])
}
Add(FileOperation,11240439,473,154)
{
 Length=1024
 link(onRead,6476088:doEcho,[])
}
Add(Echo,6476088,529,154)
{
}
Add(Hub,16511376,417,154)
{
 link(onEvent1,11240439:doRead,[])
 link(onEvent2,812471:doClose,[(459,167)(459,192)(360,192)(360,167)])
}
Add(HTM_Form,5404228,263,203)
{
 Action="frames.php?page=bottom&cmd=add"
 link(onPrint,13856932:doPrint,[])
}
Add(HTM_Edit,13856932,312,203)
{
 Name="text"
 Size=100
 link(onPrint,14164535:doPrint,[])
}
Add(HTM_Submit,14164535,368,203)
{
 Value="Добавить"
 link(onPrint,9050810:doCompare,[])
}
Add(LinkTip,12460554,18,273)
{
 Link="http://localhost/frames.php"
 Font=[MS Sans Serif,8,0,16711680,1]
}
Add(If_else,9050810,592,203)
{
 Op1=String(add)
 link(onTrue,10378805:doOpen,[])
 link(Op2,4788963:Get,[])
}
Add(Vars,4788963,592,154)
{
 Name="cmd"
 Point(Get)
}
Add(File,10378805,641,203)
{
 FileName="chat.txt"
 Mode="a"
 link(onOpen,3604669:doEvent,[])
}
Add(Hub,3604669,697,203)
{
 link(onEvent1,2059930:doStrCat,[])
 link(onEvent2,10378805:doClose,[(739,216)(739,246)(633,246)(633,216)])
}
Add(FileOperation,12954792,802,203)
{
 Length=128
 link(FileID,10378805:FileID,[(808,193)(683,193)(683,243)(647,243)])
}
Add(Vars,3118224,753,154)
{
 Name="text"
}
Add(StrCat,2059930,753,203)
{
 Str2="<br>"
 link(onStrCat,12954792:doWrite,[(793,209)(793,216)])
 link(Str1,3118224:Post,[])
}
Add(HTM_Meta,4789139,263,154)
{
 HttpEquiv="refresh"
 Content="10"
 link(onPrint,13358978:doPrint,[])
}
Add(HTM_Html,5578557,214,154)
{
 link(onPrint,4789139:doPrint,[])
}
Add(HTM_Body,13358978,312,154)
{
 link(onPrint,812471:doOpen,[])
}