Jump to content

Rocky (Gottlieb 1982)

  • Get Support
  • Create an account or sign in to download this
download_no_perm
8573 Views
1413 Downloads
0 From 0 reviews
14.17 MB File Size
Tom Created by
Tom, Randr Scripting by
Gottlieb Manufacturer
1982 Year

1 Screenshot

Re-upload from VPB, 

 

Table done by Randr and Myself.  I dont have the original writeup so other may have helped too.  Thanks to all versions before that may have helped with the build but if i remember it was a full build.  Mods with approval.  Thanks to Wildman for his Authentic b2s and also the movie version of the B2s

Contact Author First.
v10.6 optional

User Feedback

Recommended Comments

dazzadasha

Posted

Hated this in the Arcade, then got it n my cab and it grew on me. Some funky shots indeed. Great rebuild guys. Thanks for sharing.

jbg4208

Posted

Thanks for sharing. Nice Work!

JFR1

Posted

Also steered clear of this in the arcades when it came out. 

But love getting to know it now. Thanks Tom!!

MikeDASpike

Posted

For people who want dipswitch control, just pat this at the end of the code and launch f6 during game play
Credits goes to @Inkochnito , I only added coin chute control

'**********************************************************************************************************
'Gottlieb System 80
'added by Inkochnito
'Added Coins chute by Mike da Spike
Sub editDips
    Dim vpmDips : Set vpmDips = New cvpmDips
	With vpmDips
        .AddForm  700,400,"Rocky - DIP switches"
        .AddFrame 2,4,190,"Left Coin Chute (Coins/Credit)",&H0000001F,Array("4/1",&H0000000D,"2/1",&H0000000A,"1/1",&H00000000,"1/2",&H00000010) 'Dip 1-5
        .AddFrame 2,80,190,"Right Coin Chute (Coins/Credit)",&H00001F00,Array("4/1",&H00000D00,"2/1",&H00000A00,"1/1",&H00000000,"1/2",&H00001000) 'Dip 9-13
        .AddFrame 2,160,190,"Center Coin Chute (Coins/Credit)",&H001F0000,Array("4/1",&H000D0000,"2/1",&H000A0000,"1/1",&H00000000,"1/2",&H00010000) 'Dip 17-21
        .AddFrame 2,240,190,"3rd coin chute credits control",&H20000000,Array("no effect",0,"add 9",&H20000000)'dip 30        
        
        .AddFrame 207,4,190,"Maximum credits",49152,Array("8 credits",0,"10 credits",32768,"15 credits",&H00004000,"20 credits",49152)'dip 15&16
        .AddFrame 207,80,190,"Coin chute left and right control",&H00002000,Array("seperate",0,"same",&H00002000)'dip 14
        .AddFrame 207,126,190,"Playfield special",&H00200000,Array("replay",0,"extra ball",&H00200000)'dip 22
        .AddFrame 207,172,190,"High games to date control",&H00000020,Array("no effect",0,"reset high games 2-5 on power off",&H00000020)'dip 6
        .AddFrame 207,218,190,"Game option dip 7",&H00000040,Array("off",0,"on",&H00000040)'dip 7
        .AddFrame 207,264,190,"Game option dip 8",&H00000080,Array("off",0,"on",&H00000080)'dip 8
        
        .AddFrame 412,4,190,"High game to date awards",&H00C00000,Array("not displayed and no award",0,"displayed and no award",&H00800000,"displayed and 2 replays",&H00400000,"displayed and 3 replays",&H00C00000)'dip 23&24
        .AddFrame 412,80,190,"Balls per game",&H01000000,Array("5 balls",0,"3 balls",&H01000000)'dip 25
        .AddFrame 412,126,190,"Replay limit",&H04000000,Array("no limit",0,"one per game",&H04000000)'dip 27
        .AddFrame 412,172,190,"Novelty",&H08000000,Array("normal",0,"extra ball and replay scores 500K",&H08000000)'dip 28
        .AddFrame 412,218,190,"Game mode",&H10000000,Array("replay",0,"extra ball",&H10000000)'dip 29
        .AddFrame 412,264,190,"Game option dip 31",&H40000000,Array("off",0,"on",&H40000000)'dip 31
        .AddFrame 412,310,190,"Game option dip 32",&H80000000,Array("off",0,"on",&H80000000)'dip 32
        
        .AddChk 2,360,120,Array("Match feature",&H02000000)'dip 26
        .AddLabel 50,380,300,20,"After hitting OK, press F3 to reset game with new settings."
    End With
	Dim extra
	extra = Controller.Dip(4) + Controller.Dip(5)*256
	extra = vpmDips.ViewDipsExtra(extra)
	Controller.Dip(4) = extra And 255
	Controller.Dip(5) = (extra And 65280)\256 And 255
End Sub
Set vpmShowDips = GetRef("editDips")

 

My3x

Posted

Great, Thanks! But whew I can find Rom? I searched all around and nothing :!

mikepmcs

Posted

Thank you.

Ericg384

Posted

credits and flippers do not work ?

pb11

Posted

Looks great - thank you!

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
  • Create New...