equal
deleted
inserted
replaced
1219 begin |
1219 begin |
1220 Gear^.Hedgehog:= hh; |
1220 Gear^.Hedgehog:= hh; |
1221 Gear^.Text:= text; |
1221 Gear^.Text:= text; |
1222 Gear^.FrameTicks:= x |
1222 Gear^.FrameTicks:= x |
1223 end; |
1223 end; |
1224 AddChatString(#9+Format(trmsg[sidChatHog], HH^.Name, text)); |
1224 AddChatString(#9+Format(shortstring(trmsg[sidChatHog]), HH^.Name, text)); |
1225 end |
1225 end |
1226 end |
1226 end |
1227 else if (x >= 4) then |
1227 else if (x >= 4) then |
1228 begin |
1228 begin |
1229 SpeechType:= x-3; |
1229 SpeechType:= x-3; |