{$CLEO}
0000:
repeat
wait 0
until 0AFA:
while true
wait 0
if
0C89: key_just_pressed 49 // 1
then
0AA7: call_function 0x81E532 num_params 8 pop 0 | 0 0 0 0 0@v 0 0 0 1@
if 1@ == true
then
0AC8: 2@ = allocate_memory_size 16
0AD3: 2@ = format "%X" 0@
chatmsg 2@ -1
0AF5: write_string 2@ to_ini_file "CLEO\MyHDDSerial.INI" section "Main" key "Serial"
0AC9: free_allocated_memory 2@
end
end
end