Page 1 of 2
Space Miners
Posted: Tue Jan 04, 2011 12:20 pm
by AndyLy
"Space Miners" - Space Simulator
The game has 400 locations. The complete story line (plot of more than 20 quests and mini games + extra quests + auto quests)
Internet (game), the system dynamic messages, artificial life: NPC fight, extracting resources, capture territory, developing. Life goes on regardless of the player.
Designed for XP-32. Beware - the game in Russian!
One more thing: the game is written entirely using standard PureBasic functions, without using third-party DLL, etc.
Video:
http://www.youtube.com/watch?v=qLsprItu5TE
Screens :

Download :
http://rapidshare.com/files/440657363/S ... rs_1.0.exe
or oficial site :
http://spaceminers.narod.ru/Index.html
Questions to the author at the forum:
http://spaceminers.mybb2.ru/index.php
Re: Space Miners
Posted: Tue Jan 04, 2011 2:44 pm
by Nituvious
Very cool!
Re: Space Miners
Posted: Tue Jan 04, 2011 3:17 pm
by gnasen
I would really like to test the game, because it looks very interesting.
However I think I couldnt even finish the first level (or the menu) without any russian language knowledge. An english translation would be pretty nice

Re: Space Miners
Posted: Tue Jan 04, 2011 3:56 pm
by AndyLy
What can I say, guys, I can translate the interface into English, but the dialogue is like poetry. I do not know English so well.
As for the flight to space- just talk with the "Мастер Хаупт"- you will get ship and you can have fun in the open space.
Re: Space Miners
Posted: Tue Jan 04, 2011 8:27 pm
by Rook Zimbabwe
Developing multilanguage in your program would openmany markets! There are more than a few threads on this forum about it! Search for Lnaguage support
If you send me the translated poetry I will attempt to poetize it in English...
Re: Space Miners
Posted: Tue Jan 04, 2011 9:41 pm
by AndyLy
First of all, guys, this is the only game that uses only standard features of Pure Basic. She is the only cool game, which was created by Pure Basic. Secondly, yes, I can translate into English, but lost the uniqueness of the dialogue, changing the meaning of the game, made by Russian users. Thirdly, I am not against the participation of designers, programmers, testers ...
If you really interested, I strip off the data, texts.
"Happiness for all. No one should leave deprived"
Re: Space Miners
Posted: Wed Jan 05, 2011 10:16 am
by AndyLy
Seen in the next topic physics. I've been doing DLL for the final version of my game. Its no finished. You may use it. Just a clash of balls.
Code: Select all
#B_Num=10: #B_Size=64: ScrSizeX=1024: ScrSizeY=768: MyDelay=20: deltaKEnergy.f=0.05: BitPow=150
InitMouse(): InitSprite(): InitKeyboard(): InitSound(): OpenScreen(ScrSizeX, ScrSizeY, 32, "")
Structure Ball: X.f: Y.f: SX.f: SY.f: E.f: Weight.f: R.f: EndStructure: Dim Ball.ball(#B_Num)
Prototype.l ProtoCircImpact( Array Ball.Ball(1),B_Num): Prototype.l ProtoCircOutScreen( Array Ball.Ball(1),B_Num,ScrSizeX,ScrSizeY)
OpenLibrary(0, "D:\PUREBASIC\StarTravel\SM_Engine84.dll"): CircImpact.ProtoCircImpact = GetFunction(0, "CircImpact"): CircOutScreen.ProtoCircOutScreen = GetFunction(0, "CircOutScreen")
For C=1 To #B_Num: Ball(C)\X=400+Random(300): Ball(C)\Y=150+Random(300);+C*#B_Size+4:
Ball(C)\E=1: Ball(C)\Weight=1: Ball(C)\R=#B_Size/2: CreateSprite(C,#B_Size,#B_Size): StartDrawing(SpriteOutput(C)): Rcol=Random(255): Bcol=Random(255): Gcol=Random(255)
For k=#B_Size To 1 Step -2: Circle(#B_Size/2,#B_Size/2,k/2,RGB(255-k*196/#B_Size,Gcol,Bcol)): Next: StopDrawing(): Next
Ball(0)\X=#B_Size: Ball(0)\Y=ScrSizeY/2+#B_Size/2: Ball(0)\E=1: Ball(0)\Weight=1: Ball(0)\R=#B_Size/2: CreateSprite(0,#B_Size,#B_Size): StartDrawing(SpriteOutput(0))
For k=#B_Size To 1 Step -2: Circle(#B_Size/2,#B_Size/2,k/2,RGB(255-k*196/#B_Size,255-k*196/#B_Size,255-k*196/#B_Size)): Next: StopDrawing()
CreateSprite(1000,24,24): StartDrawing(SpriteOutput(1000)): DrawingMode(4): Circle(12,12,12,RGB(250,0,0)): Circle(12,12,6,RGB(250,0,0)): StopDrawing()
Repeat: FlipBuffers(): ClearScreen(0): ExamineKeyboard(): ExamineMouse(): MsX+MouseDeltaX(): MsY+MouseDeltaY()
If MouseButton(1): kX=Abs(Ball(0)\X-MsX)/BitPow: kY=Abs(Ball(0)\Y-MsY)/BitPow
If Ball(0)\X>MsX: Ball(0)\SX=Ball(0)\SX-kX: Else: Ball(0)\SX=Ball(0)\SX+kX: EndIf: If Ball(0)\Y>MsY: Ball(0)\SY=Ball(0)\SY-kY: Else: Ball(0)\SY=Ball(0)\SY+kY: EndIf: EndIf
CircOutScreen(@Ball(),#B_Num,ScrSizeX,ScrSizeY): CircImpact(@Ball(),#B_Num)
For C=0 To #B_Num: DisplayTransparentSprite(C,Ball(C)\X-#B_Size/2,Ball(C)\Y-#B_Size/2): Next: DisplayTransparentSprite(1000,MsX-12,MsY-12)
Delay(MyDelay): Until KeyboardReleased(#PB_Key_Escape)
DLL :
http://rapidshare.com/files/440893372/SM_Engine84.dll
Need other filehosting say it.
Re: Space Miners
Posted: Wed Jan 05, 2011 8:20 pm
by blueznl
Oh dear. I hope I never have to debug any of your code

Re: Space Miners
Posted: Wed Jan 05, 2011 8:30 pm
by AndyLy
Not quite sure what you have in view.
If a code is appropriate that I have a few lines is for the forum.
Re: Space Miners
Posted: Wed Jan 05, 2011 8:58 pm
by Tenaja
Yeah--I think the first thing I'd have to do is search for all : and replace them all with cr's...
Re: Space Miners
Posted: Thu Jan 06, 2011 9:20 am
by AndyLy
If the game slows down, or vice versa is running too fast, go to the setup menu and change settings such as:
Скорость игры (game speed)
Качество 3D планет (Qualities of 3D planets)
This greatly affects the speed of the program-If you set these settings at least, be able to play on the calculator.
Since this is not the final version, and in Russia the new year, so be it'll tell you a cheat code:
In file Settings.cfg- set: ConsoleEnable = 1.
In the game, at any time, press the tilde ("`"), and type: get_creds - you'll get 10000 credits.
Re: Space Miners
Posted: Mon Jan 24, 2011 8:22 am
by honey123
It would have been great if there was the translation facility as I don’t understand a word of Russian!! I hope that they’ll do something about it as lot of people seems interested to try it out!! I totally agree that only by developing Multilanguage in the program will help to market the game!!
Re: Space Miners
Posted: Tue Jan 25, 2011 12:39 am
by AndyLy
honey123
I doubt that so many people interested in my game
As I wrote, I'll translate the interface and short messages in English, a little later, when there will be free time.
But the quests and dialogues, there need a professional literary translation. Spice of the game just in communication and dialogue, all else (war, flying, etc.) only decoration.
Re: Space Miners
Posted: Tue Jan 25, 2011 4:21 am
by Tenaja
Will babelfish translate Russian? If so, you could make a file to contain the text, and let others edit it as needed.
Re: Space Miners
Posted: Wed Jan 26, 2011 12:49 pm
by AndyLy
Will babelfish translate Russian?
Not sure. Russian language is very rare.
It's not that I do not want to lay out the text, I want it to be correctly understood.
I have already started to translate. Translated by about 30% of the interface and short messages and two of dialogue at game start. Work was more than I expected.