41 replies to this topic

[HSM]

File Name: Merry go Round (Gottlieb 1960)

File Submitter: HSM

File Submitted: 15 Dec 2019

File Category: VPX Recreations

Author(s): HSM
loserMan76 B2S
Manufacturer: Gottlieb
Year: 1960
Permission to MOD?: Yes, without approval

Inspired by Margoni's FP version.
I could find very little on game play for this machine, however the rule set appears very simple.
Shoot the ball, score points and have fun. Gobble holes end the ball but score big!
 
Now includes a great looking B2S by loserMan76.

Click here to download this file

[Scorpion]

HELLO FRIEND,

the pinball is very good, but you need to do two things for perfection....the holes are circles, there are not real and the registration of high scores..thanks for your work

Scorpion

[cestmoi]

Avis ce dessus partagé

 

Très belle table cependant très amusante

merci

[Mustang1961]

Dear HSM, dear Margoni,

 

thank you for this recreation, because this pin is very special for me. Why??

 

Due to THIS:

 

 DSCN2195B.jpg   168.12KB   5 downloads

 

One question: in my initial play the gobble holes have not sinked the ball, is there a switch to activate that???

 

I ticked the boxes "fall through" and increased the diameter - nothing.

 

Greeting, Christian.

Edited by Mustang1961, 16 December 2019 - 06:38 PM.

[STAT]

Very nice Mustang

Maybe you can do and share a good Photo from the BG?
Could do a new nice directb2s ...

I also tried something, I couldn't "delete" the Wood-Look on any Elements...
Edit: mean for the Holes, of course.

Edited by STAT, 16 December 2019 - 10:10 PM.

[HSM]

Dear HSM, dear Margoni,

 

thank you for this recreation, because this pin is very special for me. Why??

 

Due to THIS:

 

DSCN2195B.jpg

 

One question: in my initial play the gobble holes have not sinked the ball, is there a switch to activate that???

 

I ticked the boxes "fall through" and increased the diameter - nothing.

 

Greeting, Christian.

 

Hi,

 

The holes are actually primitives (Hole, Hole001 and Hole002)  and are on layer 9.    Increasing the X and Y size from 7.5 to 8 would make them a bit larger.    They would max out at 9 because that's where they meet the playfield mesh but they would be really big at that point.

 

 

[Mustang1961]

Maybe you can do and share a good Photo from the BG?
Could do a new nice directb2s ...

Hi Stefan,

 

give me a few days, I will do my best.

 

Hi HSM,

 

will you publish an updated version with working holes?

[Thalamus]

Hi Christian / Mustang1961 : I believe what you are looking for is holes that isn't rejecting as often as they do. I don't know this machine, but, I have a feeling you do My advice to try to tune it to your liking is not to change the holes but to change the kickers in this case. Hide all layers except 8. There you have the kickers. On their properties. Change hit accuracy to 1 for all of them. Then change hit height to 50. If that becomes too easy, adjust them down to your liking.

[Albert]

The wheel doesn't rotate at all. It just jumps from one value to the next.

 

Fix:

 

In the "Sub Table1_init", add this line:

pos =240

 

Delete Lines 739 til 808 (or comment them out, in case you want to revert the changes).

 

For the deleted lines, add these:

Dim pos
Dim weiter
Dim rotiert

Sub SpinWheel
If rotiert =1 then
Exit Sub
End If
weiter =0
WheelTimer.Interval =10
WheelTimer.enabled =1
Playsound "motorsound"
End Sub

Sub WheelTimer_Timer
rotiert =1
If weiter =120 then
Me.enabled =0
wheel2
Exit Sub
End If
weiter = weiter +1
pos = pos +1
Wheel.RotAndTra8 =pos
If pos =360 then pos =0
End Sub

Sub wheel2
Stopsound "motorsound"
rotiert =0
WheelValue = WheelValue +1
If WheelValue =4 then
WheelValue =1
End If
End Sub

Sub KickerHole1_Hit()
PlaySound "balldrop"
If WheelValue = 1 Then Addscore 100:end If
If WheelValue = 2 Then Addscore 200:end If
If WheelValue = 3 Then Addscore 300:end If

KickerHole1.DestroyBall
nextball
End Sub

Sub KickerHole2_Hit()

PlaySound "balldrop"
KickerHole2.DestroyBall
If WheelValue = 1 Then Addscore 200:end If
If WheelValue = 2 Then Addscore 300:end If
If WheelValue = 3 Then Addscore 100:end If
nextball
End Sub

Sub KickerHole3_Hit()
PlaySound "balldrop"
KickerHole3.DestroyBall
If WheelValue = 1 Then Addscore 300:end If
If WheelValue = 2 Then Addscore 100:end If
If WheelValue = 3 Then Addscore 200:end If
nextball
End Sub

 

For a sound effect of the rotating wheel, you can add a sound effect of your choice (here called "motorsound").

 

Incidentally, the bumper force is too strong for an early 60's game. A value of 7 is better.
 

[STAT]

Sounds good...

Christian, just wait a day, I got a nice image...

Edited by STAT, 17 December 2019 - 09:55 PM.

[HSM]

The wheel doesn't rotate at all. It just jumps from one value to the next.

 

Fix:

 

In the "Sub Table1_init", add this line:

pos =240

 

Delete Lines 739 til 808 (or comment them out, in case you want to revert the changes).

 

For the deleted lines, add these:

Dim pos
Dim weiter
Dim rotiert

Sub SpinWheel
If rotiert =1 then
Exit Sub
End If
weiter =0
WheelTimer.Interval =10
WheelTimer.enabled =1
Playsound "motorsound"
End Sub
---8<---

 

Thanks!  I very much wanted to give the wheel a visible spin when changing numbers but couldn't figure out how obviously.  

As I've never seen this actual game in action I can't be sure, but I suspect the wheel would have been solenoid driven and would have switched quite fast.

 

[Albert]

As I've never seen this actual game in action I can't be sure, but I suspect the wheel would have been solenoid driven and would have switched quite fast.

 

Hopefully some day a video of this game emerges, or somebody who played the actual machine can give us informations.

 

Anyway, a faster wheel change can easily be done by changing two parameters in the "Sub WheelTimer_Timer":

 

Change If weiter =120 to If weiter =12

Change pos = pos +1 to pos = pos +10

[HSM]

 

Maybe you can do and share a good Photo from the BG?
Could do a new nice directb2s ...

Hi Stefan,

 

give me a few days, I will do my best.

 

Hi HSM,

 

will you publish an updated version with working holes?

 

Yes, look for an update release later today.  I'm off to work so in about 9 hrs   

 

 

[Mustang1961]

Sounds good...

Christian, just wait a day, I got a nice image...

Stefan,

 

my BG is not like new but for the age (59 years) ok. I got it as present about 1976 from our neighbour, who had a business as pub owner and pinbal and gaming machines operator.

 

 

Yes, look for an update release later today.  I'm off to work so in about 9 hrs   

 

 

 

perfect!

Edited by Mustang1961, 18 December 2019 - 03:35 PM.

[STAT]

HSM, i try to make another BG with a better Image, i noticed also, Score for 1.000 K should be 1 Light, i Change that also,
so you have to update your Script:

Add to "Game Start", at the B2S Commands Line 111-117
Controller.B2SSetData 1,0: Controller.B2SSetData 2,0

Add/Change from Line 553
If B2SOn Then
Controller.B2SSetScorePlayer player, score(player)
If score(player) > 999 Then Controller.B2SSetData player, 1
End If

Edited by STAT, 18 December 2019 - 07:11 PM.

[STAT]

Image isn't the Best, Christian, may we try also your Photo, if we can get one

 Merry-go-Round Illuminated.png   785.46KB   6 downloads

[Mustang1961]

Image isn't the Best, Christian, may we try also your Photo, if we can get one

Merry-go-Round Illuminated.png

 

I will try my best, at present "Game Over" and "Tilt" are at wrong position. I'll clarify with picture.

[Albert]

I will try my best, at present "Game Over" and "Tilt" are at wrong position. I'll clarify with picture.

 

The real backglass has actually two "tilt" indicators!

[HSM]

1.1 is posted and includes all the improvements and suggestions to date.

 

The Gobble holes are adjustable in the script, Settings from 1-4, 1 is the same size as the original release.  As you go higher the diameter increases so more gobbles!  I also changed the primitives for the holes so you can see the "bottom". 

[bord]

Thanks for the update! Would love to see the table size updated to 952x1927 for accuracy someday.