MUD problems -- GUYS, I NEED HELP!

Author

Message

Lorraine Evans

20

Years of Service

User Offline

Joined: 17th Aug 2004

Location:

Posted: 29th Dec 2004 09:36

Link

I want to make a MUD that will run on the internet or possibly on a LAN, but I ran into two problems. I know this has been posted before but my main problem is that there is no "if instr()" statememt. Remember that? On old QBASIC? Essentially, it triggers something if the string is included in another string:

if instr( "bebop", c$ )then... (if the string "bebop" is in the variable c$, then do this...)

this is important because, obviously, I don't want to try and anticipate every command, like "GIVE WATER" ot "READ BOOK", ETC. It could get complicated. PLEASE help me. I can't do this on a more comvenient programming language because I could never handle the multiplayer commands. Speaking of which, this is my NEXT problem. How do I do the client/server stuff? I know this is the wrong forum, but would someone colaborate with me about it? You guys have never failed me. Thanks so much.

Back to top

Profile PM

Frozen Flame

20

Years of Service

User Offline

Joined: 22nd Jul 2004

Location:

Posted: 29th Dec 2004 09:42

Link

Im not so sure what your asking about the if instr() so i cant help you there.
But about the conecting to a client or having a server i can help. Darkbasic Classic does not have an online capability. Although if you have upgraded to Darkbasic Enhanced or if you get DBPro then you can have online.
If you search around the forums im sure you can find some people with ready made online stuff. Maybe check the dll forums?

Hope i helped

Back to top

Profile PM Email Website

Jess T

Retired Moderator

21

Years of Service

User Offline

Joined: 20th Sep 2003

Location: Over There... Kablam!

Posted: 29th Dec 2004 17:20

Link

Hey Evans,

I have a string function that may help in what your trying to do...
It's part of a package of stuff that I gave to the community.

Here is the link to the thread detailing what it contains

http://forum.thegamecreators.com/?m=forum_view&t=43824&b=6

Hope That Helps

Jess.

Team EOD :: Programmer/All-Round Nice Guy
Aust. Convention!

Back to top

Profile PM Email Website

Philip

21

Years of Service

User Offline

Joined: 15th Jun 2003

Location: United Kingdom

Posted: 30th Dec 2004 06:25

Link

Er, Jess, I think "Evans" is Lorraine's surname!! I think you mean: "Hey Lorraine"!!

Philip

What do you mean, bears aren't supposed to wear hats and a tie? P3.2ghz / 1 gig / GeForce FX 5900 128meg / WinXP home

Back to top

Profile PM Email

Dot Merix

21

Years of Service

User Offline

Joined: 15th Oct 2003

Location: Canada

Posted: 30th Dec 2004 07:06 Edited at: 30th Dec 2004 07:07

Link

I really hope your mud project succeeds, however i must say i'm a little perplexed at why your wanting to make it in darkbasic..

It's going to be harder making it in DB then it would be using say Visual basic.

I posted on the programmers thread awhile ago about a good mud that uses visual basic 6 technology..

The link for that mud base is http://www.jaruzel.com/mud

I've personally written a tonne of commands for the game, and just recently released my version of it as a christmas present to those on the boards there(a few, but helpful few).

It's really easy to add commands and such to it as long as you know some basic programming knowledge.

In anycase, have fun.. and i hope all goes well for you.

WindowsXP Home(Service pack 2), Athlon XP 2400+(2.1Ghz), 1GIG Ram, Ati Radeon 9800Pro 128MB.

Back to top

Profile PM

Carolina South

20

Years of Service

User Offline

Joined: 28th Sep 2004

Location: South Carolina

Posted: 30th Dec 2004 08:14 Edited at: 30th Dec 2004 08:23

Link

I Don't know what your speed requirements are but this code (tested in Dark Basic Pro) will do what you want:

+ Code Snippet

`Possible  INSTR$() Replacement Routine

StringToCheck$ = "I Have a brown cow!"
StringToCheckFor$ = "brown"
StringFound$ = "N"
StrLen = Len(StringToCheck$)
CheckLen = Len(StringToCheckFor$)

`Create Array
Dim TestArray$(StrLen)

`Set Working String and Variables
TempString$ = StringToCheck$
StrLen2 = StrLen
`Load Array With  All Possibilities
For X = 1 to StrLen Step 1
    TestArray$(X) = Left$(TempString$,CheckLen)
    TempString$ = Right$(TempString$,StrLen2)
    StrLen2 = StrLen2 - 1
Next X

`Check Array For A Match
For X = 1 to StrLen Step 1
   If StringToCheckFor$ = TestArray$(X)
      StringFound$ = "Y"
   Endif
Next X

Print "Array Dump:"
For Z = 1 to StrLen Step 1
   Print "Element ";Z;" = ";TestArray$(Z)
Next Z

Print "String Checked:  ";StringToCheck$
Print "String Checked For:  ";StringToCheckFor$
Print "Result:  ";StringFound$
Wait Key
End

Hope This Helps out

"Diplomacy is the art of saying 'Nice doggie' until you can find a rock." - Will Rogers

"The secret to creativity is knowing how to hide your sources." - Albert Einstein

Back to top

Profile PM Email

Jess T

Retired Moderator

21

Years of Service

User Offline

Joined: 20th Sep 2003

Location: Over There... Kablam!

Posted: 30th Dec 2004 10:35

Link

lol, thanks Philip

Sorry bout that Lorraine, I just looked at the name, and only really read the "Evans" part

Jess.

Team EOD :: Programmer/All-Round Nice Guy
Aust. Convention!

Back to top

Profile PM Email Website

Sorry your browser is not supported!

DarkBASIC Discussion / MUD problems -- GUYS, I NEED HELP!