zdearborn

Hey guy's I am not artistically inclined at all, but I was messing around trying to make a logo for Soldier's Tale. Here's what I ended up with:  Please, any suggestions and feedback. Also, if anyone would like to try their hand at making their own Soldier's Tale logo (which, frankly, would be greatly appreciated and desired), here's the bg:  Thanks again

It might be your firewall, trying adding the ports to the exceptions list on Windows Firewall (if you're using it)

Yeah, do something like ``` If Len(message) > 35 Then ' length more than 35 chars SendActionMsg GetPlayerMap(Index), Left$(Trim$(message),35), Yellow, ACTIONMSG_STATIC, GetPlayerX(Index), (GetPlayerY(Index) * 32) - 40 ' top SendActionMsg GetPlayerMap(Index), Mid$(Trim$(message), 36, 70) & "...", Yellow, ACTIONMSG_STATIC, GetPlayerX(Index), (GetPlayerY(Index) * 32) - 25 ' bottom Else ' single line SendActionMsg GetPlayerMap(Index),message,35), Yellow, ACTIONMSG_STATIC, GetPlayerX(Index), (GetPlayerY(Index) * 32) - 25 End If ``` This just draws 2 lines of text, the second row just ends with "…" in case the length of the message exceeds the split checks. If you apply word wrap like Robin mentioned, you'll have no need for this. p.s. this doesnt split by words/spaces, it splits by characters so you may end up with something like: This is a bubble chat mess age. Blah Blah Blah...

Wow I'm off today. It wouldn't be hard too check the length of the message and split it up accordingly

Yes

it's mainly just a copy and paste of the existing sendactionmsg's, with edits, and it doesn't look nearly as bad in the editor as it does in the code tags but if you've got some kind of incurable OCD with the length of your lines you could just set all the parameters in variables earlier in the sub.

> Get out of my pants! No, I refuse! .. does that make me a rapist? >  Looking good so far.

Oops! should've recognized that after he quoted you. If that's what you want, ironcomics, ignore my previous post :P

No, it wouldn't take long at all.. here: (Server) In modServerTcp, sub SayMsg_Map - add this after Set Buffer = Nothing ``` SendActionMsg GetPlayerMap(Index), message, Yellow, ACTIONMSG_STATIC, GetPlayerX(Index) * 32, (GetPlayerY(Index) * 32) - 25 ' - 25 so it is above the player ``` Of course there are many things you will have to tweak to get it to look like you want

How I did it was on handling saymsg (server side), I just sent a static action msg that would include the player's say text. However, this method doesn't have a graphical appeal like a physical chat bubble, just text.

All that aside, I love it

Yes it was my own stupidity and overlook that caused this error (as robin said, UDT's didn't match), it's all working now, thanks!

Try ``` x = Val(Npc(mapNpcNum).AttackSay) ```

Hey, been working on a quest system, and I'm getting a subscript out of range with the highlighted line: ``` CopyMemory ByVal VarPtr(Quest(questNum)), ByVal VarPtr(QuestData(0)), QuestSize ``` Here's the full sub: ``` ' :::::::::::::::::::::: ' :: Save quest packet :: ' :::::::::::::::::::::: Sub HandleSaveQuest(ByVal Index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long) Dim questNum As Long Dim i As Long Dim Buffer As clsBuffer Dim QuestSize As Long Dim QuestData() As Byte Set Buffer = New clsBuffer Buffer.WriteBytes Data() ' Prevent hacking If GetPlayerAccess(Index) < ADMIN_DEVELOPER Then Exit Sub End If questNum = Buffer.ReadLong ' Prevent hacking If questNum < 0 Or questNum > MAX_QUESTS Then Exit Sub End If QuestSize = LenB(Quest(questNum)) ReDim QuestData(QuestSize - 1) QuestData = Buffer.ReadBytes(QuestSize) CopyMemory ByVal VarPtr(Quest(questNum)), ByVal VarPtr(QuestData(0)), QuestSize Set Buffer = Nothing ' Save it Call SendUpdateQuestToAll(questNum) Call SaveQuest(questNum) Call AddLog(GetPlayerName(Index) & " saving quest #" & questNum & ".", ADMIN_LOG) End Sub ``` It says that QuestData(0) = If you need me to post more of my code, please tell me and I will asap. Any help appreciated, thanks~

No, Sekaru, you are never right :P

This simple 2-step process may very well be your only answer: 1\. Learn to program Visual Basic 6 2\. Make your own crafting system

Try removing that code in CanPlayerAttackNpc and restoring it back to its default state, after you've done that remove the check for the shopkeeper behavior: ``` If Npc(npcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(npcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER Then CanPlayerAttackNpc = True Exit Function End If ```To: ``` If Npc(npcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY Then CanPlayerAttackNpc = True Exit Function End If ``` Then put your code in TryPlayerAttackNpc like: ``` ' Can we attack the npc? If CanPlayerAttackNpc(Index, mapNpcNum) Then mapNum = GetPlayerMap(Index) npcNum = MapNpc(mapNum).Npc(mapNpcNum).Num ' YOUR CODE! Dim attackSay As Long attackSay = Trim$(Npc(npcNum).AttackSay) ' not completely sure if this will work since it is not a long? If Npc(npcNum).Behaviour = NPC_BEHAVIOUR_SHOPKEEPER Then If Len(Trim$(Shop(attackSay).Name)) > 0 Then SendOpenShop index, attackSay TempPlayer(index).InShop = attackSay ' stops movement and the like Exit Sub ' exit out before you actually deal damage to the shopkeeper End If End If End If End If ``` The code formatting is bad, but just respace it out in your IDE, reply what happens after you try this.

@Twilight: > it already is. False

I just wait until the season's over and run to Wal-Mart and buy it on DVD. Absolutely loved till after season 3\. After that it was just… blehh. Wasn't happy with the ending either.

.. or you can just calculate and check the speed server side

Nice! Thanks, I'll definitely be using this

I think what he wants is for the player to be at the center of the camera no matter where in the map he is located. For instance by default, if you are in the bottom corner, the camera will stop following and just move the player. A (burdensome) workaround could be to extend the boundaries of your map, and put the respective tiles of the next map there, but put Warp attributes down before the camera actually hits the edge, so when the player is walking the camera will continue to scroll, and warp the player before actually hitting the map's edge.

I added you on MSN.

Yes, it works beautifully. 4 days? sleeping pills ftw

Hahaha that was such a simple overlook. :embarrassed: Thank you so much for the help!