Apple-2-SW/lawless-legends
1
0
Fork 0
mirror of https://github.com/badvision/lawless-legends.git synced 2024-06-27 07:29:32 +00:00
Code Issues Projects Releases Wiki Activity

Better recording.

Browse Source
This commit is contained in:
Martin Haye 2019-05-02 09:24:19 -07:00
parent 79e3867a21
commit 929d884e41
2 changed files with 3 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Platform/Apple/virtual/src/plasma/gameloop.pla
View File

@ -1570,7 +1570,7 @@ export def recordKey()#1
byte key
key = ^kbd & $7F
^kbdStrobe
if recordMode and key <> 13 // don't record [Return] since it gets inserted for readability
if recordMode
if key == '^'
while ^kbd < 128; loop
key = (^kbd & $7F) - $40

15
Platform/Apple/virtual/xformScript.rb
View File

@ -1,18 +1,7 @@
#!/usr/bin/env ruby
length = 0
File.readlines(ARGV[0]).each do |line|
line.scan(/KEY:(.*?) SEED:/).each { |match|
print $1
length += 1
if length > 80
print "\n"
length = 0
end
}
line.scan(/STRING:(.*)/).each { |match|
puts $1
length = 0
}
line.scan(/KEY:(.*?) SEED:/).each { |match| print $1 }
line.scan(/STRING:(.*)/).each { |match| puts $1 }
end
print "\n"