equal
deleted
inserted
replaced
1855 hh:= @TeamsArray[t]^.Hedgehogs[j] |
1855 hh:= @TeamsArray[t]^.Hedgehogs[j] |
1856 end; |
1856 end; |
1857 inc(j) |
1857 inc(j) |
1858 end |
1858 end |
1859 end; |
1859 end; |
1860 if hh <> nil then Gear:= AddVisualGear(0, 0, vgtSpeechBubble); |
1860 if hh <> nil then |
1861 if Gear <> nil then |
|
1862 begin |
1861 begin |
1863 Gear^.Hedgehog:= hh; |
1862 Gear:= AddVisualGear(0, 0, vgtSpeechBubble); |
1864 Gear^.Text:= text; |
1863 if Gear <> nil then |
1865 Gear^.FrameTicks:= x |
1864 begin |
|
1865 Gear^.Hedgehog:= hh; |
|
1866 Gear^.Text:= text; |
|
1867 Gear^.FrameTicks:= x |
|
1868 end |
1866 end |
1869 end |
1867 //else ParseCommand('say ' + text, true) |
1870 //else ParseCommand('say ' + text, true) |
1868 end |
1871 end |
1869 else if (x >= 4) then |
1872 else if (x >= 4) then |
1870 begin |
1873 begin |