Skip to content

Commit b4c29d2

Browse files
meta: regenerate hashes and vbs diffs
1 parent f5eec5c commit b4c29d2

2 files changed

Lines changed: 19 additions & 57 deletions

File tree

Lines changed: 9 additions & 57 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,6 @@
11
--- TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1.vbs.original
22
+++ TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1.vbs
3-
@@ -809,6 +809,39 @@
4-
' DROP TARGETS INITIALIZATION
5-
'******************************************************
6-
3+
@@ -811,0 +812,33 @@
74
+Class DropTarget
85
+ Private m_primary, m_secondary, m_prim, m_sw, m_animate, m_isDropped
96
+
@@ -37,13 +34,7 @@
3734
+ End Function
3835
+End Class
3936
+
40-
'Define a variable for each drop target
41-
Dim DT40, DT41, DT42, DT50, DT51, DT60, DT61, DT70, DT71
42-
43-
@@ -828,15 +861,15 @@
44-
'
45-
' Values for annimate: 1 - bend target (hit to primary), 2 - drop target (hit to secondary), 3 - brick target (high velocity hit to secondary), -1 - raise target
46-
37+
@@ -831,9 +864,9 @@
4738
-DT40 = Array(sw40, sw40y, sw40p, 40, 0)
4839
-DT41 = Array(sw41, sw41y, sw41p, 41, 0)
4940
-DT42 = Array(sw42, sw42y, sw42p, 42, 0)
@@ -62,65 +53,29 @@
6253
+Set DT61 = (new DropTarget)(sw61, sw61y, sw61p, 61, 0, false)
6354
+Set DT70 = (new DropTarget)(sw70, sw70y, sw70p, 70, 0, false)
6455
+Set DT71 = (new DropTarget)(sw71, sw71y, sw71p, 71, 0, false)
65-
66-
67-
'Add all the Drop Target Arrays to Drop Target Animation Array
68-
@@ -866,9 +899,9 @@
69-
i = DTArrayID(switch)
70-
71-
PlayTargetSound
56+
@@ -869,3 +902,3 @@
7257
- DTArray(i)(4) = DTCheckBrick(Activeball,DTArray(i)(2))
7358
- If DTArray(i)(4) = 1 or DTArray(i)(4) = 3 or DTArray(i)(4) = 4 Then
7459
- DTBallPhysics Activeball, DTArray(i)(2).rotz, DTMass
7560
+ DTArray(i).animate = DTCheckBrick(Activeball,DTArray(i).prim)
7661
+ If DTArray(i).animate = 1 or DTArray(i).animate = 3 or DTArray(i).animate = 4 Then
7762
+ DTBallPhysics Activeball, DTArray(i).prim.rotz, DTMass
78-
End If
79-
DoDTAnim
80-
End Sub
81-
@@ -877,7 +910,7 @@
82-
Dim i
83-
i = DTArrayID(switch)
84-
63+
@@ -880 +913 @@
8564
- DTArray(i)(4) = -1
8665
+ DTArray(i).animate = -1
87-
DoDTAnim
88-
End Sub
89-
90-
@@ -885,14 +918,14 @@
91-
Dim i
92-
i = DTArrayID(switch)
93-
66+
@@ -888 +921 @@
9467
- DTArray(i)(4) = 1
9568
+ DTArray(i).animate = 1
96-
DoDTAnim
97-
End Sub
98-
99-
Function DTArrayID(switch)
100-
Dim i
101-
For i = 0 to uBound(DTArray)
69+
@@ -895 +928 @@
10270
- If DTArray(i)(3) = switch Then DTArrayID = i:Exit Function
10371
+ If DTArray(i).sw = switch Then DTArrayID = i:Exit Function
104-
Next
105-
End Function
106-
107-
@@ -945,7 +978,7 @@
108-
Sub DoDTAnim()
109-
Dim i
110-
For i=0 to Ubound(DTArray)
72+
@@ -948 +981 @@
11173
- DTArray(i)(4) = DTAnimate(DTArray(i)(0),DTArray(i)(1),DTArray(i)(2),DTArray(i)(3),DTArray(i)(4))
11274
+ DTArray(i).animate = DTAnimate(DTArray(i).primary,DTArray(i).secondary,DTArray(i).prim,DTArray(i).sw,DTArray(i).animate)
113-
Next
114-
End Sub
115-
116-
@@ -3546,16 +3579,16 @@
117-
'RampRoll.Interval = RampRoll.Interval 'reset timer
118-
exit Sub
119-
End If
75+
@@ -3549 +3582 @@
12076
- if x = uBound(RampBalls) then 'debug
12177
+ 'if x = uBound(RampBalls) then 'debug
122-
'Debug.print "WireRampOn error, ball queue is full: " & vbnewline & _
123-
'RampBalls(0, 0) & vbnewline & _
78+
@@ -3552,7 +3585,7 @@
12479
- Typename(RampBalls(1, 0)) & " ID:" & RampBalls(1, 1) & "type:" & RampType(1) & vbnewline & _
12580
- Typename(RampBalls(2, 0)) & " ID:" & RampBalls(2, 1) & "type:" & RampType(2) & vbnewline & _
12681
- Typename(RampBalls(3, 0)) & " ID:" & RampBalls(3, 1) & "type:" & RampType(3) & vbnewline & _
@@ -135,6 +90,3 @@
13590
+ 'Typename(RampBalls(5, 0)) & " ID:" & RampBalls(5, 1) & "type:" & RampType(5) & vbnewline & _
13691
+ '" "
13792
+ 'End If
138-
next
139-
End Sub
140-

hashes.json

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1979,6 +1979,16 @@
19791979
"url": "https://raw.githubusercontent.com/jsm174/vpx-standalone-scripts/refs/heads/master/Swords of Fury (Williams 1988)/Swords of Fury (Williams 1988).vbs"
19801980
}
19811981
},
1982+
{
1983+
"file": "TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1.vbs.original",
1984+
"sha256": "37154087cb216dbfb45ab154aa1b9735df90d1cbf35fa87cac6075bd46f448eb",
1985+
"url": "https://raw.githubusercontent.com/jsm174/vpx-standalone-scripts/refs/heads/master/TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1/TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1.vbs.original",
1986+
"patched": {
1987+
"file": "TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1.vbs",
1988+
"sha256": "5970a1bdbf1189f4aa4941fb28d335d44fa3616484b4214de1f89f5f1728166a",
1989+
"url": "https://raw.githubusercontent.com/jsm174/vpx-standalone-scripts/refs/heads/master/TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1/TX-Sector (Gottlieb 1988) SG1bsoN Mod V1.1.vbs"
1990+
}
1991+
},
19821992
{
19831993
"file": "Tales from the Crypt (Data East 1993) VPW v1.22.vbs.original",
19841994
"sha256": "3b922d69bc9e6c7c3cd5dead7a35b538b526b97c99f62f95bbb6fda2bc2107c2",

0 commit comments

Comments
 (0)