Advertisement
BaSs_HaXoR

[F#] PS3 CCAPI Connect + Attach + SetMemory

Feb 5th, 2022 (edited)
2,553
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
F# 1.76 KB | None | 0 0
  1. #light
  2. open PS3Lib;
  3. open System;
  4. [<EntryPoint>]
  5. let main argv =
  6.     printfn "Please input Ps3 IP: "
  7.     let getStr = Console.ReadLine()
  8.     let setNameAddr : uint32 =  //unit 32 left blank for custom offsets (users choice) added 'u' to make it a Uint32 - Unsigned 32 bit int
  9.     let ignore _ = () //This will take any type and return nothing (void) - same as: |> ignore
  10.  
  11.     let PS3 = PS3Lib.PS3API(SelectAPI.ControlConsole) //Declares PS3 as new instance of the derived PS3.PS3API class
  12.     PS3.CCAPI.ConnectTarget(getStr) |> ignore //|> ignore ignores
  13.     Console.WriteLine "Connection Success!"
  14.     PS3.CCAPI.AttachProcess() |> ignore //or use the let ignore _ = () to make it return equal to nothing.
  15.     Console.WriteLine "Attaching Success!"
  16.     printfn "Please input Name to change to: "
  17.  
  18.     let x = getStr //sets (string) value of x, to user input from Console.ReadLine()
  19.     PS3.Extension.WriteString(setNameAddr, x)  //Writes the string to game
  20.     printfn "Now it will setMemory via a byte array, press any key to continue..." //
  21.     PS3.SetMemory(setNameAddr, [|94uy; 50uy; 66uy; 97uy; 83uy; 115uy; 95uy; 72uy; 97uy; 88uy; 111uy; 82uy|]) //SetMemory (with byte array) -
  22.     PS3.CCAPI.RingBuzzer(PS3Lib.CCAPI.BuzzerMode.Double) // this gives me errors if put before end of code, i don't know why. Look into making it work for unit/int.
  23.     Console.WriteLine "Done. Everything was successfull!"
  24.  
  25. // https://prnt.sc/26p3ohv {:l)
  26. // No credit given @NGU post: https://www.nextgenupdate.com/forums/ps3-mods-cheats/845394-f-rtm-source-code-customizable.html
  27. // This source code was developed by me: (94 50 66 97 83 115 95 72 97 88 111 82 (-uy) in decimal = ^2BaSs_HaXoR ;p
  28. // even though it wasn't much, I like credit where it's do and had fun with this project :D
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement