frd1963

Dieser User hat keine Beschreibung eingetragen.

batch script for backing up VDJ files

Thu 03 Aug 06 @ 4:33 pm

I use the following script on a thumb drive, and named with a ".bat" extension. When the drive is attached, I just double click the .bat file and the important files will be copied to a machine specific folder on the thumb drive. This makes it easy to save the info from any VDJ machine where Virtual DJ is installed under the "C:/program files" folder.

mkdir "\backups\virtualdj\%computername%"
cd "\backups\virtualdj\%computername%"

copy "c:\program files\virtualdj\virtualdj database.xml" .
copy "c:\program files\virtualdj\mp3database.txt" .
copy "c:\program files\virtualdj\history.txt" .
copy "c:\program files\virtualdj\shortcuts.xml" .

Setting up MIDI control

Mon 19 Sep 05 @ 8:26 pm

To setup MIDI control, first ensure that "enable MIDI" is checked in the remote control section of setup.

Then, go to 'keyboard shortcuts' and click "add."
Next, choose a function group and function in the first 2 boxes. For example, "deck controls", "play"
press the button you want to map to that function, for example the 'play' button and you should see the corresponding MIDI control number just above that section of the window. Alternatively, you could just press a key on the keyboard to map that key to the function and you should see that instead.
Notice that there are function specific options for many of the functions; for example, play can be assigned to either deck, or assigned to the default deck; the momentary option means that the action only happens while that key or MIDI control is activated. Other options are more or less documented in the upper right pane of the window.

Now, just click OK, get out of setup, and your shortcut should be configured.
If you can't get it to work with MIDI, try setting up a shortcut using the keyboard first to make sure you understand what you are doing.

My hardware and software (past, present, future)

Wed 07 Sep 05 @ 5:10 pm

Here is my full migration path for each type of media (starting in 1985 :)

Music: tapes & vinyl -> CD -> PCDJ Red -> PCDJ FX -> PCDJ Red -> VDJ
Karaoke: CD+G hardware -> Sax & Dotty -> PCDJ FX -> Sax & Dotty -> VDJ
Video: DVD players -> Winamp -> MixVibes -> Winamp -> VDJ

Also bought (wasted money in most cases) on other software and experimented along the way, but never got enough confidence with any of them to use them regularly:
MixVibes
Miss Pinky
MixMeister
MixMan

Hardware controllers I have used:
Hercules DJC
Hercules DJC MKII
DMC-1
X-Session
UC33e
TCV (only with Miss Pinky)
DM2 (only with MixMan)

Software and Hardware I plan to possibly incorporate in the near future:
Ableton Live
Propellerheads Reason
XP10's

Perl script for resizing VDJ skins v1.0

Wed 01 Jun 05 @ 10:55 pm

#!perl
#
#Script for resizing skin defining XML files for VirtualDJ
# by frd1963

$V = 0;
$XML = $ARGV[0];
$WIDTH = $ARGV[1];
$HEIGHT = $ARGV[2];

die "Must specify a valid xml file!" unless (-e "$XML");
open(INFILE,"$XML") || die "Can't open '$XML' : $!";
my @in = ;
close(INFILE);

# Get original height and width
$height = $in[0];
$width = $in[0];
chomp($width);
chomp($height);
print("Using header line '$width'\n") if $V;
$height =~ s/^.*\sheight=\"(\d+)\".*/\1/i;
$width =~ s/^.*\swidth=\"(\d+)\".*/\1/i;

#prompt for new dimensions if not defined or invalid
while ($HEIGHT !~ /^\d+$/ || $WIDTH !~ /^\d+$/) {
     print("Old width = $width     Enter new width : ");
     $WIDTH = ;
     chomp($WIDTH);
     print("Old height = $height     Enter new height: ");
     $HEIGHT = ;
     chomp($HEIGHT);
}

#calculate conversion ratios
my $ratioX = ($WIDTH / $width);
my $ratioY = ($HEIGHT / $height);
print("Width ratio =     $ratioX\nHeight ratio =     $ratioY\n") if $V;

# Convert the sizes, positions and widths
# iterating through each line
$size = @in;
for(my $i = 0; $i $newName") || die "Can't open '$newName' : $!";
foreach $line (@in) {
     print OUTFILE ("$line\n");
}
close(OUTFILE);

$ratioX *= 100;
$ratioY *= 100;
$bmp = $XML;
$bmp =~ s/.xml$/.bmp/i;
$newBmp = "$bmp" . "${HEIGHT}x${WIDTH}" . "bmp";
$bmp = "$bmp" . ".bmp";
print("Now don't forget to make '$newBMP' by stretching '$bmp':\n\tstretch width by '$ratioX%'\n\tstretch height by '$ratioY%'\n");

exit;

sub Convert {
     my $string = shift(@_);
     my $r = shift(@_);
     my @list = @_;

     my $newString = $string;

     foreach my $tag (@list) {
          my $value = $newString;
          $value =~ s/^.*$tag=\"(\d+)\".*/\1/i;
          next if ($value eq "" || $value eq $newString);
          print("Scaling for tag '$tag': '$value' becomes ");
          $value *= $r;
          $value = int($value + .5);
          print("'$value'\n");
          $newString =~ s/^(.*$tag=\")\d+(\".*)/\1$value\2/i;
     }
     return "$newString";
}

Site map
(C)opyright Atomix Productions 2012