| CARVIEW |
Select Language
HTTP/2 200
date: Sat, 11 Oct 2025 19:40:19 GMT
content-type: text/html; charset=UTF-8
server: cloudflare
x-frame-options: DENY
x-content-type-options: nosniff
x-xss-protection: 1;mode=block
vary: accept-encoding
cf-cache-status: DYNAMIC
content-encoding: gzip
set-cookie: _csrf-frontend=9b053bd6d8cccfc9b56c5dfddd3f53f4387f5e01b9e0048b3ffdc8139511a71fa%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22Pn-kVDyIAuzqRpiBWxGaANJYmML5dqMm%22%3B%7D; HttpOnly; Path=/
cf-ray: 98d0d41c0adb5917-BLR
FFMPEG & Recording with Simba - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program new;
- type
- TGameRecorder = record
- Timer: TMMLTimer;
- Path: String;
- FPS, Duration: Int32;
- Frames: array of TMufasaBitmap;
- CanFree: Boolean;
- end;
- var
- GameRecorder: TGameRecorder;
- procedure TGameRecorder.Capture(Junk, Sender: Pointer); static;
- var
- i,W,H, FrameCount: Int32;
- Proc: TProcess;
- begin
- GameRecorder.CanFree := False;
- FrameCount := Length(GameRecorder.Frames);
- if FrameCount * (1000 div GameRecorder.FPS) >= GameRecorder.Duration then
- begin
- for i:=0 to FrameCount-1 do
- begin
- GameRecorder.Frames[i].SaveToFile(Format('%s/tmp/img%d.jpg', [GameRecorder.Path, i+1]));
- GameRecorder.Frames[i].Free();
- end;
- SetLength(GameRecorder.Frames, 0);
- client.WriteLn('Generating video...');
- Proc.Init(nil);
- Proc.SetExecutable('ffmpeg -vtag xvid -framerate ' + ToStr(GameRecorder.FPS) + ' -i "'+GameRecorder.Path+'/tmp/img%01d.jpg" "'+GameRecorder.Path+'/'+FormatDateTime('dd.mm.yy hh.nn.ss',Now())+'.avi"');
- Proc.SetOptions(Proc.GetOptions + [poWaitOnExit]);
- Proc.Execute();
- Proc.Free();
- end else
- begin
- SetLength(GameRecorder.Frames, FrameCount+1);
- Client.GetIOManager.GetDimensions(W,H);
- GameRecorder.Frames[FrameCount].Init(client.GetMBitmaps);
- if W mod 2 = 1 then Dec(W);
- if H mod 2 = 1 then Dec(H);
- GameRecorder.Frames[FrameCount].CopyClientToBitmap(client.GetIOManager, True, 0,0, W-1, H-1);
- end;
- GameRecorder.CanFree := True;
- end;
- procedure TGameRecorder.Init(ClipPath: String; ClipFPS, ClipDuration: Int32);
- begin
- Self.Path := ClipPath;
- Self.FPS := ClipFPS;
- Self.Duration := ClipDuration;
- CreateDirectory(Self.Path+'/');
- CreateDirectory(Self.Path+'/tmp/');
- Self.Timer.Init();
- Self.Timer.SetInterval(1000 div Self.FPS);
- Self.Timer.SetOnTimer(natify(@TGameRecorder.Capture));
- end;
- procedure TGameRecorder.Start();
- begin
- Self.Timer.SetEnabled(True);
- end;
- procedure TGameRecorder.Stop();
- begin
- Self.Timer.SetEnabled(False);
- end;
- procedure TGameRecorder.Free();
- var i: Int32;
- begin
- Self.Timer.SetEnabled(False);
- while not Self.CanFree do Wait(5);
- Self.Timer.Free();
- for i:=0 to High(self.Frames) do Self.Frames[i].Free();
- SetLength(Self.Frames, 0);
- end;
- begin
- GameRecorder.Init('C:/Simba/Videos', 10, 15*1000);
- GameRecorder.Start();
- Wait(17*1000);
- GameRecorder.Stop();
- GameRecorder.Free();
- end.
Add Comment
Please, Sign In to add comment
-
📌 Swapzone +37% glitch
JavaScript | 2 sec ago | 0.24 KB
-
⭐⭐⭐Exchange Exploit⭐⭐
Java | 3 sec ago | 0.10 KB
-
⭐✅ Swapzone Glitch ✅ Working ⭐⭐ E
JavaScript | 3 sec ago | 0.25 KB
-
✅ Make $2500 in 20 minutes⭐⭐⭐ 4
JavaScript | 8 sec ago | 0.25 KB
-
📝 Exchange profit method
JavaScript | 11 sec ago | 0.24 KB
-
✅ Make $2500 in 20 minutes⭐⭐⭐ X
JavaScript | 12 sec ago | 0.25 KB
-
📌 Swapzone +37% glitch ⭐ V
JavaScript | 17 sec ago | 0.25 KB
-
⭐⭐⭐Make $15OO in 2O minutesV G⭐⭐
Java | 18 sec ago | 0.10 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
