DOS/WIN两栖的CD Player - 中国DOS联盟论坛 - 中国DOS联盟之联合DOS论坛

好久没有来了, 想不到还有不少人关注
分享一下源码....


/***************************************************************************
  name: atapiEject
  action: loads or ejects CD-ROM
  returns:whatever atapiCmd() returns
****************************************************************************/
static int atapiEject(driveinfo *Drive, bool Load)
{
  u8 Pkt={ATAPI_CMD_START_STOP, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
  drivecmd Cmd;

    printf("atapiEject:");
    memset(&Cmd, 0, sizeof(Cmd));

    Pkt= (Load ? 3 : 2);

    return(atapiCmd(Drive, &Cmd, Pkt));
}

/***************************************************************************
    name: atapiGetEventStatus
   action: Get Disc is present && Tray opend or Closed
  returns: whatever atapiCmd() returns
****************************************************************************/
static int atapiGetEventStatus(driveinfo *Drive, u8 *Buffer, unsigned Count)
{
  u8 Pkt={ATAPI_CMD_GET_EVENT, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
  drivecmd Cmd;

  printf("atapiGetEventStatus:");
  memset(&Cmd, 0, sizeof(Cmd));

  Cmd.Count=Count;
  Cmd.Data=Buffer;

  Pkt=1;
  Pkt=0x10;
  Pkt=Count;

  return(atapiCmd(Drive, &Cmd, Pkt));

}

/***************************************************************************
  name: atapiChkTrayIsOpen
 action: check cd-rom tray opened or closed
returns: 1 is opend , 0 is closed  and -1 is Error
****************************************************************************/
static int atapiChkTrayIsOpen(driveinfo *Drive)
{
  u8 Buffer;
  int Temp;

    Temp=atapiGetEventStatus(Drive, Buffer, 6);

    if (Temp != 0)
    {
      return(-1);
    }

    return(Buffer&0x01);     // Bit 0 is Tray Status, See SFF-8090 v6R7 P362
}

/***************************************************************************
  name: atapiTOCEnt
  action: reads one or more table-of-contents entries from audio CD
  returns:whatever atapiCmd() returns
****************************************************************************/
static int atapiTOCEnt(driveinfo *Drive, u8 *Buffer, unsigned Count)
{
  u8 Pkt={ATAPI_CMD_READTOC, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
  drivecmd Cmd;

  printf("atapiTOCEnt:");
  memset(&Cmd, 0, sizeof(Cmd));

  Cmd.Count=Count;
  Cmd.Data=Buffer;

  Pkt=2;
  Pkt=Count >> 8;
  Pkt=Count;

  return(atapiCmd(Drive, &Cmd, Pkt));
}

/***************************************************************************
  name: atapiTOC
  action: reads table of contents of audio CD and prints starting
    time of each track
  returns:whatever atapiCmd() returns
****************************************************************************/
static int atapiTOC(driveinfo *Drive)
{
  u8 *Entry, Buffer;
  int TOCEnt, Temp;

    printf("atapiTOC:\n");

    // 16-bit TOC length, 8-bit first track,  8-bit last track
    TOCEnt = 4;
    
    #ifdef DEBUG
    printf("  calling atapiTOCEnt with Count=%u\n", TOCEnt);
    #endif

    // Read TOC
    Temp=atapiTOCEnt(Drive, Buffer, TOCEnt);
    if(Temp != 0)
    {
      return(Temp);
    }

    // NumTracks = LastTrack - FristTrack + 1
    NumTracks=Buffer - Buffer + 1;

    // Check NumTracks(must in range 1~99)
    if(NumTracks <= 0 || NumTracks > 99)
    {
      printf("  error: bad number of tracks %d\n", NumTracks);
      return(-1);
    }

    // Check MAX_TRACKS handle
    if(NumTracks > MAX_TRACKS)
    {
      printf("  warning: too many tracks(%u); reducing to %u.\n",NumTracks, MAX_TRACKS);
      NumTracks=MAX_TRACKS;
    }

    // read 4-byte header and 8-byte table-of-contents entries
    TOCEnt = 4 + 8 * (NumTracks+1);
    
    #ifdef DEBUG
    printf("  calling atapiTOCEnt with Count=%u\n", TOCEnt);
    #endif
    
    // Read TOC
    Temp=atapiTOCEnt(Drive, Buffer, TOCEnt);
    if(Temp != 0)
    {
      return(Temp);
    }

    // point to first TOC entry
    Entry=Buffer + 4;

    // read NumTracks+1 entries the last entry is for the disk lead-out
    for(Temp=0; Temp < NumTracks + 1; Temp++)
    {
      Track.Min=Entry;
      Track.Sec=Entry;
      Track.Frame=Entry;

      printf("%02u:%02u:%02u  ", Track.Min, Track.Sec, Track.Frame);

      // advance to next entry
      Entry += 8;
    }

    printf("\n");

  return(0);
}

/***************************************************************************
  name: atapiPlay
  action: plays audio from time index Start to End (units of 1/75 sec)
  returns:whatever atapiCmd() returns
****************************************************************************/
static int atapiPlay(driveinfo *Drive, atapimsf *Start, atapimsf *End)
{
  u8 Pkt={ATAPI_CMD_PLAY, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
  drivecmd Cmd;

    printf("atapiPlay:");
    memset(&Cmd, 0, sizeof(Cmd));

    Pkt=Start->Min;
    Pkt=Start->Sec;
    Pkt=Start->Frame;

    Pkt=End->Min;
    Pkt=End->Sec;
    Pkt=End->Frame;

    return(atapiCmd(Drive, &Cmd, Pkt));
}

/***************************************************************************
  name: atapiPause
  action: pauses or continues audio CD
  returns:whatever atapiCmd() returns
****************************************************************************/
static int atapiPause(driveinfo *Drive, bool Continue)
{
  u8 Pkt={ATAPI_CMD_PAUSE,0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
  drivecmd Cmd;

    printf("atapiPause:");
    memset(&Cmd, 0, sizeof(Cmd));

    Pkt=Continue ? 1 : 0;

    return(atapiCmd(Drive, &Cmd, Pkt));
}

/***************************************************************************
   name: atapiStop
   action: stop audio play or scan
   return: whatever atapiCmd() returns
****************************************************************************/
static int atapiStop(driveinfo *Drive)
{
  u8 Pkt={ATAPI_CMD_STOP,0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
  drivecmd Cmd;

    printf("atapiStop:");
    memset(&Cmd, 0, sizeof(Cmd));

    return(atapiCmd(Drive, &Cmd, Pkt));
}

第1楼　happybasic	发表于 2007-04-07 06:25
中级用户　发帖 118　积分 298
DOS/WIN两栖的CD Player 可以在DOS下播入CD, 不需要MSCDEX的支持， ps: 在WINDOWS下也可以哦~

第2楼　Wengier	发表于 2007-04-07 19:17
系统支持　发帖 10,521　积分 27,736
看日期是2007/04/06，是原创的吗？

第3楼　happybasic	发表于 2007-04-07 21:07
中级用户　发帖 118　积分 298
当然了，俺一般要发就发原创。虽然比较差。。。

第4楼　Wengier	发表于 2007-04-07 22:32
系统支持　发帖 10,521　积分 27,736
楼上谦虚了，写得比较不错，支持原创！建议加入按上下光标键调节音量的功能，并且可以按PageUp和PageDown键切换到上一首/下一首歌曲（PageUp/PageDown键切换歌曲比起F4/F5键似乎要更自然些）。发现有一处笔误，“暂停”的英文应为PAUSE，而不是PASUE。另外建议除按F6键外也可以按空格键来暂停。

第5楼　happybasic	发表于 2007-04-08 00:37
中级用户　发帖 118　积分 298
哎呀，这个笔误真是。。。已经改正了, 另你的建议也加了: 1.除按F6键外也可以按空格键来暂停。 2.除F4/F5键外也可以按PageUp和PageDown键切换到上一首/下一首歌曲。至于按上下光标键调节音量的功能, 很多光驱模拟播放时，是不支持控制音量的啊，只能用前面板的电位器调... 附件 CDPLAY.rar (20.29 KiB)

第6楼　Wengier	发表于 2007-04-13 02:39
系统支持　发帖 10,521　积分 27,736
不知道楼主有没有兴趣给DOS下的MPlayer播放器写一个简单的文本方式的GUI界面？MPlayer可以在DOS下（包括纯DOS和CMD下）播放各种多媒体格式，包括AVI、MOV、MKV、MPG、RMVB、WMV，以及CD/VCD/DVD等，可惜就是只有命令行方式，没有一个像QV那样能选择文件的界面，所以使用起来有些不太方便。如果您愿意的话不妨给它写一个简单的文本方式的GUI界面试试看。更详细信息可见下面的帖子： http://www.cn-dos.net/forum/viewthread.php?tid=16206&fpage=1 http://www.cn-dos.net/forum/viewthread.php?tid=28707&fpage=1

第7楼　happybasic	发表于 2007-04-13 06:50
中级用户　发帖 118　积分 298
我试试看。。。

第8楼　GOTOmsdos	发表于 2007-04-13 08:09
铂金会员　发帖 1,827　积分 5,154
DOS/WIN两栖的CD Player 这个程序只是DOS程序,在WIN, 要在WIN的DOS虚拟器的环境中才能运行. 所以,它不是DOS/WIN两栖的不需要WIN的DOS虚拟器,就能运行的才是. 比如, win98的 REGEDIT

第9楼　defrag	发表于 2007-05-04 20:51
中级用户　发帖 570　积分 456
用WDOS/X 用WDOS/X

第10楼　happybasic	发表于 2007-06-18 19:10
中级用户　发帖 118　积分 298
WDOS/X是什么啊？？没用过....

第11楼　byxyk	发表于 2007-06-19 00:35
初级用户　发帖 54　积分 112
win32+stub ?

第12楼　xing7749	发表于 2007-06-19 16:43
高级用户　发帖 349　积分 833
看起来不错

第13楼　AlexZhang	发表于 2007-06-27 18:25
系统支持　发帖 440　积分 1,028
Excellent Excellent!Successfully loaded and run under WindowsXP[sp2 build2600] environment withOUT any extra tools

第14楼　happybasic	发表于 2008-12-03 20:21
中级用户　发帖 118　积分 298
最新版请到这里下载 http://yxbasic.51.net/zhxs-dostool.htm

第15楼　happybasic	发表于 2009-03-13 11:02
中级用户　发帖 118　积分 298
好久没有来了, 想不到还有不少人关注分享一下源码.... /************************************************************************* name: atapiEject action: loads or ejects CD-ROM returns:whatever atapiCmd() returns *************************************************************************/ static int atapiEject(driveinfo Drive, bool Load) { u8 Pkt={ATAPI_CMD_START_STOP, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; drivecmd Cmd; printf("atapiEject:"); memset(&Cmd, 0, sizeof(Cmd)); Pkt= (Load ? 3 : 2); return(atapiCmd(Drive, &Cmd, Pkt)); } /************************************************************************* name: atapiGetEventStatus action: Get Disc is present && Tray opend or Closed returns: whatever atapiCmd() returns *************************************************************************/ static int atapiGetEventStatus(driveinfo Drive, u8 Buffer, unsigned Count) { u8 Pkt={ATAPI_CMD_GET_EVENT, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; drivecmd Cmd; printf("atapiGetEventStatus:"); memset(&Cmd, 0, sizeof(Cmd)); Cmd.Count=Count; Cmd.Data=Buffer; Pkt=1; Pkt=0x10; Pkt=Count; return(atapiCmd(Drive, &Cmd, Pkt)); } /************************************************************************ name: atapiChkTrayIsOpen action: check cd-rom tray opened or closed returns: 1 is opend , 0 is closed and -1 is Error *************************************************************************/ static int atapiChkTrayIsOpen(driveinfo Drive) { u8 Buffer; int Temp; Temp=atapiGetEventStatus(Drive, Buffer, 6); if (Temp != 0) { return(-1); } return(Buffer&0x01); // Bit 0 is Tray Status, See SFF-8090 v6R7 P362 } /************************************************************************* name: atapiTOCEnt action: reads one or more table-of-contents entries from audio CD returns:whatever atapiCmd() returns *************************************************************************/ static int atapiTOCEnt(driveinfo Drive, u8 Buffer, unsigned Count) { u8 Pkt={ATAPI_CMD_READTOC, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; drivecmd Cmd; printf("atapiTOCEnt:"); memset(&Cmd, 0, sizeof(Cmd)); Cmd.Count=Count; Cmd.Data=Buffer; Pkt=2; Pkt=Count >> 8; Pkt=Count; return(atapiCmd(Drive, &Cmd, Pkt)); } /************************************************************************ name: atapiTOC action: reads table of contents of audio CD and prints starting time of each track returns:whatever atapiCmd() returns *************************************************************************/ static int atapiTOC(driveinfo Drive) { u8 Entry, Buffer; int TOCEnt, Temp; printf("atapiTOC:\n"); // 16-bit TOC length, 8-bit first track, 8-bit last track TOCEnt = 4; #ifdef DEBUG printf(" calling atapiTOCEnt with Count=%u\n", TOCEnt); #endif // Read TOC Temp=atapiTOCEnt(Drive, Buffer, TOCEnt); if(Temp != 0) { return(Temp); } // NumTracks = LastTrack - FristTrack + 1 NumTracks=Buffer - Buffer + 1; // Check NumTracks(must in range 1~99) if(NumTracks <= 0 \|\| NumTracks > 99) { printf(" error: bad number of tracks %d\n", NumTracks); return(-1); } // Check MAX_TRACKS handle if(NumTracks > MAX_TRACKS) { printf(" warning: too many tracks(%u); reducing to %u.\n",NumTracks, MAX_TRACKS); NumTracks=MAX_TRACKS; } // read 4-byte header and 8-byte table-of-contents entries TOCEnt = 4 + 8 (NumTracks+1); #ifdef DEBUG printf(" calling atapiTOCEnt with Count=%u\n", TOCEnt); #endif // Read TOC Temp=atapiTOCEnt(Drive, Buffer, TOCEnt); if(Temp != 0) { return(Temp); } // point to first TOC entry Entry=Buffer + 4; // read NumTracks+1 entries the last entry is for the disk lead-out for(Temp=0; Temp < NumTracks + 1; Temp++) { Track.Min=Entry; Track.Sec=Entry; Track.Frame=Entry; printf("%02u:%02u:%02u ", Track.Min, Track.Sec, Track.Frame); // advance to next entry Entry += 8; } printf("\n"); return(0); } /************************************************************************* name: atapiPlay action: plays audio from time index Start to End (units of 1/75 sec) returns:whatever atapiCmd() returns *************************************************************************/ static int atapiPlay(driveinfo Drive, atapimsf Start, atapimsf End) { u8 Pkt={ATAPI_CMD_PLAY, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; drivecmd Cmd; printf("atapiPlay:"); memset(&Cmd, 0, sizeof(Cmd)); Pkt=Start->Min; Pkt=Start->Sec; Pkt=Start->Frame; Pkt=End->Min; Pkt=End->Sec; Pkt=End->Frame; return(atapiCmd(Drive, &Cmd, Pkt)); } /************************************************************************* name: atapiPause action: pauses or continues audio CD returns:whatever atapiCmd() returns *************************************************************************/ static int atapiPause(driveinfo Drive, bool Continue) { u8 Pkt={ATAPI_CMD_PAUSE,0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; drivecmd Cmd; printf("atapiPause:"); memset(&Cmd, 0, sizeof(Cmd)); Pkt=Continue ? 1 : 0; return(atapiCmd(Drive, &Cmd, Pkt)); } /************************************************************************* name: atapiStop action: stop audio play or scan return: whatever atapiCmd() returns *************************************************************************/ static int atapiStop(driveinfo Drive) { u8 Pkt={ATAPI_CMD_STOP,0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; drivecmd Cmd; printf("atapiStop:"); memset(&Cmd, 0, sizeof(Cmd)); return(atapiCmd(Drive, &Cmd, Pkt)); }