Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
rubberduckycooly
GitHub Repository: rubberduckycooly/Sonic-CD-2011-Script-Decompilation
 Path: blob/main/Scripts/R5/R5DEffect.txt
1319 views
1
//-----------------Sonic CD BG Effect Script------------------//

2
//--------Scripted by Christian Whitehead 'The Taxman'--------//

3
//-------Unpacked By Rubberduckycooly's Script Unpacker-------//

4


5
// Aliases

6
#alias Object.Value0	:	Object.Timer

7


8
// Priority

9
#alias 1	:	PRIORITY_ACTIVE

10


11


12
sub ObjectMain

13


14
	Object.Timer++

15


16
	if Object.Timer > 3

17
		Object.Timer = 0

18
		Object.Frame++

19


20
		Object.Frame &= 3

21


22
		switch Object.Frame

23
		case 0

24
			Copy16x16Tile(792, 940)

25
			Copy16x16Tile(793, 944)

26
			Copy16x16Tile(794, 948)

27
			Copy16x16Tile(845, 952)

28
			Copy16x16Tile(846, 956)

29
			Copy16x16Tile(852, 960)

30
			Copy16x16Tile(853, 964)

31
			Copy16x16Tile(862, 968)

32
			Copy16x16Tile(863, 972)

33
			Copy16x16Tile(868, 976)

34
			Copy16x16Tile(869, 980)

35
			Copy16x16Tile(894, 984)

36
			Copy16x16Tile(895, 988)

37
			Copy16x16Tile(912, 992)

38
			Copy16x16Tile(913, 996)

39
			Copy16x16Tile(923, 1000)

40
			break

41


42
		case 1

43
			Copy16x16Tile(792, 941)

44
			Copy16x16Tile(793, 945)

45
			Copy16x16Tile(794, 949)

46
			Copy16x16Tile(845, 953)

47
			Copy16x16Tile(846, 957)

48
			Copy16x16Tile(852, 961)

49
			Copy16x16Tile(853, 965)

50
			Copy16x16Tile(862, 969)

51
			Copy16x16Tile(863, 973)

52
			Copy16x16Tile(868, 977)

53
			Copy16x16Tile(869, 981)

54
			Copy16x16Tile(894, 985)

55
			Copy16x16Tile(895, 989)

56
			Copy16x16Tile(912, 993)

57
			Copy16x16Tile(913, 997)

58
			Copy16x16Tile(923, 1001)

59
			break

60


61
		case 2

62
			Copy16x16Tile(792, 942)

63
			Copy16x16Tile(793, 946)

64
			Copy16x16Tile(794, 950)

65
			Copy16x16Tile(845, 954)

66
			Copy16x16Tile(846, 958)

67
			Copy16x16Tile(852, 962)

68
			Copy16x16Tile(853, 966)

69
			Copy16x16Tile(862, 970)

70
			Copy16x16Tile(863, 974)

71
			Copy16x16Tile(868, 978)

72
			Copy16x16Tile(869, 982)

73
			Copy16x16Tile(894, 986)

74
			Copy16x16Tile(895, 990)

75
			Copy16x16Tile(912, 994)

76
			Copy16x16Tile(913, 998)

77
			Copy16x16Tile(923, 1002)

78
			break

79


80
		case 3

81
			Copy16x16Tile(792, 943)

82
			Copy16x16Tile(793, 947)

83
			Copy16x16Tile(794, 951)

84
			Copy16x16Tile(845, 955)

85
			Copy16x16Tile(846, 959)

86
			Copy16x16Tile(852, 963)

87
			Copy16x16Tile(853, 967)

88
			Copy16x16Tile(862, 971)

89
			Copy16x16Tile(863, 975)

90
			Copy16x16Tile(868, 979)

91
			Copy16x16Tile(869, 983)

92
			Copy16x16Tile(894, 987)

93
			Copy16x16Tile(895, 991)

94
			Copy16x16Tile(912, 995)

95
			Copy16x16Tile(913, 999)

96
			Copy16x16Tile(923, 1003)

97
			break

98


99
		end switch

100
	end if

101


102
end sub

103


104


105
sub ObjectStartup

106


107
	// Place a BG Effect object into the level and make it always active

108
	Object[21].Type = TypeName[BGEffect]

109
	Object[21].Priority = PRIORITY_ACTIVE

110


111
end sub

112


113


114
// ========================

115
// Editor Subs

116
// ========================

117


118
sub RSDKDraw

119
	DrawSprite(0)

120
end sub

121


122


123
sub RSDKLoad

124
	LoadSpriteSheet("Global/Display.gif")

125
	SpriteFrame(-16, -16, 32, 32, 1, 143) // "Script" Icon

126


127
	SetVariableAlias(ALIAS_VAR_PROPVAL, "unused")

128
end sub

129


130