Okay, I have disabled the plug-in. Since I use Mixxx anyway, I enter the values for BPM and tonality into the files there. That works. I’ve locked the two tags in Picard so that they don’t get removed again. That’s fine so far. My problem is: for better compatibility with different players/DJ software, I would like to add the three new fields to the Picard script:
Create them and fill them with the existing values from BPM and INITIALKEY. Or the CAMELOT field from the mapping specification.
I can’t do that. I’m not a scripting expert 
Here is the script:
# Vollständiges Camelot-Mapping für Picard
# INITIALKEY = Tonart (C, C#, D, …)
# _mode = Dur/Moll (maj/min)
# CAMELOT wird korrekt gesetzt
$if($and($ne(%INITIALKEY%,),$ne(%_mode%,)),
# C
$if($and($eq(%INITIALKEY%,C),$eq(%_mode%,maj)),$set(CAMELOT,8B))
$if($and($eq(%INITIALKEY%,C),$eq(%_mode%,min)),$set(CAMELOT,5A))
# C#
$if($and($eq(%INITIALKEY%,C#),$eq(%_mode%,maj)),$set(CAMELOT,3B))
$if($and($eq(%INITIALKEY%,C#),$eq(%_mode%,min)),$set(CAMELOT,12A))
# D
$if($and($eq(%INITIALKEY%,D),$eq(%_mode%,maj)),$set(CAMELOT,10B))
$if($and($eq(%INITIALKEY%,D),$eq(%_mode%,min)),$set(CAMELOT,7A))
# D#
$if($and($eq(%INITIALKEY%,D#),$eq(%_mode%,maj)),$set(CAMELOT,5B))
$if($and($eq(%INITIALKEY%,D#),$eq(%_mode%,min)),$set(CAMELOT,2A))
# E
$if($and($eq(%INITIALKEY%,E),$eq(%_mode%,maj)),$set(CAMELOT,12B))
$if($and($eq(%INITIALKEY%,E),$eq(%_mode%,min)),$set(CAMELOT,9A))
# F
$if($and($eq(%INITIALKEY%,F),$eq(%_mode%,maj)),$set(CAMELOT,7B))
$if($and($eq(%INITIALKEY%,F),$eq(%_mode%,min)),$set(CAMELOT,4A))
# F#
$if($and($eq(%INITIALKEY%,F#),$eq(%_mode%,maj)),$set(CAMELOT,2B))
$if($and($eq(%INITIALKEY%,F#),$eq(%_mode%,min)),$set(CAMELOT,11A))
# G
$if($and($eq(%INITIALKEY%,G),$eq(%_mode%,maj)),$set(CAMELOT,9B))
$if($and($eq(%INITIALKEY%,G),$eq(%_mode%,min)),$set(CAMELOT,6A))
# G#
$if($and($eq(%INITIALKEY%,G#),$eq(%_mode%,maj)),$set(CAMELOT,4B))
$if($and($eq(%INITIALKEY%,G#),$eq(%_mode%,min)),$set(CAMELOT,1A))
# A
$if($and($eq(%INITIALKEY%,A),$eq(%_mode%,maj)),$set(CAMELOT,11B))
$if($and($eq(%INITIALKEY%,A),$eq(%_mode%,min)),$set(CAMELOT,8A))
# A#
$if($and($eq(%INITIALKEY%,A#),$eq(%_mode%,maj)),$set(CAMELOT,6B))
$if($and($eq(%INITIALKEY%,A#),$eq(%_mode%,min)),$set(CAMELOT,3A))
# B
$if($and($eq(%INITIALKEY%,B),$eq(%_mode%,maj)),$set(CAMELOT,1B))
$if($and($eq(%INITIALKEY%,B),$eq(%_mode%,min)),$set(CAMELOT,10A))
)