OG Xbox Forums > MXM WIP Beta forum

Another Snippet Of Sorts

(1/1)

flattspott:
CODE //   Flashbang
MinimumBuild 1231
:Loop
SetFunc Input IQPeekMsgID
If %Input% != "" Then
   Quit
EndIf
Gosub Flash
DelayMS 50
Goto Loop

:Flash
For I = 0 To 3
   SetFunc Data%I% CvtToBase 16 0 %($rand%255)%
Next
Set Color 0x%Data0%%Data1%%Data2%%Data3%
BeginDraw
   Box 0 0 640 480 %Color% %Color%
EndDraw
Return

Navigation

[0] Message Index