equal
deleted
inserted
replaced
882 if Gear <> nil then |
882 if Gear <> nil then |
883 begin |
883 begin |
884 Gear^.Hedgehog:= hh; |
884 Gear^.Hedgehog:= hh; |
885 Gear^.Text:= text; |
885 Gear^.Text:= text; |
886 Gear^.FrameTicks:= x |
886 Gear^.FrameTicks:= x |
887 end |
887 end; |
|
888 ParseCommand('/say [' + hh^.Name + '] '+text, true) |
888 end |
889 end |
889 //else ParseCommand('say ' + text, true) |
|
890 end |
890 end |
891 else if (x >= 4) then |
891 else if (x >= 4) then |
892 begin |
892 begin |
893 SpeechType:= x-3; |
893 SpeechType:= x-3; |
894 SpeechText:= text |
894 SpeechText:= text |